您可能感興趣的試卷
你可能感興趣的試題
對窗體編寫如下事件過程:
Private Sub Form_MouseDown(Button As Integer,Shif tAs Integer,X As Single Y As Single)
If Button=2 Then
Print "AAAAA"
End If
End Sub
Private Sub Form_MouseUp(Button As Integer,Shift As Integer,X As Single,Y As Single)
Print "BBBBB"
End Sub
程序運行后,如果單擊鼠標右鍵,則輸出結(jié)果為()
A.AAAAA
B.BBBBB
C.AAAAA CR BBBBB(其中CR表示回車和換行)
D.BBBBB CR AAAAA
A.menu1.Enabled=True
B.Munu1.Enabled=False
C.Menu1.Visible=True
D.Menu1.Visible=False
在窗體上畫一個命令按鈕,名稱為Command1。程序運行后,如果單擊命令按鈕,則顯示一個輸入對話框,在該對話框中輸入一個整數(shù),并用這個整數(shù)作為實參調(diào)用函數(shù)過程F1。對下面程序說法正確的是()
Private Sub Command1_Click()
x=InputBox("請輸入整數(shù)")a=F1(Val(x))
Print a
End Sub
Function F1(ByRef b As Integer)
If b Mod 2=0 Then
F1=0
Else
F1=1
End If
End Function
A.在F1中判斷所輸入的整數(shù)是否是奇數(shù),如果是奇數(shù),過程F1返回1,否則返回0
B.在F1中判斷所輸入的整數(shù)是否是奇數(shù),如果是奇數(shù),過程F1返回0,否則返回1
C.在F1中判斷所輸入的整數(shù)是否是偶數(shù),如果是偶數(shù),過程F1返回1,否則返回0
D.在F1中判斷所輸入的整數(shù)是否是偶數(shù),如果是偶數(shù),過程F1返回0,否則返回1
設(shè)有如下程序:
Private Sub Command1_Click()
Dim a
Dim I As Integer
a=Array(1,2,3,4,5,6,7,8,9)
For I=0 To 3
Print a(5-I);
Next I
End Sub
程序運行后,單擊窗體,則在窗體上顯示的是()
A.4321
B.5432
C.6543
D.7654
在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下程序:
Private Sub Command1_Click()
Dim I As Integer,j As Integer
Dim a(10,10)As Integer
For I=1 To 3
For j=1 To 3
a(I,j)=(I-1)*3+j
Print a(I,j);
Next j
Print
Next i
End Sub
程序運行后,單擊命令按鈕,窗體上顯示的是()。(其中CR表示回車和換行)
A.1 2 3 CR 3 4 5 CR 5 6 7 CR
B.2 3 4 CR 4 5 6 CR 7 8 9 CR
C.1 4 7 CR 4 5 8 CR 9 10 11 CR
D.1 2 3 CR 4 5 6 CR 7 8 9 CR
在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕,然后編寫如下事件過程:
Private Sub Command1_Click()
Dim array1(10,10)As Integer
Dim I,j As Integer
For I=1 To 3
For j=2 To 4
array1(I,j)=I+j
Next j
Next I
Text1.Text=array1(2,3)+array1(3,4)
End Sub
程序運行后,單擊命令按鈕,在文本框中顯示的值是()
A.12
B.13
C.14
D.15
在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕,然后編寫如下事件過程:
Private Sub Command1_Click()
Dim c As Integer,n As Integer
For c=0 To 50
c=c+3
n=n+1
Ifc>10Then Exit For
Next c
Text1.Text=Str(n)
End Sub
程序運行后,單擊命令按鈕,在文本框中顯示的值是()
A.2
B.3
C.4
D.5
在窗體上畫兩個名稱分別為Text1、Texte2的文本框和一個名稱為Command1的命令按鈕,然后編寫如下事件過程:
Private Sub Command1_Click()
Dim x As Integer,n As Integer
x=1
n=0
DoWhilex<20
x=x*3
n=n+1
Loop
Text1.Text=Str(x)
Text2.Text=Str(n)
End Sub
程序運行后,單擊命令按鈕,在兩個文本框中顯示的值分別是()
A.15和1
B.27和3
C.195和3
D.600和4
表達式:5+10 mod 10\9/3+2^2 的結(jié)果為()
A.6
B.7
C.8
D.10
最新試題
如果想要將對象引用賦給變量或?qū)傩?,則不能使用賦值語句,而必須使用()語句。
在VB中,數(shù)組的維數(shù)最為()數(shù)組維數(shù)增加將使內(nèi)存急劇增加。
當(dāng)聲明過程時,如參數(shù)前有()關(guān)鍵字表示參數(shù)是可選的,()關(guān)鍵字表示該參數(shù)是按值傳遞,()關(guān)鍵字表示該參數(shù)按地址傳遞,()關(guān)鍵字表示可提供任意數(shù)目的參數(shù)。
數(shù)組默認下標政界為(),假如希望下標從1開始,則應(yīng)通過()語句來設(shè)置。
創(chuàng)建動態(tài)數(shù)組通常分為兩步:首先然窗體模塊、標準模塊或過程中,使用()語句來聲明一個沒有下標的數(shù)組,然后在過程中使用()語句定義帶下標的數(shù)組。
在VB中,使用()激活錯誤捕獲功能,并將錯誤處理程序指定為從行號位置開始的程序段。
()傳遞參數(shù)是VB過程中參數(shù)的默認傳遞方式。
在VB中,過程分為()過程和()過程。
除法(/)運算的結(jié)果為(),整除(、)的運算結(jié)果為(),小數(shù)部分將直接被省略。()用于求余數(shù)。
在VB中,可以使用()語句來調(diào)用過程。