在窗体中有一个名为Command1的命令按钮,事件代码如下:
Private Sub Command1_Click( )
Dim m(10)
For k=1 T0 10
m(k)=11=k
Next k
x=6
MsgBox m(2+m(x))
End Sub
打开窗体,单击命令按钮,消息框的输出结果是( )。
发布于 2022-05-13 21:29:30
登录后免费查看答案
关注者
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 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答案
-
窗体上有一个名为Commandl的命令按钮,并有如下程序:Private Sub Command1_Click()Dim a(10), x%For k = 1 To 10a(k) = Int(Rnd * 90 + 10)x = x + a(k) Mod 2Next kPrint xEnd Sub程序运行后,单击命令按钮,输出结果是( )。
2022-05-11 关注 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 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答案
-
在窗体中有一个命令按钮Command1和一个文本框Text1,编写事件代码如下:Private Sub Command1_Click(.For I =1 To 4x = 3For j = 1 To 3For k = 1 To 2x = x + 3Next kNext jNext IText1.value = Str(x.End Sub打开窗体运行后,单击命令按钮,文本框Text1输出的结果是
2022-05-13 关注 0 浏览16 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答案
-
在窗体中添加一个名称为Command1的命令按钮,然后编写如下事件代码:Private Sub Command 1_Click()Dim a(10,10)For m=2 To 4For n=4 To 5a(m,n)=m*nNext nNext mMsgBox a(2.4)+a(3 5)+a(4,5)End Sub运行窗体后.单击命令按钮,MsgBox中应输出( )。
2022-05-13 关注 0 浏览13 1答案
-
在窗体中添加一个名称为Command1的命令按钮,然后编写如下程序:PubliC x As IntegerPrivate Sub Command1_CliCk()x=10Call s1Call s2MsgBox xEnd SubPrivate Sub s1()x=x+20End SubPrivate Sub s2 ()Dim x As Integerx= x+ 20End Sub窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
2022-05-13 关注 0 浏览14 1答案
-
在窗体上画一个命令按钮,名称为 Command1, 然后编写如下代码:Option Base 0Private Sub Command1_Click()Dim A (4)As Integer,B(4) As IntegerFor k=0 To 2A(k+1)=InputBox(“ 请输入一个整数 ”)B(3-k)=A(k+1)Next kPrint B(k)End Sub程序运行后,单击命令按钮,在输入对话框中分别输入 2 、 4 、 6 ,输入结果为 ( ) 。
2022-05-11 关注 0 浏览14 1答案