单项选择题
标准模块中有如下程序代码:
Public x As Integer,y As Integer
Sub var_pub()
x=10:y=20
End Sub
在窗体上有一个命令按钮,并有如下事件过程:
Private Sub Command1_Click()
Dim x As Integer
Call var_pub
x=x+10
y=y+10
Print x;y
End Sub
运行程序后单击命令按钮,窗体上显示的是______。
A) 10 10
B) 10 20
C) 10 30
D) 20 30
点击查看答案&解析
<上一题
目录
下一题>
热门
试题
单项选择题
某人创建了一个工程,其中的窗体名称为Form1;之后又添加了一个名为Form2的窗体,并希望程序执行时先显示Form2窗体,那么,他需要做的工作是______。
A) 在工程属性对话框中把"启动对象"设置为Form2
B) 在Form1的Load事件过程中加入语句Load Form2
C) 在Form2的Load事件过程中加入语句Form2.Show
D) 把Form2的TabIndex属性设置为1,把Form1的TabIndex属性设置为2
点击查看答案&解析
单项选择题
在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程。 Private Sub Form_load() List1.Addltem Item 1 List1.Addltem Item 2 List1.Addltem Item 3 End Sub Private Sub Command1_Click() List1.List(List1.Listcount)= AAAA End Sub 程序运行后,单击命令按钮,其结果为______。
A) 把字符串"AAAA"添加到列表框中,但位置不能确定
B) 把字符串"AAAA"添加到列表框的最后(即"Item 3"的后面)
C) 把列表框中原有的最后一项改为"AAAA"
D) 把字符串"AAAA"插入列表框的最前面(即"Item 1"的前面)
点击查看答案&解析
相关试题
Not EOF(1)
Loop While Cout<=n
neg=neg+Arr(k)
36
Input