更多"在窗体上画一个命令按钮，名称为Command1。单击命令按钮时，执行如"的相关试题:
[单项选择]在窗体上画一个命令按钮，名称为Command1。单击命令按钮时，执行如下事件过程： Private Sub Command1_Click（ ） a$="software and hardware" b$=Right(a$,8) c$=Mid(a$,1,8) MsgBox a$,,b$,c$,1 End Sub 则在弹出的信息框的标题栏中显示的信息是( )。
A. software and hardware
B. software
C. hardware
D. 1
[单项选择]在窗体上画一个命令按钮，名称为Comraandl。单击该命令按钮时，执行如下事件过程： Private Sub Command1_Click（ ） a$="software and hardware" b$=Right(a$, 8) c$=Mid(a$, 1, 8)+b$ MsgSox a$, 1, b$ End Sub 则在弹出的消息框的标题栏中显示的信息是______。
A. software and hardware
B. software
C. hardware
D. 1
[单项选择]在窗体上画一个命令按钮，名称为Command1。单击命令按钮时，执行如下事件过程，则在弹出的信息框的标题栏中显示的信息是 ______。 Private SubCommand1_Click（ ） a$="software and hardware" b$=Right(a$，8) c$ =Mid(a$,1,8) MsgBox a$ ,, b$ ,c$,1 End Sub
A. software and hardware
B. software
C. hardware
D. 1
[单项选择]在窗体上画一个命令按钮，名称为Command1。 Private Sub Command1 Click（ ） Dim x As Integer，y As Integer x=10:y:0 Do x=x+2:y=y+x Print "x=", x; "y=",y If y＞20 Then Exit Do Loop Until x=18 End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是 ______。
A. x=12y=12 x = 14 y = 16 x=16 y=18
B. x=12 y=12 x= 16 y =28 x= 18 y=24
C. x=12 y=12 x= 14 y=44
D. x= 12 y=12 x= 14 y=26
[单项选择]在窗体上画一个命令按钮，名称为Command1。程序运行后，如果单击命令按钮，则显示一个输入对话框，在该对话框中输入一个整数，并用这个整数作为实参调用函数过程F1。在F1中判断所输入的整数是否是奇数，如果是奇数，过程F1返回1，否则返回0。能够正确实现上述功能的代码是( )。
A. Private Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) Print a End Sub Function F1(byRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Funcfion
B. Privae Sub Command1_Click() x=InputBox("请输入整数") a=F1(Val(x)) print a End Sub Function F1(byRef b As Integer) If b Mod 2=0 Then F1=0 Else F1=1 End If End Function
C. Private Sub Command1_Click() x=InputBox("请输入整数") F1(Va(x)) Print a End Sub Function F1(byRef b As Integer) If b Mod 2=0 Then F1=1 Else F1=0 End If End Funcfion
D. Private Sub Command1_Click() x=InputBox("请输入整数") F1(Val(x)) Print a End Sub Function F1(ByrRef b As Integer) If b Mod 2=0 Then Return 0 Else Return 1 End If End Function
[单项选择]在窗体上画一个命令按钮，其名称为Command1。程序运行后，单击命令按钮，输出结果为 ( )。 Private Sub p1(n As Integer) For i=n To 1 Step-1 x=String(i, "*") Print x Next i End Sub Private Sub Command1_Click（ ） p1 (3) End Sub
A. * * * * * *
B. * * * * * *
C. * * *
D. * * * * * *
[单项选择]在窗体上画一个命令按钮，名称为Commandl。然后编写如下程序： Private Sub Command1_Ctick（ ） For I=1 TO 2 For J=1 TO I Print String(I，"Hello")； Next J Print Next I End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是
A. H HH HH
B. H HHHH
C. HHHHH
D. H HH HHHH
[单项选择]在窗体上画一个命令按钮，其名称为Command1。程序运行后，单击命令按钮，输出结果是( )。
Private Sub p1(n As Integer)
For i=n To 1 Step-1
x=String(i,"*")
Print x
Next i
End Sub
Private Sub Command1_Click（ ）
p1(3)
End Sub
[单项选择]在窗体上画一个命令按钮，名称为Command1，然后编写如下程序： Private Sub Command1_Click（ ） For i=1 To 2 For j=1 To i Print String(i,"Hello") Next j Print Next i End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。
A. H HH HH
B. H HHHH
C. HHHHH HH HHHH
D. H
[单项选择]在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Private Sub Commandl_Click（ ） Dim a（ ） a＝Array(“机床”,”车床”,”钻床”,”轴承”) Print a(2) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。
A. 机床
B. 车床
C. 钻床
D. 轴承
[单项选择]在窗体上画一个命令按钮，名称为Commandl，然后编写如下事件过程： Option Base 0 Private Sub Command1_Click（ ） Dim city As Variant city=Array("北京"，"上海"，"天津"，"重庆") Print city(1) End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是______。
A. 空白
B. 错误提示
C. 北京
D. 上海
[单项选择]在窗体上画一个命令按钮，名称为Command1，然后编写如下事件过程：
Private Sub Command1_Click（ ）
Dim a（ ）
a＝Array("机床"，"车床"，"钻床"，"轴承")
Print a(2)
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。
A. 机床
B. 车床
C. 钻床
D. 轴承
[单项选择]在窗体上画一个命令按钮，名称为Command1，然后编写下列程序：
Private Sub Command1_Click（ ）
For i=1 To 2
For j=1 To i
Print String(i,"Hello")
Next j
Print
Next i
End Sub
程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。
[单项选择]在窗体上画一个命令按钮，名称为Command1，然后编写如下程序： Private Sub Command1_Click（ ） For i = 1 To 2 For j = 1 To i Print String(i, "Hello") Next j Print Next i End Sub
A. H HH HH
B. H HHHH
C. HHHHH HH HHHH
D. H
[单项选择]在窗体上画一个命令按钮，名称为Command1。然后编写如下程序：Private Sub Command1_ Click（ ）Dim a As Integer, b As Integerb = 1for a = 1 To 100 if b＞= 10 then exit for if b Mod 3 = 1 then b=b+3 End ifNext aPrint aEnd Sub在命令按钮上单击后，窗体上显示的结果是______。
A. 101
B. 6
C. 5
D. 4
