21.確定一個控件在窗體上的位置的屬性是(C)(單)
A.Width和Height
B.Width或Height
C.Top和Left
D.Top或Left
22.在窗體上畫一個名稱為Text1的文本框和一個名稱為Command1的命令按鈕,然后編寫如下事件過程:
Private Sub Command1_Click( )
Text1.Text = "Visual"
Me.Text1 = "Basic"
Text1 = "Program"
End Sub
程序運行后,如果單擊命令按鈕,則在文本框中顯示的是(C)(單)
A.Visual
B.Basic
C.Program
D.出錯
23.以下關(guān)系表達式中,其值為False的是(A)(單)
A."ABC">"AbC"
B."the"<>"they"
C."VISUAL"=UCase("Visual")
D."Integer">"Int"
24.語句Print int(5/4*6\5) Mod 2的輸出結(jié)果是(B)(單)
A.0
B.1
C.2
D.3
25.在窗體上畫一個文本框、一個標簽和一個命令按鈕,其名稱分別為Text1、Label1和Command1,然后編寫如下兩個事件過程:
Private Sub Command1_Click( )
strText = InputBox("請輸入")
Text1.Text = strText
End Sub
Private Sub Text1_Change( )
Label1.Caption = Right(Trim(Text1.Text), 3)
End Sub
程序運行后,單擊命令按鈕,如果在輸入對話框中輸入abcdef,則在標簽中顯示的內(nèi)容是(D)(單)
A.空
B.abcdef
C.abc
D.def
26.在窗體上畫一個名稱為Command1的命令按鈕,然后編寫如下事件過程:
Private Sub Command1_Click( )
x = -5
If x >0 Then
y = x ^ 2
Else
y = x
End If
Print y
End Sub
程序運行后,單擊命令按鈕,窗體上顯示的是(A)(單)
A.-5
B.25
C.1
D.-1
27.一個工程中含有窗體Form1、Form2和標準模塊Model1,如果在Form1中有語句Pubilc X As
Integer,在Model1中有語句Pubilc Y As Integer,則以下敘述中正確的是(A)(單)
A.變量X、Y的作用域相同
B.Y的作用域是Model1
C.在Form1的任何地方中可以直接使用Y
D.在Form2中可以直接使用X和Y
28.在窗體上畫一個名稱為Drive1的驅(qū)動器列表框,一個名稱為Dir1的目錄列表框。當改變當前驅(qū)動器時,目錄列表框應(yīng)該與之同步改變。設(shè)置兩個控件同步的命令放在一個事件過程中,這個事件過程是(A)(單)
A.Drive1_Change
B.Drive1_Click
C.Dir1_Click
D.Dir1_KeyPress
29.在窗體上畫一個命令按鈕(其NAME屬性為Command1),然后編寫如下代碼:
Option Base 1
Private Sub Command1_Click( )
Dim a
s = 0
a = Array(1, 2, 3, 4)
For I = 4 To 1 Step -1
s = s + a(I)
Next I
Print s
End Sub
運行上面的程序,單擊命令按鈕,其輸出結(jié)果是(D)(單)
A.4321
B.1234
C.34
D.10
30.在窗體上畫一個名稱為Text1的文本框,編寫以下代碼:
Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii < 65 Or KeyAscii> 90 Then
msgBox "請輸入大寫字母"
KeyAscii = 0
End If
End Sub
以下能說明該事件過程正確是(A)(單)
A.要求文本框只能接收大寫字母的輸入
B.要求文本框只能接收小寫字母的輸入
C.要求文本框只能接收數(shù)字的輸入
D.要求文本框只能接收65到90之間的數(shù)值的輸入
2015年全國職稱計算機考試教材(2007模 .. 定價:¥225 優(yōu)惠價:¥213 更多書籍 | |
全國職稱計算機考試速成過關(guān)系列套裝:W .. 定價:¥133 優(yōu)惠價:¥133.0 更多書籍 |