单选题
窗体上有一个名为Commandl的命令按钮，并有如下程序：
窗体上有一个名为Commandl的命令按钮，并有如下程序：
Private Sub Command1_Click()
Dim a(10), x%
For k = 1 To 10
a(k) = Int(Rnd * 90 + 10)
x = x + a(k) Mod 2
Next k
Print x
End Sub
程序运行后，单击命令按钮，输出结果是（ ）。
发布于 2022-05-11 10:17:46
登录后免费查看答案
关注者
0
被浏览
13
1 个回答
推荐阅读
-
窗体上有一个名为Command1的命令按钮，并有如下程序：Private Sub Command1Click（ ）Dim a(10)，x％Fork=1 To 10a(k)=Int(Rnd*90+10)x=x+a(k)Mod 2Next kPrint XEnd Sub程序运行后，单击命令按钮，输出结果是（ ）。
2022-05-11 关注 0 浏览14 1答案
-
在窗体上画一个名为Command1的命令按钮，然后编写以下程序：Private Sub Command1_Click()Dim a(10) As IntegerFor k = 10 To 1 Step -1a(k) = 20 - 2 * kNext kk = k + 7Print a(k - a(k))End Sub运行程序，单击命令按钮，输出结果是（ ）。
2022-05-11 关注 0 浏览15 1答案
-
在窗体中有一个名为Command1的命令按钮，事件代码如下：Private Sub Command1_Click（ ）Dim m(10)For k=1 T0 10m(k)=11=kNext kx=6MsgBox m(2+m(x))End Sub打开窗体，单击命令按钮，消息框的输出结果是（ ）。
2022-05-13 关注 0 浏览22 1答案
-
在窗体上画一个名为 Command1 的命令按钮，然后编写以下程序：Private Sub Command1_Click( ) Dim M(10) As Integer For k=1 To 10 M(k)=12-k Next k x=8 Print M(2+M(x))End Sub运行程序，单击命令按钮，在窗体上显示的是（ ）。
2022-05-11 关注 0 浏览13 1答案
-
在窗体上画一个名为Command1的命令按钮，然后编写以下程序：Private Sub Command1 Click（ ）Dim a(10)As IntegerFork=10 To 1 Step-1a(k)=20-2*kNext kk=k+7Print a(k-a(k))End Sub运行程序，单击命令按钮，输出结果是（ ）。
2022-05-11 关注 0 浏览14 1答案
-
在窗体上画1个命令按钮，其名称为Command1，然后编写如下程序：Private Sub Command1_Click()Dim a(10)As IntegerDim x As IntegerFor i=1 To 10a(i)=8+iNextx=2Print a(f(x)+x)End SubFunction f(x As Integer)x=x+3f=xEnd Function程序运行后，单击命令按钮，输出结果为。
2022-05-11 关注 0 浏览13 1答案
-
窗体上有一个名称为Command1的命令按钮，并有如下程序：Private Sub Command1 Click（ ）x=14Do While x>0x=x-3x=IIf(Int(x／5)=x／5，x+2，x)LoopPrint xEnd Sub程序运行后，单击命令按钮Command1，输出结果为（ ）。
2022-05-11 关注 0 浏览14 1答案
-
在窗体上画一个名为Co mmand1的命令按钮，然后编写以下程序：Private Sub Co mmand1＿Click（）Di m M（10）As IntegerFor k ＝l To 10M（k）＝12－kNextkx＝8Print M（2＋M（x））End Sub运行程序，单击命令按钮，在窗体上显示的是（ ）。
2022-05-11 关注 0 浏览19 1答案
-
下列程序执行时，在窗体上显示的是（ ）。Private Sub Command1_Click( )Dim a(10)For k=1 To 10a(k)=11-kNext kPrint a(a(3)\a(7)Mod a(5))End Sub
2022-05-11 关注 0 浏览12 1答案
-
标准模块中有如下程序代码：Public x As Integer,y As IntegerSub var_pub()x=10:y=20End Sub在窗体上有1个命令按钮，并有如下事件过程：Private Sub Command1_Click()Dim x As IntegerCall var_pubx=x+100y=y+100Print x;yEnd Sub运行程序后单击命令按钮，窗体上显示的是
2022-05-11 关注 0 浏览14 1答案
