人妻巨大乳hd免费看,久久久久久夜精品精品免费啦 ,亚洲乱码国产乱码精品精

^{<small id="16116"></small>}

^{<var id="16116"></var>}

單項(xiàng)選擇題 對(duì)窗體編寫如下事件過程：
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
程序運(yùn)行后，如果單擊鼠標(biāo)右鍵，則輸出結(jié)果為（）

A.AAAAA
B.BBBBB
C.AAAAA CR BBBBB（其中CR表示回車和換行）
D.BBBBB CR AAAAA

點(diǎn)擊查看答案

您可能感興趣的試卷

你可能感興趣的試題

1.填空題為了改變計(jì)時(shí)器控件的時(shí)間間隔，應(yīng)該修改該控件（）屬性。

參考答案：Interval

2.單項(xiàng)選擇題設(shè)在菜單編輯器中定義了一個(gè)菜單項(xiàng)，名為menu1。為了在運(yùn)行時(shí)隱藏該菜單項(xiàng)，應(yīng)使用的語(yǔ)句是（）

A.menu1.Enabled=True
B.Munu1.Enabled=False
C.Menu1.Visible=True
D.Menu1.Visible=False

點(diǎn)擊查看答案

3.單項(xiàng)選擇題 在窗體上畫一個(gè)命令按鈕，名稱為Command1。程序運(yùn)行后，如果單擊命令按鈕，則顯示一個(gè)輸入對(duì)話框，在該對(duì)話框中輸入一個(gè)整數(shù)，并用這個(gè)整數(shù)作為實(shí)參調(diào)用函數(shù)過程F1。對(duì)下面程序說法正確的是（）
Private Sub Command1_Click（）
x=InputBox（"請(qǐng)輸入整數(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

點(diǎn)擊查看答案

4.單項(xiàng)選擇題 設(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
程序運(yùn)行后，單擊窗體，則在窗體上顯示的是（）

A.4321
B.5432
C.6543
D.7654

點(diǎn)擊查看答案

5.單項(xiàng)選擇題 在窗體上畫一個(gè)名稱為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
程序運(yùn)行后，單擊命令按鈕，窗體上顯示的是（）。（其中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

點(diǎn)擊查看答案