网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
在窗体上添加一个命令按钮Command1，然后编写如下事件过程： Private Sub Command1_Click（) For n = 1 To 20 If n Mod 3 ＜＞ 0 Then m = m + n 3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是（）。
A．15
B．18
C．21
D．24
参考答案和解析
C
更多 “在窗体上添加一个命令按钮Command1，然后编写如下事件过程： Private Sub Command1_Click（) For n = 1 To 20 If n Mod 3 ＜＞ 0 Then m = m + n 3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是（）。A．15B．18C．21D．24” 相关考题
考题
（ 11 ）在窗体中添加一个名称为 Command1 的命令按钮，然后编写如下事件代码：Private Sub Command1_Click( )Dim x As Integer, y As Integerx=12 : y=32Call p(x, y)MsgBox x*yEnd SubPublic Sub p (n As Integer, By Val m As Integer)n=n Mod 10m=m Mod 10End Sub窗体打开运行后，单击命令按钮，则消息框的输出结果为 ___________ 。
考题
在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click（）Dim m As Integer, n As Integer, p As Integerm=3: n=5: p=0Call Y（m, n, p）Print Str（p）End SubSub Y（ByVal i As Integer, ByVal j As Integer, k As Integer）k=i + jEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是（ ）。A．4B．6C．8D．10
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub CommaLndl_Click() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。A．15B．18C．21D．24
考题
在窗体上绘制一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click()c="ABCD"For n=1 To 4 Print__Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容：DCDBCDABCD 则在横线处应填入的内容为A．Left(c.n) B．Right(c,n) C．Mid(c,n,1) D．Mid(c,n,n)
考题
在窗体上画一外名称Command1的命令按钮，然后编写如下事件过程:Private Sub Command1_Click( )x=0n=InputBox(" ")For i = 1 To nFor j = 1 To ix=x+1Next jNext iPrint xEnd Sub程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是【 】。
考题
在窗体上画一个命令按钮，然后编写如下事件过程：Private Sub Command1_Click( ) Dim m As Integer，n As Integer，p As Integer m=3：n=5：p=O Call Y(m，n，p) Print Str(p)End SubSub Y(ByVal i As Integer，ByVal j As Integer，k As Integer) k=i + jEnd Sub程序运行后，如果单击命令按钮，则在窗体上显示的内容是A．4B．6C．8D．10
考题
在窗体上画一个名称为Command1命令按钮，然后编写如下事件过程： Private Function fun1(n As Integer)As Integer Dim k As Integer If n = 1 Then k = 1 Else k = 1 + fun1(n - 1)* 2 End If fun1 = k End Function Private Sub Command1_Click () Dim m As Integer, x As Integer x = 4 m = fun1 (x) Print m End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．4B．6C．9D．15
考题
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Commandl_Click() Dim m As Integer, n As Integer, p As Integer m=3: n=5: p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )A．4B．6C．8D．10
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() a = 2 For i=1 To 3 Call funl(i，A)Next i x = i + 2 Print x；a End Sub Private Sub fun1(n，m) m=m + n * 2 n = n + m End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．1 5B．4 5C．8 4D．3 4
考题
在窗体上画一个命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim in As Integer，n As Integer，p As Integer m=3:n=5:p=0 Call Y(m,n,p) Print Str(p) End Sub Sub Y(ByVal i As Integer，ByVal j As Integer，k As Integer) k=i+j End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是A．4B．6C．8D．10
考题
在窗体上画—个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click_() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是 ______。A．15B．18C．21D．24
考题
在窗体上添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Click( ) Dim a(10，10) For m=2 To 4 For n=4 TO 5 a(m，n)m*n Next n Next m MsgBox a(2，4)+a(3，5)+a(4，5) End Sub 打开窗体运行后，单击命令按钮，则消息框的输出结果是( )。A．23B．33C．43D．53
考题
在窗体中添加一个名称为Command1的命令按钮，然后编写如下事件代码： Private Sub Command1_Cliek() Dim a(10, 10) For m = 2 To 4 For n = 4 To 5 a(m, n) = m*n Next n Next m MsgBox a(2, 5)+a(3, 4)+a(4,5) End Sub 窗体打开运行后，单击命令按钮，则消息框的输出结果是( )。A．22B．32C．42D．52
考题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x = 0 n=InputBox(" ") For i = 1 To n For j=1 To i x = x + 1 Next i Next i Print x End Sub 程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是A．3B．4C．5D．6
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click () x=0 n=InputBox ("") For i=1 TO n For j=1 To i x=x+1 Next j Next i Print x End Sub 程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是( )。A．3B．4C．5D．6
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click( ) c="ABCD" For n = 1 To 4 Print ______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在 ______ 处应填入的内容为A．Left(c,n)B．Right(c,n)C．Mid(c,n,1)D．Mid(c,n,n)
考题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() c="ABCD" For n=1 To 4 Print ______ Next End Sub 程序运行后，单击命令按钮，要求在窗体上显示如下内容： D CD BCD ABCD 则在 ______ 处应填入的内容为A．Left(c，n)B．Right(c，n)C．Mid(c，n，1)D．Mid(c，n，n)
考题
在窗体上画一个命令按钮，然后编写如下事件过程。 Private Sub Command1_Click( ) Dim m As Integer, n As Integer, p As Integer m=3: n=5:p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是A．4B．6C．8D．10
考题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n = 1 To 20 If n Mod 3 ＜＞ 0 Then m = m + n \ 3 Next n print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是A．15B．18C．21D．24
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。A．15B．18C．21D．24
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub sub1(p，m，n) p=p + 1 : m = m + 1 : n =n + 1 Print p;m;n End Sub Private Sub Command1_Click() x=6 : y=4 : z=2 Call sub1(x，y+1，(z)) Print x；y；z End Sub 程序运行后，单击命令按钮，则窗体上第二行显示的内容是A．7 6 3B．7 4 2C．6 4 2D．4 6 3
考题
在窗体上画1个命令按钮，并编写如下事件过程： Private Sub Command1 Click（ ） Dim a(3，3) For m=1 To 3 For n=1 To 3 If n=m or n=4—m Then a(m．n)=m+n Else a(m，n)=0 End If Print a(m，n)； Next n Print Next m End Sub 运行程序，单击命令按钮，窗体上显示的内容为（ ）。A.2 0 0 0 4 0 0 0 6B.2 0 4 0 4 0 4 0 6C.2 3 0 3 4 0 0 0 6D.2 0 0 0 4 5 0 5 6
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x(5)As String Dim n AS Integer For n ： 4 TO 0 Step -1 x(n)= n + 1 Print x(n)； Next n End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．54321B．4C．54321D．0
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() For n=1 To 20 If n Mod 3＜＞0 Then m=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。A．15B．18C．21D．24
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() x=0 n=InputBox("") For i=1 To n For j=1 To i x=x+1 Next j Next i Print x End Sub 程序运行后，单击命令按钮，如果输入3，则在窗体上显示的内容是______。A．3B．4C．5D．6
考题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim x As Integer，y As Integer x = 41： y = 54 Call sub1(x，y) x = x + 1 Print x； y End Sub Private Sub sub1(n As Integer， ByVal m As Integer) n=n Mod 10 m=m\10 End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是A．41 54B．2 54C．1 3D．42 3
考题
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Commandl Click() Forn=1 To 20 If n Mod 3＜＞Thenm=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是______。A．15B．18C．21D．24
考题
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() For n=1 To 20 If n Mod 3＜＞Then m=m+n\3 Next n Print n End Sub 程序运行后，如果单击命令按钮，则窗体上显示的内容是 ______。A．15B．18C．21D．24
热门标签
最新试卷
