A:正確
B:錯誤
第1題
在窗體中添加一個命令按鈕,編寫如下程序: Private Sub Sub1(p,m,n) p=p+1:m=m+1:n=n+1 Print "sub1:";p;m;n End Sub Private Sub Command1_Click() a1=1:b=2:c1=3 Call Sub1(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序運行后,輸出結果為
A.Sub: 2 6 4 Main: 2 6 4
B.Sub: 2 6 4 Main: 2 6 4
C.Sub: 2 6 4 Main: 1 2 3
D.Sub: 2 6 4 Main: 2 2 3
第2題
在窗體中添加一個命令按鈕,編寫如下程序: Private Sub Test(p,m,n) p=p+1:m=m+1:n=n+1 Print "Sub: ";p;m;n End Sub Private Sub Command1.Click() a1=1:b=2:c1=3 Call Test((a,b1+3,(c1)) Print "Main:";a1;b1;c1 End Sub 程序運行后,輸出結果為
A.Sub: 2 6 4 Main: 2 6 4
B.Sub: 2 6 4 Main: 2 6 4
C.Sub: 2 6 4 Main: 1 2 3
D.Sub: 2 6 4 Main: 2 2 3
第3題
在窗體中添加一個命令按鈕,編寫如下程序: Private Sub Subl(p,m,n) p=p+1:m=m+1:n=n+1 Print"subl:";p;m;n End Sub Private Sub Command1_Click() al=1:b=2:c1=3 Call Subl(a,b1+3,c1) Print"Main:";a1;b1;c1 End Sub 程序運行后,輸出結果為
A.Sub:2 6 4 Main:2 6 4
B.Sub:2 6 4 Main:2 6 4
C.Sub:2 6 4 Main:1 2 3
D.Sub:2 6 4 Main:2 2 3
第4題
在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下事件過程: Private Sub sub1(p,m,n) p=p + 1 : m = m + 1 : n =n + 1 Print p;m;n End Sub Private Sub Command1_Click() x=6 : y=4 : z=2 Call sub1(x,y+1,(z)) Print x;y;z End Sub 程序運行后,單擊命令按鈕,則窗體上第二行顯示的內容是
A.7 6 3
B.7 4 2
C.6 4 2
D.4 6 3
第5題
在窗體中添加一個名稱為Com1的命令按鈕,然后編寫如下程序:
Private Sub s(ByVal p As Integer)
p=p*2
End Sub
Private Sub Com1_Click()
Dim i As Integer
i=3
Call s(i)
If i>4 Then i=i^2
End sub
窗體打開運行后,單擊命令按鈕,則消息框的輸出結果為()。
第6題
在窗體中添加一個名稱為Command1的命令按鈕,然后編寫如下程序:
Private Sub s(ByVal p As Integer)
p=p*2
End Sub
Private Sub Command1_click()
Dim i As Integer
i=3
Call s(i)
If i>4 Then i=i^2
MsgBox i
End Sub
窗體打開運行后,單擊命令按鈕,則消息框的輸出結果為【 】。
第7題
在窗體中添加一個名為Command1的命令按鈕,然后編寫如下程序:
Private Sub s(By Val p As Integer)
p=p*2
End Sub
Prirate Sub Command1_Click()
Dim i As Integer
i=3
Call s(i)
If i>4 Then i=i^2
MsgBox I
End Sub
窗體打開運行后,單擊命令按鈕,則消息框的輸出結果為______。
第8題
(12 )在窗體中添加一個名稱為 Command1 的命令按鈕,然后編寫如下程序:
Private Sub s (By Val p As lnteger )
p=p*2
End Sub
Private Sub Command1_Click()
Dim i As Integer
i=3
Call s(i)
If i>4 Then i=i^2
MsgBox i
End Sub
窗體打開運行后,單擊命令按鈕,則消息框的輸出結果為 【 12 】 。
第9題
在窗體上畫一個命令按鈕,然后編寫如下事件過程。 Private Sub Command1_Click() Dim m As Integer, n As Integer, p As Integer m=3: n=5:p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序運行后,如果單擊命令按鈕,則在窗體上顯示的內容是
A.4
B.6
C.8
D.10
第10題
在窗體上畫一個命令按鈕,然后編寫如下事件過程: Private Sub Commandl_Click() Dim m As Integer, n As Integer, p As Integer m=3: n=5: p=0 Call Y(m, n, p) Print Str(p) End Sub Sub Y(ByVal i As Integer, ByVal j As Integer, k As Integer) k=i+j End Sub 程序運行后,如果單擊命令按鈕,則在窗體上顯示的內容是()
A.4
B.6
C.8
D.10
為了保護您的賬號安全,請在“上學吧”公眾號進行驗證,點擊“官網服務”-“賬號驗證”后輸入驗證碼“”完成驗證,驗證成功后方可繼續查看答案!