A.当command1,command2成功时才执行command3
B.当command1,command2失败时才执行command3
C.当command1失败,command2成功时才执行command3
D.当command1成功,command2失败时才执行command3
第1题
第2题
第3题
A.4321
B.1234
C.34
D.12
第4题
编写如下程序:
Private Sub Form_Load()
Text1.Text=""
Text2.Text=""
Text3.Text=""
End Sub
Private Sub Command1_Click()
x=Val(Text1.Text)
y=Val(Text2.Text)
Text3.Text=f(x,y)
End Sub
Function f(ByVal x As Integer,ByVal y As Integer)
Do While y<>0
tmp=x Mod y
x=y
y=tmp
Loop
f=x
End Function
运行程序,在Text1文本框中输入36,在Text2文本框中输入24,然后单击命令按钮,则在Text3文本框中显示的内容是( )。
A.4
B.6
C.8
D.12
第5题
A.13
B.14
C.15
D.16
第6题
下面程序:
FunctionF(aAsInteger)
b=0
Staticc
b=b+1
c=c+1
F=a+b+c
EndFunction
PrivateSubCommand1_Click()
DimaAsInteger
a=2
ForI=1To3
PrintF( )
NextI
EndSub
运行上面的程序,单击命令按钮,输出结果为( )
A.4,4,4
B.4,5,6
C.4,6,8
D.4,7,9
第7题
Sub subP(b( )As Integer)
For i=1 To4
b(i)=2*i
Next i
End Sub
Private Sub Commandl Click( )
Dim a(1 To 4)As Integer
a(1)=5:a(2)=6:a(3)=7:a(4)=8
subP a( )
For i=1 To 4
Print a(i)
Next i
End Sub
运行上面的程序,单击命令按钮,则输出结果是( )。
A.2
4
6
8
B.5
6
7
8
C.10
12
14
16
D.出错
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!