题目内容

在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_Click() a = 0 For m=1 To 10 a = a + 1 b = 0 For j=1 To 10 a = a + 1 b = b + 2 Next j Next m Print a，b End Sub 程序运行时，单击命令按钮Command1后，窗体上显示的结果为

A. 10 20
B. 20 110
C. 110 20
D. 200 110

查看答案

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

更多问题

在窗体上画一个命令按钮，然后编写如下程序： 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()
B. Cx．Xm．Enabled=False
C. End Sub
D. Private Sub c1 Click()
E. Db．Cx．Xm．Enabled=False
F. End Sub
G. Private Sub c1 Click()
H. Xrn．Enabled=False
I. End Sub
J. Private Sub c1 Click()
K. Me．Db．Cx．Xm．Enabled=False
L. End Sub

查看答案

响应某个事件后所执行的操作通过一段程序代码来实现，这样的一段程序代码叫做【6】。

查看答案

下列过程的功能是：用来计算并输出S=1+1/2+1/3+…+1/100的值，请完善下列程序。 Furiction SumD (n As Integer)As Single s = 1 i = 1 Do i = i + 1 s = s + 1 / i Loop Until 【12】 SumD = s End Function Private Sub Form Click() sum1=SumD(100) Print "sum1="； sum1 End Sub

查看答案

A. 10 20 B. 20 110 C. 110 20 D. 200 110

响应某个事件后所执行的操作通过一段程序代码来实现，这样的一段程序代码叫做 【6】 。

下列过程的功能是：用来计算并输出S=1+1/2+1/3+…+1/100的值，请完善下列程序。 Furiction SumD (n As Integer)As Single s = 1 i = 1 Do i = i + 1 s = s + 1 / i Loop Until 【12】 SumD = s End Function Private Sub Form Click() sum1=SumD(100) Print "sum1="； sum1 End Sub

A. 10 20
B. 20 110
C. 110 20
D. 200 110

响应某个事件后所执行的操作通过一段程序代码来实现，这样的一段程序代码叫做【6】。