2022年VB練習題含答案

1、VB 練習題 含答案 VB 單元練習題一 一,選擇題 1, Visual Basic 集成開發(fā)環(huán)境中不包括以下哪些窗口？ D A , 工具箱窗口 B , 工程資源治理器窗口 C, 屬性窗口 D , 命令窗口 2, “一輛小客車在正常行進過程中被一輛大型貨車撞壞了” ,在這句話中 ,“客車” ,“小” ,“行進”與 “被 一輛大型貨車撞壞了”分別對象 Visual Basic 中的哪些術語？ B A , 對象,屬性,大事,方法 C, 屬性,對象,大事,方法 B , 對象,屬性,方法,大事 D , 屬性,對象,方法,大事 3,對象的特點與狀態(tài)特點稱為？ C A , 大事 B, 方法 C, 屬性 D

2、, 類 4,下面哪一個屬性用來標識對象的名稱？ D A , Caption B , Value C, Text D, Name 5,以下哪個符號就是合法的變量名 . A A , VB123 B , Abs C, 99Ji D , xy 6,數學式子 10sin25 o 寫成Visual Basic 表達式就是？ D A , 10sin25 B , 10*sin25 C, 10*sin25 o D , 10*sin25*3 , 14/180 7, Visual Basic 中不存在以下哪一種數據類型？ D A , 字符串類型 B, 日期類型 C, 規(guī)律類型 D , 指針類型 8,表達式 Left

3、 “Visual”,3+Lcase “AB ”的值就是？ C A , visAB B, VisAB C, Visab D , ualab D 9,表達式 6+10 Mod 4*2+1 的值就是？ A A , 9 B, 11 C, 1 D, 310,把數值型轉換為字符串型需要使用以下哪一種函數 . B A , Val B , Str C, Asc D, Chr 11,VB 中窗體文件的擴展名就是 ； B AVBP BFRM 對 CVBW DPDM 12,在設計應用程序時 ,通過窗口可以查瞧到應用程序工程中的全部組成部分； A 代碼窗口 B 窗體設計窗口 C屬性窗口 D工程資源治理器窗口 對 13

4、,在 VisualBasic 中 ,全部的窗體與控件都必定具有的一個屬性就是 ； AName 對 BFont CCaption DFillColor 14,對變量名說法不正確的就是 AC ； A 必需就是字母開頭 ,不能就是數字或其她字符 B 不能就是 VB 的保留字 C 可以包含字母,數字,下劃線與標點符號 對 D 不能超過 255 個字符 15,以下變量名中 AAbc901 , 就是不符合 VisualBasic 的命名規(guī)范的； B_mnu_Open_234 對 Cprice_ DK 第 1 頁,共 23 頁VB 練習題 含答案 16,在窗體上畫一個命令按鈕 名稱為 Command1, 然

5、后編寫如下大事過程 : PrivateSubCommand1_Click DimbAsInteger b=b+1 EndSub 運行程序 ,三次單擊命令按鈕后 ,變量 b 的值就是 : ； A0 B1 對 C2 D3 17,以下程序段的執(zhí)行結果為 ； X=5:Y=-20 If Not X0 Then X=Y-3 Else Y=X+3 Endif Print X-Y;Y-X A-3 3對 B5 8C3 3D25 25 18,當 x 為偶數時 ,就在窗體上顯示“偶數” ,否就顯示“奇數” ,不能實現(xiàn)該代碼段功能的就是 A if x2=x/2 then print 偶數 else print 奇數

6、B if x mod2=0 then print 偶數 else print 奇數 C if not x mod 20 then print 偶數 else print 奇數 Dif x2=intx/2 then print 偶數 else print 奇數 對 19,如要執(zhí)行以下程序段后窗體上顯示紅字 ,就 x 可取的值為 : Select case intx/10 case2,4,6,8 print 黃 case1,3,5,7,9 print 綠 case else print 紅 end select A27 B38 C10 D5 對 ； 20,在程序代碼中將圖片文件 mypic ,jp

7、g 裝入圖片框 Picture1 的語句就是 APicture1 , Picture=mypic , jpg BPicture1 , Image=mypic , jpg CPicture1 , Picture=LoadPicturemypic , jpg 對 DLoadPicturemypic , jpg ； 21,大部分控件都沒有的屬性就是 DInterval 對 ATop BName CEnabled 第 2 頁,共 23 頁22,以下屬于正確的字符串常量的就是 VB 練習題 含答 案 A#ABC B$ABC$ CABC DABC 對 23,設 a=8,b=10, 就以下表達式的值為真的就

8、是 A-3+5aandb0 Ba=bandb12 Cnotb0 Daborb0 對 24,語句 Z=y+1 代表 A 將變量 Z 存入變量 y 中 ,再加上 1 的表達式 B 變量 Z 取得 y+1 的值 對 C 變量 Z 取得變量 y 的值 ,然后再加上 1 的一個表達式 D 將變量 Z 存入變量 y+1 中 25,執(zhí)行下面的語句后 ,所產生的信息框的標題就是 ；A=MsgBoxAAAAA,3,BBBBB D 出錯 ,不能產生信息框 ； ABBBBB 對 BAAAAA C 空 26,執(zhí)行以下代碼 ,分別輸入 12 與 89,輸出結果就是 Private Sub Form_Click a=In

9、putBoxD b=InputBoxE Print a+b End Sub A101 BDE1289 CDE D1289 對 ； 27,為了暫時關閉計時器 ,應把該計時器的某個屬性設置為 False,這個屬性就是 AEnabled 對 BVisible CTimer DInterval 28,以下表達式 ,哪一個可以產生 1 到 6 之間的隨機整數 包括 1 與 6 ； AIntRnd*7 BIntRnd6+1 CIntRnd*6 DIntRnd*6+1 對 29,執(zhí)行以下程序 ,從鍵盤輸入 10,運行結果就是； PrivateSubCommand1_Click S=InputBox 請輸入一

10、個數字 : Select Case S Case Is0 Print 0 Case Is3 Print 3 Case Is5 Print 5 End Select End SubA0 對 B3 C5 D0 30. VB6 , 0 共有 3 個版本 ,它們分別就是 B A. 學習版,標準版與企業(yè)版 B. 學習版 ,專業(yè)版與企業(yè)版 C. 學習版,標準版與網絡版 D. 標準版,專業(yè)版與中文版 第 3 頁,共 23 頁31. VB 的集成開發(fā)環(huán)境中有 c A. 一種 B. 兩種 C. 三種 VB 練習題 含答 案 工作狀態(tài) D. 四種 B 32. VB6 , 0 的集成開發(fā)環(huán)境不包括 D A. 窗體窗

11、口 B. 工具箱 C. 代碼窗口 D. 過程窗口 33. VB6 , 0 集成開發(fā)環(huán)境有三種工作狀態(tài) ,不屬于三種工作狀態(tài)之一的就是 A. 設計狀態(tài) B. 編寫代碼狀態(tài) C. 運行狀態(tài) D. 中斷狀態(tài) 34. 用 VB 設計的應用程序 ,文件的擴展名中不含 D A. , Frx B. , Bas C. , Vbp D. , Form 35. 以下說法正確的就是 B A. 屬性窗口包括 :標題欄,對象名稱的單項按鈕,選項卡,屬性列表,屬性含義說明 B. 屬性窗口包括 : 標題欄,對象名稱的下拉列表,選項卡,屬性列表,屬性含義說明 C.屬性窗口包括 :菜單欄,對象名稱的單項按鈕,選項卡,屬性列表,

12、屬性含義說明 D. 屬性窗口包括 :菜單欄,對象名稱的下拉列表,選項卡,屬性列表,屬性含義說明 36.VB 中 ,強制變量聲明的語句就是 A ； Explicit Base 37. VB6 , 0 集成開發(fā)環(huán)境有三種工作狀態(tài) ,工作狀態(tài)顯示在 D ； A. 狀態(tài)欄的最左方 B. 狀態(tài)欄的最右方 C. 狀態(tài)欄的中括號內 D. 標題欄的中括號內 38. 在界面設計時 ,雙擊窗體中的對象后 ,VB 將顯示的窗口就是 B ； A. 馬上窗口 B. 代碼窗口 C. 屬性窗口 D. 項目 工程 窗口 39. 下述選項中 ,屬于 VB 的程序設計方法就是 B ； A. 面對對象,次序驅動 B. 面對對象,大

13、事驅動 C. 面對過程,大事驅動 D. 面對過程,次序驅動 集成開發(fā)環(huán)境中 ,功能鍵 F5 的功能就是D ； A. 進入幫忙窗口 B. 進入編輯狀態(tài) C. 進行上下窗口的切換 D. 運行程序 設計的應用程序 ,擴展名為, Vbp 的文件就是C ； A. 窗體文件 B. 類文件 C. 工程文件 D. 標準模塊文件 42.VB 設計的應用程序 ,擴展名為, Frm 的文件就是 A ； A. 窗體文件 B. 類文件 C. 工程文件 D. 標準模塊文件 43.用 VB 可視化程序設計語言設計應用程序的主要工作就是完成 B ； A. 設計流程與編寫代碼 B. 設計界面與編寫代碼 C. 設運算法與編寫代碼

14、 D. 設計程序與編寫代碼 44.在 VB 6 ,0 中 ,12345& 的數據類型就是 B A. 整數型 B. 長整數型 C. 字符常數 D. 雙精度常數 45.在 VB6 ,0 中 ,語句 Dim M1#,Abc,Xyz As Single 定義的 M1 , Abc 與 Xyz 的類型分別就是 D A. 雙精度,整數型,單精度 B. 雙精度,單精度,單精度 C.雙精度,整數型,整數型 D. 雙精度,可變類型,單精度 第 4 頁,共 23 頁VB 練習題 含答案 46.在 VB6 ,0 中 ,以下不正確的 Integer 型常數就是A ； A. 32768 B. 0 C. 037% D. 2

15、2222 47.在 VB6 ,0K ,12345678# 的類型就是 B ； A. 整數型 B.長整數型 C. 字符常數 D. 雙精度常數 6.在 VB6 , 0 中 ,合法的字符串常數就是 B ； A. ABC$ B.“ 3+4” C. ABC D. 3+4 48.方法 PRINT 2030 輸出結果就是 D； A. “ 2030” B.2030 C. 顯現(xiàn)錯誤信息 D. 0 49.假定 Bln1 就是規(guī)律型變量 ,下面賦值語句中正確的就是 D , A. Bln1= True B.Bln1= , True, C. Bln1=#True# D.Bln1=34 50.在以下運算符中 ,優(yōu)先級最低

16、的就是 C A. / B. C. Mod D. , 0 中,執(zhí)行下面的四個語句時顯現(xiàn)錯誤的就是 C A. x=SGN0 B. x=SQR1 C. x=LOG0 D. x=SIN1 6 , 0 表達式 COS0+ABS-1+INTRND1 的值就是 D A. 1 B. 1 C. 0 53.設 a 為整型變量 ,不能正確表達數學關系 6a15 的 VB6 , 0 表達式就是 A D A. 6a15 B. Nota=6 And a6 And a6 And Not a=15 54.骰子就是一個正六面體 ,用 16 這六個數分別代表這六面 ,擲一次骰子顯現(xiàn)的數可表示為 A. INTRND6+1 B.IN

17、TRND*6C. INTRND1*7 D.INTRND1*6+1 55.規(guī)律運算符 And,Or 與 Not 的優(yōu)先次序 ,從高到低就是C A. Or-And-Not C. Not-And-Or 56.運算 b 的自然對數使用的 Visual Basic 表達式就是A A. Logb B.Lgb C. Logeb D.Lgeb 57.方法 Print 28 Mod 15 輸出結果就是 D A. “28 Mod 15” B. 28 Mod 15 C. -13 58.已字母 A 的 ASCII 碼為十進制的 A. 6567 65,表達式 Asc “A ” +Asc “ C” 的值就是B 第 5 頁

18、,共 23 頁VB 練習題 含答C. “AC ” 案 59.如 X=5 , Y=6, 就表達式 X+Y=11 的值就是C A. X+Y=11 C. True 60.以下執(zhí)行語句后 ,V 的值就是B A$=” 54321 ” V=ValMid$A$,3,2 A. 43 C. 432 61.執(zhí)行以下語句后 ,E, F, G 的值分別就是B E=5:F=4:G=3 E=F:F=G:G=E A. 3 4 5 B. 4 3 4 C. 4 5 4 D. 4 5 5 62.m,n 就是整數 ,且 nm, 在下面四個語句中 ,能將 x 賦值為一個 mn 之間 含 m,n的任意整數 ,即中意 m=x=n 的就是

19、A D ； A. x=INTRND*n-m+1+m B.x=INTRND*n+m C. x=INTRND*m+n D.x=INTRND*n-m+m , 0 表達式 Log1+ABS-1+IntRnd1 的值就是 C A. -1 B. 0C. 1D. 2表達式 10-2 的值就是D A. 100 ,01 C. 100 D. 0, 01 , 0 表達式 LenLeft “ abcd” ,2+Right “濟南學院” ,2的值為B A. 2B. 4C. 6D. 866. Load 大事就是在窗體被裝入工作區(qū)時 D 觸發(fā)的大事； A. 用戶 B. 程序員 C. 手工 D. 自動 67. 修改控件屬性

20、,一般可以使用屬性窗口 ,也可以通過 D為屬性賦值； A. 命令 B. 對象 C. 方法 D. 代碼 68.下面就是窗體的四個屬性 ,在界面設計時 ,轉變屬性值就瞧不到窗體變化的屬性就是 A. Top B. Width C. Left 69.下D. Enabled 面四個選項 ,不就是大事的就是 B ； A. Load B. Enabled 第 6 頁,共 23 頁C. Unload D. DblClick ； VB 練習題 含答 案 70.以下表達正確的就是 A A. 窗體 名稱 屬性就是用來標識窗體的 B. 窗體 名稱 屬性的值顯示在窗體的標題欄中 C. 可以在運行期間轉變窗體的 名稱 D

21、. 窗體的 名稱 屬性值可以為空 71.準備窗體標題條顯示內容的屬性就是 C ； C ； A. 名稱 B. Text C. Caption D. Top 72.如要使某文本框獲得把握焦點 ,可使用的方法就是 C ； A. LostFocus B. Point C. SetFocus D. GotFocus 73.以下選項中 ,不就是 Visual Basic6 , 0 缺省控件名稱的就是 D ； A. Command1 B. Textl C. labell D. Change 74.如要將某命令按鈕設置為默認命令按鈕 ,就應設置為 True 的屬性就是 A. Enabled B. Cancel

22、 C. Default D. Value 75.令按鈕不能響應的大事就是 CD ； A. DblClick B. click C. MouseDown D. MouseUp 二,填空題 1,以下哪些可以作為變量 .“ asdf ”asdf1234 12fd x13 r2 a2 23a2 2,以下哪些可以作為常量？并說明就是數值型仍就是字符型,規(guī)律型,日期型？ 1234 #2022/11/10# true false a3 3,把以下數學式子寫成 VB 表達式 4,運算以下 VB 表達式的值 要求寫出步驟 5*3*62 45 8/4*2 , 5/1, 25*3 , 7+2, 5 24,8 184

23、*4 , 02/1 , 6 0253 Mod 3*2 2263 Mod 0 , 4*Sqr25 0第 7 頁,共 23 頁8/4*5/2 ,5*3 , 25+6,75 40 VB 練習題 含答案 3*72 10 14/5*2 5,6 155*2 1271/3 9271/3 3sqr1004*2 15, 按以下要求寫出賦值語句 1 把數值 234 賦給變量 a 2 把字符串 abc 賦給變量 z1 3把標簽 Lblts的內容改為 ”姓名 ” 6, 寫出以下函數的值 Int-3 , 14159 2-4 Sqrsqr16 7,隨機產生 a-b 范疇內 包括 b整數的公式 : intrnd*b-a+1

24、+a 8,寫出輸入輸出語句 輸出對話框 :要求使用 圖標 ,標題為 :”輸出對話框 ”,對話框中的內容就是 ”您輸錯了 ” _MsgBox 您輸錯了 , 16, 輸出對話框 VB 單元練習題二 1,以下表達中正確的就是 C A ,只有窗體才就是 Visual Basic 中的對象 B ,只有控件才就是 Visual Basic 中的對象 C ,窗體與控件都就是 Visual Basic 中的對象 D ,窗體與控件都不就是 Visual Basic 中的對象 2,確定一個控件在窗體上的位置的屬性就是 D A, Width 或 Height B , Width 與 HeightC , Top 或

25、Left D , Top 與 Left 3, 為了同時轉變一個活動控件的高度與寬度 , 正確的操作就是 A A,拖拉控件 4 個角上的某個小方塊 B ,只能拖拉位于控件右下角的小方塊 C ,只能拖拉位于控件左下角的小方塊 D ,不能同時轉變控件的高度與寬度 4,用戶在屏幕上畫出應用程序界面 , 并設置好對象的屬性 , 系統(tǒng)便可以自動生成程序代碼 , 這稱為 : D A,面對對象的程序設計 B ,結構化程序設計 C,大事驅動的編程機制 D,可視化程序設計 5, VB6 共有三個版本 , 按功能從弱到強的次序排列應就是 C A,學習版,專業(yè)版與工程版 B ,學習版,工程版與專業(yè)版 C,學習版,專業(yè)

26、版與企業(yè)版 D,學習版,企業(yè)版與專業(yè)版 6, VB 集成開發(fā)環(huán)境有三種工作狀態(tài) , 不屬于三種工作狀態(tài)之一的就是 B A,設計狀態(tài) B ,編寫代碼狀態(tài) C ,運行狀態(tài) D ,中斷狀態(tài) 第 8 頁,共 23 頁VB 練習題 含答7,工程文件的擴展名就是 B 案 , frm B ,vbp , bas , frx 8,窗體文件的擴展名就是 A , frm B ,vbp , bas , frx 9, VB 集成開發(fā)環(huán)境可以 D A,編輯,調試,運行程序 , 但不能生成執(zhí)行程序 B,編輯,生成可執(zhí)行程序,運行程序 , 但不能調試程序 C,編輯,調試,生成可執(zhí)行程序 , 但不能運行程序 D,編輯,調試,運

27、行程序 , 也能生成執(zhí)行程序 10,標準模塊文件的擴展名就是 C , frm B ,vbp , bas , vbg 11. 用于獲得字符串 S 從第 5 個字符開頭的 3 個字符的函數就是 A ； A MidS,5,3 B ,MiddleS,5,3 C , RightS,5,3 D , LeftS,5,3 12,用于從字符串左邊截取字符的函數就是 D ； A, Ltrim B,Trim C, Instr D , Left 13,用于去掉字符串左右兩邊的空格的函數就是 B ； A, Ltrim B,Trim C, Left D, Instr 14, 假定窗體的名稱 Name 屬性 為 Form1

28、, 就把窗體的標題設置為A , Form1 = VB Test “ B , Caption =VB Test C , Form1.Text = VB Test D, Form1, Name =VB Test VB Test ”的語句為 B 15 以下說法中正確的就是 : 為了儲存一個 Visual Basic 應用程序 , 應當 D A ,只儲存窗體模塊文件 ,frm B ,只儲存工程文件 , vbp C ,分別儲存工程文件與標準模塊文件 , bas D ,分別儲存工程文件,窗體文件與標準模塊文件 16, 要使一個標簽框對象能夠顯示所需要的文本 , 應設置該對象的那一個屬性的值？ A A ,

29、Caption B , Text C , Name D, AutoSize 17, 要使一個命令按鈕稱為圖形式命令按鈕 , 應設置該隊象的哪一個屬性值？ B A , Picture B , Style C , DownPicture D , DisabledPicture 18, 為使計時器對象每隔 5 秒鐘產生一個時鐘大事 Timer 大事 , 就其 Interval 屬性值應設置為 D A, 5 B , 300 C, 500 D, 5000 19, 一個標準的 VB 應用程序至少要包含一 C 對象； 個 A ,文本框 B ,標簽框 C ,窗體 D ,命令按鈕 20, 要使一個文本框對象能夠

30、顯示多行文字 , 應設置該對象的 B 屬性值為 True , A, Text B , MultiLine C , Style D , Visible 21,雙擊窗體中的對象后 ,VB 將顯示的窗口就是 C A,工具箱 B ,項目 工程 窗口 C ,代碼窗口 D ,屬性窗口 D 22,下述先項中 , 屬性 VB 的程序設計方法就 B 是 A,面對對象,次序驅動 B ,面對對象,大事驅動 C,面對過程,大事驅動 D,面對過程,次序驅動 23,下面就是窗體的四個屬性 , 在界面設計時 , 轉變屬性值瞧不到窗體變化的就是 A, Top B , Width C , Left D, Enabled 24,

31、下面四個選項 , 不就是大事的就是 B 第 9 頁,共 23 頁VB 練習題 含答A, Load B , Enabled C , Unload 案 D, DblClick 25,用來設置窗體背景圖片的屬性就是 B A, Moveable B , Picture C, ForeColor D , WindowState 26,在 VB6 中的每一個對象都具有自己的屬性, A,控件 B ,函數 C ,大事 D 27. 運算結果為 0 的表達式就是 B ； C與方法； ,公用過程 A Int3 , 4+Int-3 ,8 B , Int3 , 4+Fix-3 , 8 BAC ； C.Fix3 , 4+

32、Fix-2 , 8 D, Fix3 , 4+Int-3 ,8 28, 假設 A=3,B=7,C=2, 就表達式 NOT BA 的值就是 B A, True B , False C,表達式錯誤 D ,不確定 29,在表達式 y = InputBox a, b, c 中 ,a,b,c 分別為輸入函數對話框的 A,標題 B ,提示 C ,預設值 D ,幫忙文件名 30,在窗體上畫一個命令按鈕 , 然后編寫如下大事過程 : Private Sub Command1_Click a = InputBoxEnter the First integer b = InputBoxEnter the Secon

33、d integer Print b + a End Sub 程序運行后 , 單擊命令按鈕 , 先后在兩個輸入對話框中分別輸入 A, 579 B , 123 C , 456 D , 123456 31,在窗體上畫一個命令按鈕 , 然后編寫如下大事過程 : Private Sub Command1_Click Dim a, b As Integer a = InputBoxEnter the First integer b = InputBoxEnter the Second integer Print b + a End Sub 程序運行后 , 單擊命令按鈕 , 先后在兩個輸入對話框中分別輸入

34、A, 579 B , 123 C , 456 D , 123456 32,執(zhí)行下面的語句后 , 所產生的信息框的標題就是 a=MsgBoxAAAA,BBBB,5A A , BBBB B ,空 C , AAAA D ,出錯 , 不能產生信息框 456 與 123, 就輸出結果就是 D 456 與 123, 就輸出結果就是 A 33,假定 x 的值為 5, 就在執(zhí)行以下語句時 , 其輸出結果為 Result 的 Select Case 語句就是 C A, Select Case x Case 10 To 1 Print Result End Select B , Select Case x Cas

35、e Is 5, Is 5 Print Result End Select C , Select Case x Case Is 5, 1, 3 To 10 Print Result End Select 第 10 頁,共 23 頁D , Select Case x 5 VB 練習題 含答案 Case 1, 3, Is Print Result End Select 34, 假定有以下循環(huán)結構 Do Until 條件 循環(huán)體 Loop 就正確的描述就是 B A,假如 條件 就是一個為 0 的常數 , 就一次循環(huán)體也不執(zhí)行 B,假如 條件 就是一個為 0 的常數 , 就無限次執(zhí)行循環(huán)體 C,假如 條

36、件 就是一個不為 0 的常數 , 就至少執(zhí)行一次循環(huán)體 D,不論 條件 就是否為 真 , 至少要執(zhí)行一次循環(huán)體 35,以下程序段的輸出結果為 x=1 y=4 Do Until y 4 x=x*y y=y+1 Loop Print x B A, 1 B ,4 C , 8 D , 20 36, 執(zhí)行下面的程序段后 ,x 的值為 x=5 For i = 1 To 20 Step 2 x=x+i5 Next i A A, 21 B , 22 C , 23 D , 24 37, 在窗體上畫一個命令按鈕 , 然后編寫如下大事過程 : Private Sub Command1_Click x=0 Do Un

37、til x = -1 a=InputBox 請輸入 A 的值 a=Vala b=InputBox 請輸入 B 的值 b=Valb x=InputBox 請輸入 x 的值 x = Valx a=a+b+x Loop Print a End Sub 程序運行后 , 單擊命令按鈕 , 依次在輸入對話框中輸入 A, 2 B ,3 C , 14 D ,15 5,4, 3, 2,1, -1, 就輸出結果為 A 38.假如要在文本框中鍵入字符時 ,只顯示某個字符 ,如星號 *, 應設置文本框的 B 屬性； 第 11 頁,共 23 頁39,退出 For 循環(huán)可使用的語句為 A, Exit For B , En

38、d For VB 練習題 含答 案 A ； C, Exit Do D, End Do 40,退出 Do Loop 循環(huán)可使用的語句為 C ； A, Exit For B , End For C, Exit Do D, End Do 41,退出函數過程可使用的語句為 D ； A , Exit sub B ,End sub C, End Function D , Exit Function 42,退出 sub 過程可使用的語句為 A ； A, Exit sub B , End sub C, End Function D , Exit Function 43, 在窗體上畫一個文本框 其 Name 屬

39、性 Text1, 然后編寫如下大事過程 : Private Sub Form_Load 為 Text1 ,Text= Text1 ,SetFocus For i=1 To 10 Sum = Sum + i Next i Text1 ,Text = Sum End Sub 上述程序的運行結果就是 C Text1 中輸出 0 Command1, A,在文本框 Text1 中輸出 55 B ,在文本框 C,出錯 D,在文本框 Text1 中輸出不定值 Text1 與 Text2 與一個命令按鈕 其 Name 屬性44,在窗體上畫兩個文本框 其 Name 屬性分別然后編寫如下大事過程 : 為 為 Pr

40、ivate Sub Command1_Click x=0 Do While x 50 x=x+2*x+3n=n+1 Loop Text1 , Text = Strn Text2 , Text = Strx End Sub 程序運行后 , 單擊命令按鈕 , 在兩個文本框中顯示的值分別為 B A, 1 與 0 B , 2 與 72 C , 3 與 50 D , 4 與 168 45,在窗體上畫一個命令按鈕 , 名稱為 Command；1然后編寫如下程序 : Private Sub Command1_Click For I= 1 To 4 For J = 0 To I Print Chr65 + I

41、; Next JPrint Next I End Sub 程序運行后 , 假如單擊命令按鈕 , 就在窗體上顯示的內容就是 A 第 12 頁,共 23 頁A, BB VB 練習題 含答 案 CCC DDDD EEEEE B, A BB CCC DDDD C, B CC DDD EEEE D, AA BBB CCCC DDDDD 46,在窗體上畫兩個名稱分別為 Label1 與 Label2 的標簽 , 然后編寫如下大事過程 Private Sub Form_Click x= -5:s= -5 Select Case s Case Is 0 y=x+1 Case Is = 0 y=x+2 Case

42、 Else y=x+3 End Select Label 1 , Caption = x Label2 ,Caption = y End Sub 程序運行后 , 單擊窗體 , 標簽 Label1 與 Label2 中顯示的內容分別就是 A A, -5 與 -2 B, -5 與 -4 C, -5 與 -3 D, -5 與 5 33, 以下 VB 程序語句正確的就 D , A , If A 是 B Then T=A: A=B: B=T B , If A B Then T=A; A=B; B=T C , If A=B Then T=A A=B B=T D, If A=B Then T=A: A=B:

43、 B=T 47, 以下程序段執(zhí)行后輸出的結果就是 C n=10 For k=n To 1 x = k2 Next k Print x A , -2 B , -1 C , 1 D, 0 48 以下程序段執(zhí)行后輸出的結果就是 A 第 13 頁,共 23 頁i=0 VB 練習題 含答案 For k=10 To 19 Step 3 i=i+1 Next k Print i A, 4B , 5B C, 3D, 649 以下程序段執(zhí)行后輸出的結果就是 x=int Rnd+4 Slect Case x Case 5 Print 優(yōu)秀 K Case 4 Print 良好 Case 3 Print 及格 Cas

44、e Else Print 不及格 End Select A, 優(yōu)秀 B , 良好 Command1,然后編寫如下代碼 : C, 及格 D, 不及格 50, 在窗體上畫一個命令按鈕 其 Name 屬性Option Base 1 為 Private Sub Command1_Click Dim a = Array1, 2, 3, 4 j=1 For i = 4 To 1 Step -1 s = s + ai*j j =j * 10 Next i Print s End Sub 運行上面的程序 , 單擊命令按鈕 , 其輸出結果就是 D A , 4321 B , 12 C , 34 D , 1234

45、51,定窗體標題條顯示內容的屬性就是 C A, Text B, Name C, Caption D, BackStyle 52. 要求從文本框中輸入密碼時在文本框中只顯示 * 號 , 就應用在此文本框的屬性窗口中設置 A A.Passwordchar 屬性值為 * B , Caption 屬性值為 * 第 14 頁,共 23 頁C.PasswordChar 屬性值為真 DVB 練習題 含答 案 , Text 屬性值為 *53 準備窗體有無把握菜單的屬性就是 A A , ControlBoxB , MinButtonC , Enabled D , MaxButton 54 使文本框獲得焦點的方法

46、就是 C A , ChangeB , GotFocus C , SetFocus D , LostFocus 55 以下可以把當前目錄下的圖形文件 pic1 , jpg 裝入圖片框 Picture1 中的語句為 C A , Picture = pic1 , jpg B , Picture , Handle = pic1 , jpg C , Picture 1 , Picture = LoadPicturepic 1 , jpg D , Picture = LoadPicturepic 1 ,jpg 56 準備標簽內顯示內容的屬性就是 D A , Text B , Name C , Alignm

47、ent D , Caption 57 假定在圖片框 Picture1 中裝入了一個圖形 , 為了清除該圖形 留意 , 清除圖形 , 而不就是刪除圖片框 , 應 接受的正確方法就是 B A ,選擇圖片框 , 然后按 Del 鍵 B ,執(zhí)行語句 Picture1 , picture=LoadPicture C ,執(zhí)行語句 Picture1 , picture= D ,選擇圖片框 , 在屬性窗口中選擇 Picture 屬性條 , 然后按回車鍵 58,比較圖片框 PictureBox 與圖像框 Image 的使用 , 正確的描述就是 A ； A 當圖片框 PictureBox 的 AutoSize 自

48、屬性為 False 時 , 只在裝入圖元文件 * ,wmf 時 , 圖形才能自 動調整大小以適應圖片框的尺寸 B 當圖像框 Image 的 Stretch 屬性為 True 時, 圖像框會自動轉變大小以適應圖形的大小 , 使圖形充 滿圖像框 C 兩類控件都可以設置 AutoSize 屬性 , 以保證裝入的圖形可以自動轉變大小 , 保證顯示圖形的 D 兩類控件都可以設置 Stretch 屬性 , 使得圖形依據物件的實際大小進行拉伸調整 全部部分 59 刪除列表框中指定的項目所使用的方法為 D A , Move B , RemoveC , Clear D , RemoveItem 60,如要向列表

49、框添加列表項 , 可使用的方法就是 A ； 第 15 頁,共 23 頁A, AddItem B , Remove 61 當拖動滾動條中的滾動塊時 A , Move VB 練習題 含答 C,Clear 案 D, Add , 將觸發(fā)的滾動條的大事就是 BC B , ChangeC , Scoll D , SetFocus 62. 滾動條控件的 LargeChange 屬性所設置的就是 B A. 滾動條中滾動塊的最大移動范疇 B. 單擊滾動條與滾動箭頭之間的區(qū)域時 C. 滾動條中滾動塊的最大移動位置 D. 滾動條控件無該屬性 , 滾動條控件 value 屬性值的轉變量 63 用戶在組合框中輸入或選擇

50、的數據可以通過一個屬性獲得 , 這個屬性就是 C A , List B , ListIndexC , Text D , ListCount 64. 設置一個單項按鈕 OptionButton 所代表選項的選中狀態(tài) , 應當在屬性窗口中轉變的屬性就是 D 65,在窗體 Name 屬性為 Form1 上畫兩個文本框 其 Name屬性分別 為 屬性為 Command1,然后編寫如下兩個大事過程 : Private Sub Command1_Click a = Text1 , Text + Text2 , Text Print aEnd Sub Private Sub Form_Load Text 1

51、 , Text = Text2 , Text = End Sub Text1 與 Text2 與一個命令按鈕 Name 程序運行后 , 在第一個文本框 鈕 , 就輸出結果為 C Text1 與其次個文本框 Text2 中分別輸入 123 與 321, 然后單擊命令按 A , 444 B , 321123 C , 123321 D , 132231 65. 運行下面程序后輸出的結果就是 B Private Sub Form_ClickK = 4 If K = 3 Then n = 5 If K = 4 Then n = 4 If K = 5 Then n = 3 Print n End Sub

52、A. 無輸出 B. 3 第 16 頁,共 23 頁C. 4 D. 5 B VB 練習題 含答案 66. 運行下面程序后輸出的結果就是 Private Sub Form_Click score = IntRnd * 10 + 80 Select Case score Case Is 60: PingYu = 未通過 Case 60 To 69: PingYu = 合格 Case 70 To 79: PingYu = 中 Case 80 To 89: PingYu = 良 Case Else: PingYu = 優(yōu) End Select Print PingYu End Sub A. 優(yōu) : B.

53、 良 C. 中 D. 合格 67.有如下程序 Private Sub Form_Click A = 3 If A = 3 Then Print 3; End If If A = 4 Then Print 4; End If If A = 5 Then Print 5; End If If A = 6 Then Print 6; End If Print End Sub 運行后輸出的結果就是 3 4 5 668.窗體上有兩個文本框 Text1 與 Text2,下面程序的功能就是 :在文本框 Text1 中輸入一個 06 的整數 ,然后單 擊窗體 ;在文本框 Text2 中用英文顯示就是星期幾；請

54、將程序補充完整； 留意 :不得增行或刪行 ,也不得更換程序的結構！ Private Sub Form_Click Dim Var% Var =Text1, Text Select Case Var Case 0 Text2,Text = SundayCase 1 Text2,Text = Monday Case 2 Text2,Text = Tuesday 第 17 頁,共 23 頁Case 3 VB 練習題 含答 案 Text2,Text = Wednesday Case 4 Text2,Text = Thursday Case 5 Text2,Text = Friday Case 6 Te

55、xt2,Text = Saturday Case Else Text2,Text = Must be 0to 6 End Select End Sub 69.以下表達正確的就是 A.Select Case 語句中的測試表達式可以就是任何形式的表達式 B.Select Case 語句的測試表達式只能就是數值表達式或字符表達式 C.在執(zhí)行 Select Case 語句時 ,全部 Case 子句均按顯現(xiàn)的次序被次序執(zhí)行 D. 如下 Select Case 語句的 Case 表達式就是錯誤的 Select Case Case 1 TO 10 End Select 答案 :A 70.窗體上畫一個命令按鈕

56、 ,其名稱為 command1,然后編寫如下大事過程 : Private Sub command1_click For I = 1 To 4 If I = 1 Then x = I If I y Then Print xy ElseIf x = y Then Print x=y Else Print xy B.x=y C.xy D.以上都不正確 第 18 頁,共 23 頁答案 :B VB 練習題 含答案 72.有如下程序 : Private Sub Form_Click A = 0 For j = 1 To 20 Step 2A = A + j 5 Next j Print A End Sub

57、 運行后 ,輸出的結果就是 B A. 12 B. 16 C. 40 D. 100 73.有一個分數序列 : 2/1 3/2 5/3 8/5 13/8 求這個序列前 20 項的與；請將程序補充完整； 留意 :不得增行或刪行 ,也不得更換程序的結構； Private Sub form_click Dim s As Single Dim t1 As Integer, t2 As Integer, t As Integer Dim I As Integer s = 0 t1 = 2 t2 = 1 I = 0 DO while S= I20 s+t1/t2 t = t1 + t2 t2=t1 t1=t

58、I = I + 1 Print I; t1; t2; s Loop Print s End Sub 74.有如下程序 : Private Sub Form_click A = 0 For j = 1 To 10 A = A + j 2 + j Mod 3 Next j Print A End Sub 運行后 ,輸出的結果就是 D A. 20 C. 30 D. 35 75.有如下程序 : 第 19 頁,共 23 頁Private Sub Form_clik VB 練習題 含答案 Dim s%, i% s = 0 i = 100 Do While i = 120 If i 3 * 3 = i Th

59、en s = s + 1 i = i + 1End If i = i + 1 Loop Print s End Sub 運行后輸出的結果就是 A A. 7 B. 9 C. 1176.有如D. 13 下程序 : Private Sub form_click s = 0 i = 1 Do While i = 100 If i Mod 10 0 Then s = s + i i = i + 1 Else i = i + 1 End If Loop Print s End Sub 運行后輸出的結果就是 D A. 4050 B. 5050 C. 4000 D. 4500 77.有如下程序 : Priva

60、te Sub form_click A$ = 54321 b$ = abcde For j = 1 To 5 Print Mid$b$, j, 1 + Mid$A$, 6 - j, 1; Next j Print End Sub 運行后輸出的結果就是 A. a1b2c3d4e5 C. 5a4b3c2d1e A B. a5b4c3d2e1 D. e1d2c3b4a5 二,填空題 1,在 VB6 集成開發(fā)環(huán)境 , 可以編輯程序代碼 , 但不能修改用戶界面的工作狀態(tài)就是 中斷模式 , 中 2,控件與窗體的 Name 屬性只能通 屬性窗口 設置 , 不能在 運行 期間設置, 過 第 20 頁,共 23