单项选择题

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim k As Integer For i=1 To 3 k = i Call sub1(k) m=m + k Next i Print m; i End Sub Private Sub sub1(n As Integer) n = 1 + 2 * n End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是

A．1 3
B．11 14
C．15 4
D．4 15
<上一题 目录 下一题>
热门 试题

单项选择题
阅读下列程序： Dim SW As Boolean Function func(X As Integer)As Integer If X＜20 Then Y=X Else Y=20+X End If func=Y End Function Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single， Y As Single) SW=False End Sub Private Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single， Y As Single) SW=True End Sub Private Sub Command1_Click() Dim intNum As Integer intNum=InputBox( ) If SW Then Print func(intNum) End If End Sub 程序运行后，单击一次窗体，再单击命令按钮，将显示一个输入对话框，如果在对话框中输入20，则程序的输出结果为
A．0
B．20
C．40
D．无任何输出
单项选择题
在窗体上画一个列表框、一个文本框及一个按钮，然后编写如下两个事件过程： Private Sub Form_Load() For i=1 To 10 List1.AddItem i * 10 Next i Text1.Text= End Sub Private Sub List1_Click() Print List1.Text + Text1.Text End Sub 程序运行后，在文本框中输入“123”，然后双击列表框中的第四行，则在窗体上输出的结果为
A．40123
B．163
C．123
D．30123
相关试题