vb選擇題及答案

1、30104. 下列敘述錯誤的是（ ）。 (A) VB應用程序沒有明顯的開始和結束語句 (B) VB控件的所有屬性值均可在屬性窗口中設置 (C) VB是事件驅動型可視化編程工具 (D) VB通過"工具"菜單的"選項"設置代碼編輯窗口的字體大小 (答案：B) 30105. 標準模塊文件的擴展名是（ ）。 (A) .cls (B) .frm (C) .bas (D) .rec (答案：C) 30106. 下列敘述錯誤是（ ）。 (A) 打開一個工程文件，系統(tǒng)自動裝入與該工程有關的文件 (B) 保存VB程序時，應分別保存窗體和工程文件 (C) 事件可以由用戶觸發(fā)

2、，也可以由系統(tǒng)觸發(fā) (D) VB應用程序只能以解釋方式執(zhí)行 (答案：D) 30108. 下列敘述錯誤的是（ ）。 (A) VB是可視化程序設計語言 (B) VB采用事件驅動編程機制 (C) VB是面向過程的程序設計語言 (D) VB應用程序可以以編譯方式執(zhí)行 (答案：C) 30109. 下列敘述正確的是（ ）。 (A) VB的事件由用戶定義 (B) VB程序以順序方式執(zhí)行 (C) VB程序從Main()函數開始執(zhí)行 (D) VB運行時，總是等待事件的發(fā)生 (答案：D) 30201. 下列為整型變量的是（ ）。 (A) x! (B) x# (C) x% (D) x$ (答案：C) 30202.

3、設有語句組： Dim S1 As String*5 S1 = "VB Test"則S1的值為（ ）。 (A) VB Test (B) VB Te (C) VBTes (D) BTest (答案：B) 30203. 下列（ ）是合法的變量名。 (A) x_y (B) x-y (C) 2x (D) and (答案：A) 30204. 下列（ ）為單精度變量。 (A) x! (B) x# (C) x% (D) x$ (答案：A) 30205. 由（ ）關鍵字聲明的局部變量在整個程序運行時一直存在。 (A) Dim (B) Public (C) Static (D) Private

4、 (答案：C) 30206. 定義變量時如不指定類型，該變量為（ ）變量。 (A) Integer (B) String (C) Variant (D) Single (答案：C) 30208. 下列（ ）是合法的變量名。 (A) x%y (B) xy% (C) 2x (D) Or (答案：B) 30209. 日期常量用（ ）作為界定符。 (A) " (B) % (C) # (D) & (答案：C) 30304. 設a=6，b=5，c=-2；執(zhí)行語句Print a > b > c后，窗體上顯示的是（ ）。 (A) 1 (B) True (C) False (D)

5、出錯信息 (答案：B) 30305. 下列表達式中，值最大的是（ ）。 (A) 2 3 (B) 2 / 3 (C) 2 mod 3 (D) 3 mod 2 (答案：C) 30306. 下列運算符中，優(yōu)先級最低的是（ ）。 (A) * (B) (C) / (D) (答案：D) 30307. 表達式 2 = 3 < 1 的是（ ）。 (A) 0 (B) 1 (C) True (D) False (答案：C) 30308. x大于0且小于10的VB表達式是（ ）。 (A) 0 < x < 10 (B) x > 0 And x < 10 (C) x > 0 Or x

6、 < 10 (D) x > 0 : x < 10 (答案：B) 30309. 判斷整型變量x是奇數的表達式是（ ）。 (A) x Mod 2 <> 0 (B) x Mod 2 != 0 (C) x Mod 2 0 (D) x Mod 2 0 (答案：A) 30401. 返回值為數值的函數是（ ）。 (A) Mid (B) Instr (C) Left (D) Rtrim (答案：B) 30402. 表達式Len("AB52")的值是（ ）。 (A) 0 (B) 4 (C) 6 (D) 8 (答案：B) 30404. 返回值為字符串的函數是（ ）

7、。 (A) Str (B) Val (C) Len (D) Asc (答案：A) 30405. 當x=0時，函數IIf(x > 0, 1, IIf(x < 0, -1, 0)的返回值是（ ）。 (A) 0 (B) 1 (C) -1 (D) 出錯 (答案：A) 30407. 如果Sgn(x)的值為-1，整型變量x的值是（ ）。 (A) 0 (B) 整數 (C) 正整數 (D) 負整數 (答案：D) 30409. 除去字符串左側空格的函數是（ ）。 (A) Left() (B) Trim() (C) Ltrim() (D) LeftTrim() (答案：C) 30502. 下列語句不合

8、法的是（ ）。 (A) x = 1 : y=2 (B) ? x ; y ; (C) ? x , y , (D) x = 1; y = 2 (答案：D) 30503. 如果VB語句超過一行，可以使用空格加（ ）續(xù)行。 (A) - (B) + (C) ； (D) _ (答案：D) 30504. 正確使用Cls方法的是（ ）。 (A) Text1.Cls (B) Picture1.Cls (C) List1.Cls (D) Image1.Cls (答案：B) 30506. 錯誤使用Print方法的是（ ）。 (A) Picture1.Print (B) Form1.Print (C) Debug.P

9、rint (D) Text1.Print (答案：D) 30507. Print方法分區(qū)輸出時，用（ ）分隔多個表達式。 (A) 空格 (B) 逗號 (C) 冒號 (D) 分號 (答案：B) 30509. 下列敘述錯誤的是（ ）。 (A) 不允許使用行號與標號 (B) 單條語句可分行書寫 (C) 同一行上可以書寫多條語句 (D) VB代碼不區(qū)分字母的大小寫 (答案：A) 30601. 執(zhí)行x = InputBox("請輸入半徑",0,"求面積") ，在輸入框中輸入3后回車,則下列敘述正確的是（ ）。 (A) x的值是數值3 (B) x的值是字符"

10、;3" (C) 0是默認值 (D) 對話框標題是"求面積" (答案：B) 30602. 執(zhí)行x = MsgBox("數據類型不匹配",1,"出錯提示!") ，然后單擊消息框的"取消"按鈕，x的值是（ ）。 (A) True (B) False (C) 1 (D) 2 (答案：D) 30608. 下列程序運行時,消息框顯示的內容是（ ）。Private Sub Command1_Click() MsgBox CStr(123 + 321) End Sub (A) 444 (B) 123321 (C) 123

11、+321 (D) 顯示出錯信息 (答案：A) 30609. 窗體上有一個命令按鈕Command1，編寫如下事件過程：Private Sub Command1_Click() x = InputBox("x=") y = InputBox("y=") Print x + y End Sub運行后，單擊命令按鈕，先后在兩個輸入對話框中輸入123和321，窗體顯示的內容是（ ）。 (A) 444 (B) 123321 (C) 123+321 (D) 出錯信息 (答案：B) 30703. 下列敘述正確的是（ ）。 (A) 窗體的Name屬性可以為空 (B) 窗體

12、的Name屬性定義窗體的名稱 (C) 可以在運行期間改變窗體的Name屬性 (D) 窗體的Name屬性的值顯示在窗體標題欄中 (答案：B) 30704. 設置窗體的（ ）屬性可改變窗體標題。 (A) Caption (B) Name (C) BackColor (D) BorderStyle (答案：A) 30706. 一個工程含有多個窗體及標準模塊，下列敘述錯誤的是（ ）。 (A) 如果工程含Sub Main過程，程序首先執(zhí)行該過程 (B) 任何時刻最多只有一個窗體是活動窗體 (C) 標準模塊不能設置為啟動模塊 (D) Hide方法只是隱藏而不從內存中清除窗體 (答案：A) 30708. 下

13、列描述錯誤的是（ ）。 (A) 窗體的Load事件在加載窗體時發(fā)生 (B) 窗體的Height、Width屬性用于設置窗體的高和寬 (C) 執(zhí)行Unload Form1語句后，窗體仍在內存中但不可見 (D) 當窗體的Enabled屬性為False時，對窗體的操作都被禁止 (答案：C) 30801. 下列敘述錯誤的是（ ）。 (A) 標簽和文本框都有Caption屬性 (B) 標簽和文本框的主要區(qū)別在于能否編輯其內容 (C) 標簽具有AutoSize屬性，而文本框沒有 (D) 文本框具有ScrollBar屬性，而標簽沒有 (答案：A) 30802. 能清除文本框Text1中內容的語句是（ ）。

14、(A) Text = "" (B) Text1.Text = "" (C) Text1.clear (D) Text1.Cls (答案：B) 30804. 下列敘述錯誤的是（ ）。 (A) 標簽和文本框都有Move方法 (B) 標簽和文本框都有Text屬性 (C) 標簽具有Caption屬性，而文本框沒有 (D) 文本框具有Locked屬性，而標簽沒有 (答案：B) 30805. 下列控件屬性賦值語句錯誤的是（ ）。 (A) Label1 = "歡迎" (B) Text1.Text = "歡迎" (C) Text1

15、 = "歡迎" (D) Text = "歡迎" (答案：D) 30806. 設置標簽Label1的（ ）屬性使它不可見。 (A) Label1.Visible = 0 (B) Label1.Visible = 1 (C) Label1.Visible = True (D) Label1.Visible = False (答案：D) 30807. 設置標簽的（ ）屬性，可改變其文字對齊方式。 (A) Justify (B) Font (C) Alignment (D) 以上都不是 (答案：C) 30901. 設置圖像框的（ ）可使框內的圖片按圖像框大小自動

16、調整。 (A) AutoSize屬性為True (B) AutoSize屬性為False (C) Stretch屬性為True (D) Stretch屬性為False (答案：C) 30903. 將當前目錄下的圖形文件Clock.jpg裝入圖片框Picture1的語句是（ ）。 (A) Picture = "Clock1.jpg" (B) Picture = LoadPicture("Clock1.jpg") (C) Picture1.Picture = "Clock1.jpg" (D) Picture1.picture = Load

17、Picture("Clock1.jpg") (答案：D) 30907. 設置圖片框的（ ）使其按圖片尺寸自動調整大小。 (A) AutoSize屬性為True (B) AutoSize屬性為False (C) Stretch屬性為True (D) Stretch屬性為False (答案：A) 31001. 復選框的Value屬性為0表示（ ）。 (A) 復選框未被選中 (B) 復選框被選中 (C) 復選框內有灰色的鉤 (D) 操作出錯 (答案：A) 31002. 單選按鈕被選定時，其Value屬性為（ ）。 (A) 1 (B) 0 (C) True (D) False (答

18、案：C) 31004. 下列（ ）語句使復選框Check1無效。 (A) Check1.Value = 1 (B) Check1.Value = 2 (C) Check1.Style = 1 (D) Check1.Style = 0 (答案：B) 31006. 下列（ ）語句設置單選按鈕Option1為選中狀態(tài)。 (A) Option1.Value = 0 (B) Option1.Value = True (C) Option1.Value = 1 (D) Option1.Value = False (答案：B) 31007. 復選框和單選按鈕的（ ）屬性可以反應其當前狀態(tài)。 (A) Valu

19、e (B) Checked (C) Caption (D) Selected (答案：A) 31009. 要取得復選框的狀態(tài)，應訪問（ ）屬性。 (A) Value (B) Checked (C) Visible (D) Enabled (答案：A) 31105. 下列（ ）方法不能觸發(fā)命令按鈕的Click 事件。 (A) 在程序運行時單擊命令按鈕 (B) 在代碼中設命令按鈕的Value屬性為True (C) 在設計時設命令按鈕的Default屬性為True，運行時按ESC鍵 (D) 使用Tab鍵把焦點移到按鈕上，然后按空格鍵或回車鍵 (答案：C) 31106. 下列描述錯誤的是（ ）。 (A

20、) 單擊命令按鈕可觸發(fā)MouseDown事件 (B) 單擊命令按鈕可觸發(fā)MouseUp事件 (C) 命令按鈕支持單擊事件 (D) 命令按鈕支持雙擊事件 (答案：D) 31108. 執(zhí)行（ ）語句，可使窗口的按鈕Command1上顯示“確定”。 (A) Command1.Show = "確定" (B) Command1.Caption = "確定" (C) Command1.Name = "確定" (D) Command1.Visible = "確定" (答案：B) 31202. 下列（ ）控件結合了文本框和列表框的

21、特性。 (A) 圖片框 (B) 圖像框 (C) 組合框 (D) 標簽 (答案：C) 31204. 引用列表框List1被選中項數據應使用（ ）。 (A) List1.list (B) List1.listCount (C) List1.Index (D) List1.Text (答案：D) 31205. 使用（ ）語句將"北京奧運"添加到列表框List1的首相。 (A) List1.Text = "北京奧運" (B) List1.AddItem "北京奧運" (C) List1.List(0) = "北京奧運" (

22、D) List1.AddItem "北京奧運",0 (答案：D) 31206. 使用（ ）方法可以只刪除列表框指定項目。 (A) Cls (B) Clear (C) Remove (D) RemoveItem (答案：D) 31207. 用（ ）方法可將項目添加到組合框中。 (A) List (B) ListIndex (C) Add (D) AddItem (答案：D) 31301. 計時器控件以一定時間間隔觸發(fā)（ ）事件。 (A) Enabled (B) Interval (C) Timer1 (D) Timer (答案：D) 31303. 拖動滾動條中的滑塊將觸發(fā)滾動

23、條的（ ）事件。 (A) Slide (B) Scroll (C) DragOver (D) DragDrop (答案：B) 31306. 單擊滾動條兩端的箭頭可觸發(fā)滾動條的（ ）事件。 (A) Change (B) Scroll (C) DragOver (D) ItemCheck (答案：A) 31401. 使用（ ）方法將焦點移到某個控件上。 (A) SetFocus (B) GotFocus (C) Move (D) Refresh (答案：A) 31405. 對文本框Text1編寫如下事件過程： Private Sub Text1_KeyPress(KeyAscii As Integ

24、er) Dim b As String b = Chr(KeyAscii) KeyAscii = Asc(UCase(b) End Sub運行時，下列敘述正確的是（ ）。 (A) Text1中無法輸入字符 (B) Text1中內容為"b" (C) Text1中輸入的字符都變?yōu)榇髮?(D) Text1中輸入的字符都被轉換成ASCII碼 (答案：C) 31406. 下列敘述錯誤的是（ ）。 (A) 在KeyDown事件中，鍵盤上輸入的A或a被視作相同的字母 (B) 在KeyUp事件中，鍵盤上的"1"和右側小鍵盤上的"1"視作不同的數字 (

25、C) 只有獲得焦點的對象才能夠接受鍵盤事件 (D) KeyPress事件中可以識別鍵盤上某個鍵的按下與釋放 (答案：D) 31409. 要使用自定義的鼠標指針，必須將MousePointer屬性設置為（ ）。 (A) 0 (B) 15 (C) 3 (D) 99 (答案：D) 31501. 下列求兩數中最小數的程序段不正確的是（ ）。 (A) If x < y Then Min = x Else Min = y (B) Min = IIf(x < y，x，y) (C) Min = x : If y < = x Then Min = y (D) If y < = x The

26、n Min = y : Min = x (答案：D) 31502. 下列程序段的執(zhí)行結果是（ ）。 x = 3 : y = 5 : z = 9 x = x + y y = x - y If x - y > z - x Then z = x + y If x + y > z - y Then x = z + y Print x, y, z (A) 3 5 9 (B) 14 3 11 (C) 8 3 11 (D) 8 5 9 (答案：B) 31503. 窗體上有一個命令按鈕Command1，編寫如下事件過程： Private Sub Command1_Click() Sum = 0 F

27、or m = 1 To 3 Select Case m Case 1 a = 1 Case 2 a = 2 Case 3 a = 3 End Select Print a, Sum = Sum + a Next m Print Sum End Sub運行時，單擊按鈕，輸出結果是（ ）。 (A) 3 3 3 9 (B) 3 2 1 6 (C) 1 1 1 3 (D) 1 2 3 6 (答案：D) 31504. 窗體上有一個命令按鈕Command1，編寫如下事件過程： Private Sub Command1_Click() a = 80: b = 50: c = 30 If a < b O

28、r b > c Then b = c If b = c And a < c Then a = a - 30 If a = b And b > c Then c = a + b Print a, b, c End Sub運行時，單擊按鈕，窗體輸出的結果是（ ）。 (A) 80 50 30 (B) 80 30 30 (C) 50 30 80 (D) 50 30 30 (答案：B) 31505. 執(zhí)行下列程序段后，x的值是（ ）。 n = 5: x = 1: i = 1 Do x = x * i i = i + 1 Loop While i < n (A) 10 (B) 15

29、 (C) 24 (D) 120 (答案：C) 31509. 如果x小于y的平方，則在窗體上輸出"OK"。完成該要求的單行條件語句是（ ）。 (A) If x < y 2 Then "OK" (B) If x < y 2 Then Show "OK" (C) If x < y 2 Then Print "OK" (D) If x < y 2 Then Put "OK" (答案：C) 31602. 閱讀下列程序段： x = 0 For i = 1 To 4 For j = 1

30、 To i x = x + 1 Next j, i執(zhí)行以上循環(huán)后，x 的值為（ ）。 (A) 6 (B) 9 (C) 10 (D) 16 (答案：C) 31604. 執(zhí)行下列程序段后輸出的結果是（ ）。 s = 1 For i = 1 To 3 For j = 0 To i-1 s = s + s * j Next j ? s; Next I (A) 1 2 (B) 2 1 (C) 2 2 12 (D) 1 2 12 (答案：D) 31605. 閱讀下列程序段： m = 0 For i = 1 To 3 For j = 1 To i m = m + j Next j, i執(zhí)行以上的循環(huán)后，i和

31、m的值分別為（ ）。 (A) 3 6 (B) 3 10 (C) 4 6 (D) 4 10 (答案：D) 31606. 運行下列程序段，其中“n=n+1”語句被執(zhí)行的次數是（ ）。 Dim m%, n% For m = 1 To 3 For n = 1 To 6 Step 2 n = n + 1 Print n Next Next (A) 3 (B) 6 (C) 9 (D) 18 (答案：B) 31701. 在通用聲明中給出Option Base 1語句，則數組a包含（ ）個元素。 Dim a(3, -2 To 1, 5) (A) 120 (B) 75 (C) 60 (D) 13 (答案：C)

32、31704. 如下數組聲明語句中數組a包含的元素個數為（ ）。 Dim a(3, -2 To 1, 5) (A) 96 (B) 75 (C) 60 (D) 13 (答案：A) 31706. 運行下列程序，單擊窗體后輸出的結果是（ ）。 Private Sub Form_Click() Dim a Dim s As Integer, i As Integer a = Array(1, 2, 3, 4, 5, 6) s = 1 For i = 5 To 1 Step -2 s = s * a(i) Next i Print s End Sub (A) 15 (B) 48 (C) 120 (D) 7

33、20 (答案：B) 1工程文件的擴展名為 。A、.frx B、.bas C、.vbp D、.frm2以下4個選項中，屬性窗口未包含的是 。A、對象列表 B、工具箱 C、屬性列表 D、信息欄3下列不屬于對象的基本特征的是 。A、屬性 B、方法 C、事件 D、函數4在設計模式雙擊窗體中的對象后，Visual Basic將顯示的窗口是 。A、項目（工程）窗口 B、工具箱 C、代碼窗口 D、屬性窗口5Visual Basic中“程序運行”允許使用的快捷鍵是 。A、F2 B、F5 C、Alt+F3 D、F86改變控件在窗體中的上下位置應修改該控件的 屬性。A、Top B、Left C、Width D、R

34、ight7窗體模塊的擴展名為 。A、.exe B、.bas C、.frx D、.frm8窗體的FontName屬性的缺省值是 。A、宋體 B、仿宋體 C、楷體 D、黑體9FontSize屬性用以設置字體大小，窗體的FontSize屬性缺省值為 。A、5 B、9 C、12 D、1610在Visual Basic中，稱對象的數據為 。A、屬性 B、方法 C、事件 D、封裝11下列選項中不屬于事件的是 。A、Dblclick B、Load C、Show D、KeyUp12將Visual Basic編制的程序保存在磁盤上，至少會產生何種文件 。A、.doc與.txt B、.com與.exe C、.ba

35、t與.frm D、.vbp與.frm1Integer類型數據能夠表示的最大整數為 。A、275 B、215-1 C、216 D、216-12貨幣類型數據小數點后面的有效位數最多只有 。A、1位 B、6位 C、16位 D、4位3輸入對話框InputBox的返回值的類型是 。A、字符串 B、整數 C、浮點數 D、長整數4運算符“”兩邊的操作數若類型不同，則先 再運算。A、取整為Byte類型 B、取整為Integer類型C、四舍五入為整型 D、四舍五入為Byte類型5Int( Rnd * 100 ) 表示的是 范圍內的整數。A、0，100 B、1，99 C、0，99 D、1，1006下列程序段的輸出

36、結果是 。 a=10: b=10000: x=log(b)/log(a): Print "lg(10000)="x A、lg(10000)=5 B、lg(10000)=4 C、4 D、5 7返回刪除字符串前導和尾隨空格符后的字符串，用函數 。A、Trim B、Ltrim C、Rtrim D、mid 8Print語句的一個輸出表達式為 ，則輸出包括日期、時間信息。A、Date B、Month C、Time D、Now9. 語句Print "5*5" 的顯示結果是 。A、25 B、"5*5" C、5*5 D、出現錯誤提示10語句“Form

37、1.Print Tab(10);"#"”的作用是在窗體當前輸出行 。A、第10列輸出字符“#” B、第9列輸出字符“#”C、第11列輸出字符“#” D、輸出10個字符“#”1下列關于Select Case之測試表達式的敘述中，錯誤的是 。A、只能是變量名 B、可以是整型 C、可以是字符型 D、可以是浮點類型2下列關于Select Case的敘述中，錯誤的是 。A、Case 10 To 100 表示判斷Is是否介于10與100之間B、Case "abc","ABC" 表示判斷Is是否和"abc"、"ABC&

38、quot;兩個字符串中的一個相同C、Case "X" 表示判斷Is是否為大寫字母XD、Case -7,0,100 表示判斷Is是否等于字符串"-7，0，100"3由“For i=1 To 16 Step 3”決定的循環(huán)結構被執(zhí)行（ ）次。A、4 B、5 C、6 D、74若i的初值為8，則下列循環(huán)語句的循環(huán)次數為 次。 Do While i<=17 i=i+2 LoopA、3次 B、4次 C、5次 D、6次5由“For i=1 To 9 Step -3”決定的循環(huán)結構被執(zhí)行 次。A、4 B、5 C、6 D、06窗體通用部分的語句“Option Bas

39、e 1”，決定本窗體中數組下標界 。A、下界必須為1 B、缺省的下界為1 C、下界必須為0 D、缺省的下界為01標簽控件的標題和文本框控件的顯示文本的對齊方式由 屬性來決定。A、WordWrap B、AutoSize C、Alignment D、Style2將命令按鈕Command1設置為窗體的取消按鈕，可修改該控件的 屬性。A、Enabled B、Value C、Default D、Cancel3下列 屬性用來表示標簽或窗體的標題。A、Text B、Caption C、Left D、Name4將焦點主動設置到指定的控件或窗體上，應采用 方法。A、SetDate B、SetFocus C、Se

40、tText D、GetGata 5按Tab鍵時，焦點在各個控件之間移動的順序是由 屬性來決定的。A、Index B、TabIndex C、TabStop D、SetFocus6下列 屬性用來表示各對象（控件）的位置。A、Text B、Caption C、Left D、Name7當文本框的 屬性設置為True時，在運行時文本框不能編輯。A、Enabled B、Locked C、Visible D、MultiLine8要使文本框顯示滾動條，除了設置ScrollBars屬性外還必須設置 屬性。A、AutoSize B、MultiLine C、Alignment D、Visible9文本框控件Text

41、4的Text屬性默認值為 。A、Text4 B、"Text4" C、Locked D、Name10文本框中選定的內容，由下列 屬性來反映。A、SelText B、SelLength C、Text D、Caption11選中復選框控件時，Value屬性的值為 。A、True B、False C、0 D、112要使復選框控件不響應Click事件，可設置復選框的 屬性。A、Appearance B、Style C、Enabled D、TabIndex13若要在同一窗體中安排兩組單選鈕，可用 控件予以分隔。A、文本框 B、框架 C、列表框 D、組合框14列表框的 屬性返回或設置列表

42、框中各列表項的文本。A、Selected B、List C、Text D、Caption15List1.Clear中的Clear是 。A、方法 B、對象 C、屬性 D、事件16以下 語句將刪除列表框List1中的最后一項。A、List1.RemoveItem List1.ListCount B、List1.ClearC、List1.List(List1.ListCount-1)= "" D、List1.RemoveItem List1.ListCount-117若要把"XXX"添加到列表框List1中的第三項，則可執(zhí)行語句 。A、List1.AddItem "XXX", 3 B、List1.AddItem