1．函數Mid（“123456789”，3，4）的值是?（ ）。
A） "3456 " B） "456 " C）3456 D）456
2．下面變量名不合法的是（ ）。
A）a2(2，4) B）abcd C）a$x D）CdE
3．下列表達式中，正確的Visual Basic表達式是（ ）。
A）2sin45° B）π*R2 C）x÷y×5 D）（x+1）/（x^2+1）/2
4．下面邏輯表達式的值為真的是（ ）。
A） "A "> "a " B） "9 "> "a " C） "That "> "Thank " D)12> 12.1
5．執行“PRINT 18/2*3，-3^2”命令後，屏幕顯示情況為（ ）。
A）3 9 B）3 -9
C）27 -9 D）27，-9
6．執行“PRINT 9.4\3.7，9.4MOD3.7”命令後屏幕顯示為（ ）。
A）2 1 B）3 0
C）2 20 D）1 2
7．下面程序輸出的結果是（ ）。
X=2^ -2
Print X
End
A）-4 B）0.25 C）4 D）程序錯誤
8．運行下面的程序後，Z的結果是（ ）。
X = -36.7
Y = 4
Z = INT(X) MOD Y
Print Z
End
A）0 B）1 C）-1 D）-9
9．在Visual Basic中，字符串常量所使用的定界符是（ ）。
A）雙引號 B）單引號 C）方括號 D）花括號
10．窗體裏有兩個對象，分別是圖片框Picture1和標簽Label1。那麽下面關於Print方法的使用中，錯誤的壹條（ ）。
A）Picture1.print 147 B）Print 147
C）Printer.Print 147 D）Label1.Print 147
11．執行下面程序的輸出結果是（ ）。
a = -3 ^ 2
b = 2 ^ 3
Print a> b
A）True B）-1 C）0 D）False
12．閱讀下面的程序：
n1 = InputBox（ "請輸入第壹個數： "）
n2 = InputBox（ "請輸入第二個數： "）
Print n1+n2
當輸入分別為111和222時，程序輸出為（ ）。
A）111222 B）222 C）333 D）程序出錯
13．語句Print“25*40”輸出的結果是（ ）。
A）“25*40” B）出現錯誤信息 C）25*40 D）1000
14．對於語句IF X=0 THEN Y=10，說法正確的是（ ）。
A）語句中有兩個等於符號
B）語句中有兩個賦值符號
C）語句中第壹個是等於符號，第二個是賦值符號
D）語句中第壹個是賦值符號，第二個是等於符號
15．執行下面的4個打印語句，將出錯的是（ ）。
A）PRINT a=3+5 B）PRINT“a=”；3+5
C）PRINT“a=3+5” D）PRINT a=；3+5
16．可以用來設置窗體最小化時所顯示的圖表的屬性是（ ）。
A）MinButton B）MaxButton C）ControlBox D）Icon
17．將命令按鈕的（ ）屬性設置為True後，就可以按回車鍵觸發其Click事件。
A）Cancel B）OK C）Enabled D）Default
18．下面關於文本框的說法中，錯誤的說法是（ ）。
A）Text1.Caption=“Hello”，是將在文本框Text1中顯示的Hello
B）Text.locked=True，設置該文本框Text1不能編輯
C）Text.passwordChar=“#”，設置文本框Text1輸入的字符都顯示為#，但實際接收的還是輸入的內容
D）Text1.Visible=False，設置該文本框Text1為不可見
19．有如下程序，運行時從鍵盤輸入字符“-”，輸出結果是 （ ）。
Op$ = InputBox(“op=”)
If op$ = “+” Then a = a + 2
If op$ = “-“ Then a = a – 2
Print a
A) -2 B）0 C）+2 D）+0
20．設a=1、b=2、c=3、d=4，則表達式IIf（a <b,a,IIf(c <d,a,d)）的結果為（ ）。
A）4 B）3 C）2 D）1
21．定義有5個整數型元素的數組，正確的語句是（ ）。
A）Dim a(4)As Integer B）Option Base 1: Dim a(5)
C）Dim a&(5) D）Dime a(5)As Integer
22．下面的4個數組說明語句語法正確的是（ ）。
A）Dim a[10] B）Def fn(10) C）Dim a(10) D）Dimension a(10)
23．以下對Visual Basic的Sub過程的有關描述中，正確的是（ ）。
A）調用子過程時，只能把實參的值傳送給形參，形參的值不能傳送給實參
B）子過程既可以嵌套定義，又可以遞歸調用
C）子過程沒有返回值
D）具有調用關系的所有過程必須放在同壹個模塊中
24．在窗體上畫壹個文本框，然後編寫如下事件過程：
Private Sub Text1_KeyPress(KeyAscii As Integer)
Dim char as String
Char=Chr (KeyAscii)
KeyAscii=Asc(UCase (char))
Text1.Text=String (5,KeyAscii)
End Sub
程序運行後，如果在鍵盤上輸入字母“e”，則文本框中顯示的內容為（ ）。
A）eeeee B)EEEEE C）eeeeee D）EEEEEE
25．在用Open語句打開文件時，如果省略“For方式”，則打開的文件的存取方式是（ ）。
A）順序輸入方式 B）順序輸出方式 C）隨機存取方式 D）二進制方式
26．假定有壹個菜單項，名為MenuItem，為了在運行時使該菜單項失效（變灰），應使用的語句為（ ）。
A）MenuItem.Enabled=False B）MenuItem.Enabled=True
C）MenuItem.Visible=True D）MenuItem.Visible=False
27．在Visual Basic中要設置菜單項的快捷訪問鍵，應使用的符號是（ ）。
A）* B）@ C）& D）$