单项选择题

在窗体上添加一个按钮，名为Command1，然后编写如下的事件过程，输出结果为______。
Prinvate Sub Command1_Click()
For i=1 To 4
x=4
Forj=1 To 3
x=3
For k=1 To 2
x=x+5
Next
Next
Next
Ptint x
End Sub

A) 13
B) 26
C) 30
D) 40

<上一题目录下一题>

热门试题

单项选择题

窗体上有一个名为Command1的命令按钮，并有如下程序： Private Sub Command1_Click() Dim a As Integer,b As Integer a=13 b=27 Print Fun(a,b)；a;b End Sub Private Function Fun(ByVal a As Integer,b As Integer) As Integer a=a Mod 5 b=b 5 Fun=a End Function 程序运行时，单击命令按钮，则输出的结果是______。

A) 3 8 5
B) 3 13 5
C) 3 13 27
D) 13 13 27

单项选择题

设已经在菜单编辑器中设计了窗体的快捷菜单，某顶级菜单为a1，且取消其可见属性。运行时，可以使快捷菜单的菜单项响应鼠标左键单击和右健单击的事件过程是______。

A) Private Sub Form_Mouse Down(Button As Integer,Shift As Integer,_X As Single,
Y As Single)
If Button=2 Then PopupMenu a1,2
End Sub
B) Private Sub Form_Mouse Down(Button As Integer,Shift As Integer,_X As Single,
Y As Single)
PopupMenu a1,0
End Sub
C) Private Sub Form_Mouse Down(Button As Integer,Shift As Integer,_X As Single,
Y As Single)
PopupMenu a1,2
End Sub
D) Private Sub Form_Mouse Down(Button As Integer,Shift As Integer,_X As Single,
Y As Single)
If(Button=vbLetfButton) Or(Button=vbRightButton) Then PopupMenu a1
End Sub

相关试题