填空题

执行下面的程序，当输入3时，输出的结果是 【11】
Private sub Command1_Click()
i=2
j= InputBox(" j = ")
On j GoTo 20,30,40,50
i=i+2
20:i=i+2
30:i=i+2
40:i=i+2
50:i=i+2
Print i
End Sub

【参考答案】

F
<上一题 目录 下一题>
热门 试题

填空题
在Visual Basic 程序启动运行中设置一个封面窗口，显示一些有意义的信息，要求显示时间5秒。 Sub dlys(ByVal n As Single) Dim tl As Single Dim t2 As Single t1 = Timer Do t2 = Timer If t2 ＜ t1 Then t2 = t2 + 86400 If t2 - tl ＞ n Then Exit Do 【12】 Loop End Sub Sub main( ) Form2. Show dlys 【13】 【14】 Form1. Show End Sub
单项选择题
在窗体上画一个名称为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
相关试题