( 30 )下面程序运行时,若输入 395 ,则输出结果是
Private Sub Comand1_Click ()
Dim x%
x=InputBox (" 请输入一个 3 位整数 ")
Print x Mod 10,x\100, ( x Mod 100 ) \10
End Sub
A ) 3 9 5
B ) 5 3 9
C ) 5 9 3
D ) 3 5 9
第1题:
有如下程序 x=InputBox("input value of x") Select Case x Case Is>0 y=y+l Case Is=0 y=x+2 Case Else y=x+3 End Select. Print x: y 运行时,从键盘输入—5,输出的结果是( )。
A.-7
B.-9
C.-8
D.-10
第2题:
下面程序运行时,若输入395,则输出结果是( )。
Private Sub Command1_Click( )
Dim X%
x=InputBox("请输入一个3位整数")
Print x Mod 10,x\100,(x Mod 100)\10
End Sub
A.3 9 j
B.5 3 9
C.5 9 3
D.3 5 9
第3题:
下面程序运行时,若输入395,则输出结果是_______________。 Private Sub Command1_Click() Dim x% x = InputBox("请输入一个3位整数") Print x Mod 10, x 100, (x Mod 100) 10 End Sub
A.3 9 5
B.5 3 9
C.5 9 3
D.3 5 9
第4题:
下面程序运行时,若输入395,则输出结果是( )。 Private Sub Command1_Click( ) Dim X% x=InpetBox("请输入一个3位整数") Print x Mod 10,x/100,(x Mod 100)/10 End Sub
A.3 9 j
B.5 3 9
C.5 9 3
D.3 5 9
第5题:
下面程序运行时,若输入395,则输出结果是_________。 Private Sub Command1_Click() Dim x% x=InputBox("请输入一个3位整数") Print x Mod 10,x100,(x Mod 100)10 End Sub
A.3 9 5
B.5 3 9
C.5 9 3
D.3 5 9