单项选择题

在窗体上画一个命令按钮，然后编写如下程序：
Option Base 1
Private Sub Command1 Click()
Dim Arr1(12)As Integer， Arr2(3)As Integer
Dim Sum As Integer
Sum = 2
For i=1 To 12
Arrl(i)= i
Next i
For i=1 To 3
Arr2(i)= Arrl(i*i)
Next i
For i = 1 To 3
Sum = Sum + Arr2(i)
Next i
Print Sum
End Sub
程序运行后，单击命令按钮，在窗体上的输出结果为

A．16
B．24
C．32
D．36

<上一题目录下一题>

热门试题

单项选择题

设已经建立如下表的菜单结构：标题名称层次数据库操作 Db 1 添加记录 Tj 2 查询记录 Cx 2 按姓名查询 Xm 3 按学号查询 Xh 3 删除记录 Delete 2 在窗体上还有一个名称为c1的命令按钮，要求在运行时，单击命令按钮则将菜单项“按姓名查询”设置为无效，下面正确的事件过程是

A．Private Sub c1 Click()
Cx．Xm．Enabled=False
End Sub
B．Private Sub c1 Click()
Db．Cx．Xm．Enabled=False
End Sub
C．Private Sub c1 Click()
Xrn．Enabled=False
End Sub
D．Private Sub c1 Click()
Me．Db．Cx．Xm．Enabled=False
End Sub

单项选择题

在窗体(Name属性为Form1)上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1)，然后编写如下两个事件过程： Private Sub Command1_Click() A=Text1.Text+Text2.Text Print a End Sub Private SUb Form胃Load() Text1.Text= Text2.Text= End Sub程序运行后，在第一个文本框(Text1)和第二个文本框(Text2)中分别输入33和44，然后单击命令按钮，则输出结果为

A．77
B．33+44
C．3344
D．4433

相关试题