通常將()年以上還本付息的國債叫做長期國債。
A.5
B.10
C.15
D.20
AI搜題
NEW
搜題
第1題
下列程序： Private Sub Command1_Click() a=InputBox("請輸入") b=InputBox("請輸入") Print=a+b End Sub 運(yùn)行時輸入3和4，輸出的結(jié)果是
A．7
B．34
C．3+4
D．出錯
第2題
有如下程序，運(yùn)行時從鍵盤輸入3，輸出結(jié)果是 ______。 Private Sub Command1_Click() a=InputBox("請輸入一個數(shù)字：") Select Case a Case Is＞2 b=a+1 Case Is＞3 b=a+2 Case Is＞4 b=a＋3 Case Is＞5 b＝a＋4 End Select Print a ＋ b End Sub
A．8
B．7
C．6
D．9
第3題
下列程序運(yùn)行后的輸出結(jié)果是 Function Fun(n) x=n*n Fun=x一11 End Function Private Sub Command1_Click() For k=1 To 2 Y=Fun(k)：Print Y Next End Sub
A． -10 -7
B．10 8
C．1 3
D．0 4
第4題
下面程序運(yùn)行時，若輸入395，則輸出結(jié)果是（）。
Private Sub Command1_Click（）
Dim X％
x=InputBox("請輸入一個3位整數(shù)")
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題
（30 ）下面程序運(yùn)行時，若輸入 395 ，則輸出結(jié)果是
Private Sub Comand1_Click （）
Dim x%
x=InputBox (" 請輸入一個 3 位整數(shù) ")
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
第6題
（30 ）下面程序運(yùn)行時，若輸入 395 ，則輸出結(jié)果是
Private Sub Comand1_Click （）
Dim x%
x=InputBox (" 請輸入一個 3 位整數(shù) ")
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
第7題
以下程序運(yùn)行時，單擊窗體后，在窗體上輸出的結(jié)果是 ______。 Private SubForm_Click() Dim a As Integer，b As Integer a=10 ：b=20 Call ff(a，B)Print a，b End Sub Private Sub ff(x As Integer，y As Integer) x=x+y y=x+y End Sub
A．30 50
B．30 30
C．20 20
D．10 20
第8題
下列程序段，運(yùn)行后窗體上輸出結(jié)果是()。
Private Sub Command1_Click()
a=5:b=4:c=3:d=2
x=3＞2*b Or a=c And b＜＞c Or c＞d
Printx
End Sub
A．1
B．True
C．False
D．2
第9題
以下程序運(yùn)行后輸出的結(jié)果是______。 Private Sub Form. _Click() a=0 For j=1 To 15 a=a+j Mod 3 Next j Print a End Sub
A．10
B．15
C．80
D．100
第10題
運(yùn)行下列程序：
Private Sub form_Click()
t = Val(InputBox("請輸入一個數(shù)："))
x = t - 1
Select Case t
Case 1 To 10
y = 4 * t
Case Is >10
y = 3 * t
Case Else
y = 2 * t
End Select
Print x; y
End Sub
運(yùn)行時，從鍵盤輸入4，輸出的結(jié)果是()。
A.3 16
B.4 4
C.3 4
D.4 10
