单项选择题

在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Labe11、Labe12的标签,然后编写如下程序代码:
Private X As Integer
Private Sub Command1_C1ick()
X=5:Y=3
Call proc(X,Y)
Labe11.Caption=X
Labe12.Caption=Y
End Sub
Private Sub proc(ByVal a As Integer,ByVal b As Integer)
X=a*a
Y=b+b
End Sub
程序运行后,单击命令按钮,则两个标签中显示的内容分别是______。

A.5和3
B.25和3
C.25和6
D.5和6
热门 试题

填空题
在Visual Basic工程prjl中包含有两个窗体,窗体form1(主窗体)上有两个命令按钮command1和 command2,一个文本控件text1;窗体dialog是一个对话窗体,窗体包含两个命令按钮OK和Cancel,一个文本控件text1和一个标签控件labe11。 编写程序要求实现的功能为:窗体form 1上command1的caption属性值为name,程序运行后,当单击 eommand1时,弹出对话窗体dialog,其labe11控件中的提示信息为“please input your name:”,要求用户输入自己的姓名。如果单击OK按钮,保存当前输入的内容并返回form1界面,command1的caption属性值为email。若再次单击command1命令按钮,仍然出现dialog对话窗体,此时dialog的labe11提示用户输入自己的email,当用户输入email后,单击“确定”按钮,保存当前输入的内容并返回form1界面;如果单击Cancel按钮,则输入内容无效并返回form1。 Private Sub Command1_Click() Dialog. Text1. Text = Dialog. Show End Sub Private Sub Command2_Click() Text1. Text = email: + Dialog. email + name: + Dialog. fname End Sub Private Sub Form_ Load() Command1. Caption = name 【7】 . Caption = please input your name: Dialog. i = 0 End Sub Option Explicit Public i As Integer Public email As String Public fname As String Private Sub CancelButton_Click() i=0 email = fname = Forml. Command1. Capt ion = name Dialog. Hide Form1. Show End Sub Private Sub OKButton_ Click() 【8】 Select Case i Case 1: email = Text1. Text Labe11. Caption = please input your email: 【9】 . Caption = email Case 2: fname = Text1. Text 【10】 . Caption = name i=0 End Select Dialog. Hide Form1. Show End Sub