[单项选择]单击窗体上Command1命令按钮时，执行如下事件过程：
Private Sub Command1_Click( )
a$= "software and hardware"
b$= Right(a$, 8)
c$= Mtd(b$ 1, 8)
Msgbox c$
End sub
则在弹出的信息框的标题栏中显示的信息是( )。
A. software and hardware
B. software
C. hardware
D. and

更多"单击窗体上Command1命令按钮时，执行如下事件过程： "的相关试题:

[单项选择]单击窗体上Command1命令按钮时，执行如下事件过程： Private Sub Command1_Click( ) a$= "software and hardware" b$= Right(a$, 8) c$= Mtd(b$ 1, 8) Msgbox c$ End sub则在弹出的信息框的标题栏中显示的信息是( )。
A. software and hardware
B. software
C. hardware
D. and

查看答案

[单项选择]在窗体上画一个命令按钮，名称为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

查看答案

[填空题]单击窗体上的命令按钮Command1, 【10】
Private Sub Command1_Click（　）
a= "10"
b=20
c=Val(a) +b
Print c
End Sub

查看答案

[填空题]单击窗体上的命令按钮Command1,______
Private Sub Command1_Click（　）
a= "10"
b=20
c=Val(a) +b
Print c
End Sub

查看答案

[单项选择]单击命令按钮时，下列的执行结果为
　　Private Sub Command1_Click（　）
　　　　Dim x As Integer，y As Integer
　　　　x=86：y=29
　　　　Call Proc(x，y)
　　　　Print x；y
　　End Sub
　　Public Sub Proc(n As Integer，ByVal m As Integer)
　　　　n=n Mod 10
　　　　m=m Mod 10
　　End Sub
A. 12 32
B. 6 29
C. 2 3
D. 12 3

查看答案

[单项选择]单击命令按钮时，下列程序的执行结果为　　 Private Sub Command1_Click( ) Dim x As Integer，y As Integer x=50：y=78 Call PPP(x，y) Print x；y End Sub Public Sub PPP(ByVM n As Integer，ByVal m As Integer) n=n/l0 m=m/l0 End Sub
A. 08
B. 50 78
C. 450
D. 78 50

查看答案

[单项选择]单击命令按钮时，下列程序的运行结果为 Private Sub Command1_Click( ) Print MyFund(20，18) End Sub Public Function MyFund(m As Integer，n As Integer)As Integer Do While m◇n Do While m>n：m=m-n:Loop Do While m＜n：n=n-m:Loop Loop MyFund=m End Function
A. 0
B. 2
C. 4
D. 6

查看答案

[单项选择]单击命令按钮时，下列程序代码的执行结果为 Private Sub Command1_Click( ) Print MyFunc(24，18) End Sub Public Function MyFunc(m As Integer，n As Integer)As Integer Do While m ◇ n Do While m>n：m=m—n：Loop DO While m＜n：n=n-m：Loop Loop My Func=m End Function
A. 2
B. 4
C. 6
D. 8

查看答案

[单项选择]在窗体上画一个命令按钮，名称为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
B. x=12 y=12
C. x=12 y=12
D. x= 12 y=12

查看答案

[单项选择]单击命令按钮时，下列程序代码的运行结果为　　Private Sub Command1_Click（　）　　　　print MyFunc(20，18)　　End Sub　　Public Function MyFunc (m As Integer，n As Integer)As Integer　　　　Do While m <>n　　　　　　Do While m ＞ n：m=m - n：Loop　　　　　　Do While m ＜ n：n=n - m：Loop　　　　Loop　　　　MyFunc=m　　End FunCtion
A. 0
B. 2
C. 4
D. 6

查看答案

[单项选择]单击命令按钮时，下列程序的执行结果是( )。　　Private Sub Command1_Click（　）　　　　Dim a As Integer，b As Integer，C As Integer 　　　　a=3 　　　　b=4 　　　　c=5 　　　　Print SecProc(c，b，a) 　　End Sub 　　Function FirProc (x As Integer，y As Integer，z As Integer) 　　　　FirProc=2 * x + y + 3 * z+2 　　End Function 　　Function SecProc (x As Integer，y As hteger，z As Integer) 　　　　SecProc=FirProc(z，x，y)+x+7 　　End Function
A. 13
B. 16
C. 36
D. 33

查看答案

[单项选择]单击命令按钮时，下列程序的执行结果是 Private Sub Command1_Click（　） Dim a As Integer，b As Integer，c As Integer 　　a=3:b=4:c=5 　　Print SecProc(c,b,a) End Sub Function FirProc(x As Integer，y As Integer，z As Integer) 　　FirProc=2*x+y+3*z+2 End Function Function SecProc(x As Integer，y As Integer，z As Integer) 　　SecProc=FirProc(z,x,y)+x+7 End Function
A. 20
B. 25
C. 37
D. 32

查看答案

我来回答:

提交