题目内容

窗体上有一个命令按钮Command1,编写如下事件过程: Private Sub Command1_Click() a = 0 For m = 1 To 3 a = a + 1 b = 0 For j = 1 To 3 a = a + 1 b = b + 2 Next j Next m Print a, b End Sub 运行时,单击按钮,输出结果是(

A. 6 6
B. 6 18
C. 12 6
D. 12 18

查看答案

搜索结果不匹配？点我反馈

更多问题

有如下事件过程：Private Sub Command1_Click()b=10Do While b<>-1a = InputBox("请输入a的值")a= Val(A)b =InputBox("请输入b的值")b= Val(b)a= a * bLoopPrint aEnd Sub程序运行后，依次输入数值30，20，10，-1输出结果为（）

A. -20
B. 200
C. 600
D. -10

运行下列程序,单击窗体后输出的结果是( )。 Option Base 0Private Sub Form_Click() Dim a Dim s As Integer, i As Integer a = Array(1, 2, 3, 4, 5, 6) s = 1 For i = 5 To 1 Step -2 s = s * a(i) Next i Print s End Sub

A. 15
B. 48
C. 120
D. 720

设有数组定义语句Dim a(5) As Integer,则下列给数组元素赋值的语句错误的是( )。

A. a(5) = Val(InputBox("Input Data:"))
B. a(0)=3
C. a(1) = "123"
D. a=Array(1,2,3,4,5,6)

窗体上有一个命令按钮Command1,编写如下事件过程: Option Base 0Private Sub Command1_Click() Dim a(10) For j = 6 To 10 a(j) = j - 5 Next j Text1.Text = a(0) + a(a(10) / a(6)) End Sub 运行时,单击按钮,Text1中显示(

A. 0
B. 1
C. 2
D. 3