在窗体上添加一个按钮(cmd) ，编写如下程序：Private sub crud_click( )Dim s, iFori = 1 to 10s=s+iNextMsgbox sEnd sub程序运行后，单击按钮，在消息框中显示的信息为 【 】 。
题目
在窗体上添加一个按钮(cmd) ，编写如下程序：
Private sub crud_click( )
Dim s, i
Fori = 1 to 10
s=s+i
Next
Msgbox s
End sub
程序运行后，单击按钮，在消息框中显示的信息为 【 】 。
相似考题
更多“在窗体上添加一个按钮(cmd) ,编写如下程序: Private sub crud_click( ) Dim s, i Fori = 1 to 10 ”相关问题
-
第1题：
在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程： Private Sub Command1_ Click() Dim arr (10) For i = 1 To 10 arr (i) = i ^ 2 Next i Print arr(i - 2) End Sub程序运行后，单击命令按钮，在窗体上输出的是______。
A．49
B．64
C．81
D．100
正确答案：C
-
第2题：
在窗体上添加一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click（ ） Dima（ ） a=Array（1，3，5，7）s=0Fori=1 t0 3S=S*10+a（i）NextiPrint SEndSub程序运行后，输出结果为（ ）。
A.135
B.357
C.531
D.753
正确答案：B
暂无解析，请参考用户分享笔记 -
第3题：
在窗体上添加一个命令按钮Command1，然后编写如下程序： Private Sub Command1_Click（) Dim i As Integer, j As Integer Dim a（10, 10) As Integer For i = 1 To 3 For j = 1 To 3 a（i, j) = （i - 1) * 3 + j Print a（i, j); Next j Print Next i End Sub 程序运行后，单击命令按钮，窗体上显示的内容是（）。
A．1 2 3 2 4 6 3 6 9
B．2 3 4 3 4 5 4 5 6
C．1 4 7 2 5 8 3 6 9
D．1 2 3 4 5 6 7 8 9
C -
第4题：
在窗体上添加一个命令按钮，名为Command1，然后为该命令按钮编写如下事件过程，该过程执行结果为______。Option Base 1Private Sub Cemmand1_Click() Dim a As Variant a = Array(1, 2, 3, 4) j = 1 for i = 4 To 1 Step - 1 s = s+ a(i)* j j= j* 10 Next i Print sEnd Sub
A．4321
B．1234
C．34
D．12
正确答案：B
解析：本题的难点是数组在循环中的计算。计算过程为“4+3×10+2×100+1×1000=1234”如果改成“for i=1 T0 4”后，其结果为A。 -
第5题：
（ 34 ）在窗体中添加一个名称为 Command1 的命令按钮，然后编写如下事件代码：
Private Sub Command1_Click( )
s="ABBACDDCBA"
For I=6 To 2 Step -2
x=Mid(s,I,I)
y=Left(s,I)
z=Right(s,I)
z=x & y & z
Next I
MsgBox z
End Sub
窗体打开运行后，单击命令按钮，则消息框的输出结果是
A ） AABAAB
B ） ABBABA
C ） BABBA
D ） BBABBA
正确答案：D