1、VB程序設計綜合復習資料第一章 Visual Basic程序設計概述一、填空題 1、Visual Basic是一種面向_的可視化程序設計語言，采取了_的編程機制。 2、在VB中工程文件的擴展名是_，窗體文件的擴展名是_，標準模塊文件的擴展名是_。 3、執行“工程”菜單下的_命令，可選擇并添加ActiveX控件。 4、Visual Basic 6.0用于開發_環境下的應用程序。二、選擇題 1、下面不是VB工作模式的是（ ）A設計模式B運行模式C匯編模式D中斷模式 2、可視化編程的最大優點是（ ）A具有標準工具箱B一個工程文件由若干個窗體文件組成C不需要編寫大量代碼來描述圖形對象D所見即所得 3、

2、下列不能打開屬性窗口的操作是（ ）A執行“視圖”菜單中的“屬性窗口”命令B按F4鍵 C按Ctrl+TD單擊工具欄上的“屬性窗口”按鈕 4、下列可以打開立即窗口的操作是（ ）ACtrl+D BCtrl+E CCtrl+F DCtrl+G 5、Visual Basic的編程機制是（ ）A可視化 B面向對象 C面向圖形 D事件驅動三、簡答題 1、代碼窗口主要包括哪幾部分？ 2、在工程資源管理器窗口中，主要列出了哪三類文件？ 3、窗體布局窗口的主要用途是什么？ 4、VB的基本特點是什么？ 5、怎樣理解可視化設計？ 6、怎要理解事件驅動編程？第二章 簡單的VB程序設計一、填空題 1、設置是否可以用Tab

3、鍵來選取命令按鈕，應該用_屬性。 2、一個控件在窗體的位置由_和_屬性決定，其大小由_和_屬性決定。 3、利用對象的屬性setfocus可獲得焦點，對于一個對象，只有其visible屬性和_屬性為true，才能接受焦點。 4、設置控件背景顏色的屬性名稱是_。 5、所有控件都具有的共同屬性是_屬性。 6、一般情況下，控件有兩個屬性項的缺省值是相同的，這兩個屬性項是_。 7、VB中的每個對象（控件）都有一組特征，這組特征稱為_，我們通過修改它可以控制對象的外觀和操作。 8、通常情況下，VB中一個工程主要包括如下四個文件：窗體文件、工程文件、類模塊文件和_文件，后者的擴展名為.Bas，通常由Basi

4、c語言編寫，是一個可共用的子程序。 9、VB有三種工作模式，分別是設計（Design）模式、_和中斷（Break）模式。二、選擇題 1、以下能夠觸發文本框Change事件的操作是（ ）A文本框失去焦點B文本框獲得焦點C設置文本框的焦點D改變文本框的內容 2、應用程序設計完成后，應將程序保存，保存的過程是（ ）A只保存窗體文件即可B只保存工程文件即可C先保存工程文件，之后保存窗體文件D先保存窗體文件（或標準模塊文件），之后還要保存工程文件 3、VB應用程序的運行模式是（ ）A解釋運行模式B編譯運行模式C兩者都有D匯編模式 4、任何控件都具有的屬性是（ ）ATEXTBCAPTIONCNAMEDFO

5、RECOLOR 5、決定控件上文字的字體、字形、大小及效果的屬性是（ ）ATEXTBCAPTIONCNAMEDFONT 6、在窗體上建立了多個控件，如TEXT、LABEL1、COMMAND1，若要使程序一運行焦點就定位在COMMAND1控件上，應將COMMAND1控件的（ ）設置為0AINDEXBTABINDEXCTABSTOPDENABLED 7、運行時，當用戶向文本框輸入新的內容，或在程序代碼中對文本框的TEXT屬性進行賦值從而改變了文本框的TEXT屬性值時，將觸發文本框的（ ）事件ACLICKBDBLCLICKCGOTFOCUSDCHANGE 8、在運行時，按TAB鍵跳過了一個可以獲得焦

6、點的控件（如文本框），則可能是因為（ ）A該控件的TABSTOP屬性值為TRUE B該控件的TABINDEX屬性值為FALSEC該控件的ENABLED屬性值為TRUE D該控件的ENABLED屬性值為FALSE 9、為了防止用戶隨意將光標置于控件上，應（ ）A將控件的TABINDEX屬性設置為0B將控件的TABSTOP屬性設置為TRUEC將控件的TABSTOP屬性設置為FALSED將控件的ENABLED屬性設置為FALSE 10、若要使標簽控件顯示時，不覆蓋其背景內容，應設置標簽控件的（ ）屬性ABACKCOLORBBORDERSTYLECFORECOLORDBACKSTYLE 11、如果要在

7、文本框中輸入字符時，只顯示某個字符，如星號（*），運行時，在文本框中輸入的字符仍然顯示出來，而不顯示星號，原因可能是（ ）A文本框的MULTILINE屬性值為TRUEB文本框的LOCKED屬性值為TRUEC文本框的MULTILINE屬性值為FALSED文本框的LOCKED屬性為FALSE 12、在運行階段，要在文本框TEXT1獲得焦點時選中文本框中所有內容，對應的事件過程是（ ）APrivate Sub Text1_GotFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubBPrivate Sub Text1_LostFo

8、cus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubCPrivate Sub Text1_Change( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End SubDPrivate Sub Text1_SetFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub 13、Visual Basic繼承了Basic語言簡單易用的語法特點，同時支持面向對象的編程機制，其中構成其控件（對象）的三要素是（ ）A屬性、事

9、件、事件過程 B控件、窗體、事件C屬性、過程、方法 D屬性、事件、方法 14、決定標簽（Label）顯示的屬性是（ ）AText BName CCaption DAlignment 15、命令按鈕的標題文字由（ ）屬性來設置。AText BCaption CName D(名稱) 16、若要設置文本的顯示顏色，則可用（ ）屬性來實現。ABackColor BForecolor CFillColor DBackstyle 17、在運行時，若要調用某命令鈕的Click事件過程，則可設置該命令鈕對象的（ ）屬性為Ture來實現。AEnabled BValue CDefault DCancel 18、在

10、運行時，若要獲得用戶在文本框中所選擇的文本，可通過訪問（ ）屬性來實現。ASelStart BSelLenght CText DSelText三、簡答題 1、事件驅動的含意是什么？舉例說明。 2、交互式開發方法和傳統的應用程序開發過程有什么不同？ 3、文本框在什么情況下使用？ 4、什么是工程？ 5、結構化程序設計的三種基本結構是什么？ 6、對象的三要素是什么？并分別進行簡單的解釋。 7、為什么要生成可執行文件和制作安裝盤？ 8、使用變量前先聲明有什么好處？ 9、如何使用幫助功能？ 10、結構化程序設計的特點是什么？ 11、為了把焦點移到某個指定的控件，在代碼中應使用的方法是什么？ 12、啟動V

11、isua Basic后，只創建了一個窗體，若此時保存，需要保存幾個文件？各是什么文件？先保存的是哪一個？ 13、為了防止文本框中的信息運行后被用戶修改，應設置什么屬性？第三章 VB基本語言一、填空題 1、一般可以使用_關鍵字聲明常量。 2、_類型也稱變體類型，是一種通用的、可變的數據類型，它可表示或存儲任何一種數據類型。 3、變量的聲明分為兩種方法：_和_。 4、在VB中，用_語句設定數組的下界，用_和_語句分別返回數組的上、下界。 5、在代碼模塊中加入Option Explicit的目的是_。 6、function aa (a1 as date,optional a2 as boolean)

12、 as single，寫出optional命令的作用_。 7、在VB中，我們用一個簡單的_語句就能實現退出程序。 8、生成消息框的命令是_，生成輸入框的命令是_。 9、通用對話框（commondialog）屬activex控件，它可以顯示多個標準對話框，包括打開/另存為、字體、打印等對話框，若要顯示所有文件，則應設置其屬性filter=_，若要使它顯示為打印對話框，則應使用什么方法_。 10、從字符串中任意位置截取字符的函數是_。 11、語句For j = 3 To 20 Step 3 使循環體執行了_次。 12、對于正在使用的動態數組Arraya()，要增加一個單元，但不能破壞數組內的數據，

13、則應使用語句_。 13、在Visual Basic中聲明靜態變量的關鍵字是_。 14、表達式10 Mod 6 4的值為_。 15、表達式chr(Asc("a") + 5)的值為_。 16、VB中使用注釋有2種方法，即_和_。 17、VB中的數據以四種形式存儲：常量、_、_和記錄。 18、為了在VB中存儲一個4行5列的二維矩陣，需要定義一個整型的數組，請把數組定義語句補充完整：Dim Juzhen(_ _) as Integer。 19、控件數組由一組相同類型的控件組成，這些控件共用一個相同的控件名，但是每個控件都有一個唯一的下標來區分，我們使用屬性_ _來設置下標。 20、

14、在過程調用中，實現調用過程的實參和被調用過程的形參之間的數據傳遞有兩種方式：按值傳遞和_ _。 21、為了保證程序中必須對變量的強制性定義，需要在代碼模塊的聲明部分加入_語句。 22、分析ForNext循環結構的實例：For i = 5 To 30 Step 2 中，循環體一共執行了_次。 23、表達式Mid("UniversityOfPetroleum", 8, 4) 的值為_。 24、常量分為普通常量和_常量。 25、要將大寫字母轉換為小寫字母，可使用_函數。 26、不管焦點在哪個控件上，按_鍵相當于按了取消按鈕。 27、執行“工程”菜單下的_命令，可選擇并添加Acti

15、veX控件。 28、_是程序中VB停止執行的地方。 29、邏輯常量為True或_。 30、使用了_的聲明后，當程序中使用未經聲明的變量時，程序運行時會報錯。 31、要將小寫字母轉換為大寫字母，可使用_函數。 32、自字符串N1位開始向右取N2個字符，要使用_函數。 33、日期常量表示時，用符號_將日期型數據括起來。 34、局部變量只能在_中聲明和使用。 35、模塊級變量的聲明關鍵字是Dim或_。 36、函數Abs(x)的功能是_。 37、表達式3/6*5的值是_。二、選擇題 1、以下哪個是合法的變量（ ）ArightBabc123C123_abcDab123c 2、下列說法錯誤的是（ ）A在同

16、一模塊不同過程中的變量可以同名B不同模塊中定義的全局變量不可以同名C引用另一模塊中的全局變量時，必須在變量名前加模塊名D同一模塊中不同級的變量可以同名 3、把MsgBox的返回值轉換為數值應該使用的函數是（ ）ALog BStr CLen DVal 4、語句DIM AA(3,4,5)中定義的數組有（ ）個元素A12 B60 C120 D345 5、下面程序運行后輸出的結果是（ ） A$="CHINA" B$=STRING$(3,A$) PRINT B$ ENDACHI BCCC CINA DAAA 6、以下語句的輸出結果是（ ）Print Format$(32548.5,

17、"000,000.00")A32548.5 B325,485.00 C032,548,50 D32,548,50 7、以下敘述中錯誤的是（ ）A如果過程被定義為Static類型，則該過程中的局部變量都是Static類型BSub過程中不能嵌套定義Sub過程CSub過程中可以嵌套調用Sub過程D事件過程可以像通用過程一樣由用戶定義過程名 8、Visual Basic提供的On Error Resume next錯誤陷阱語句表示（ ）A當發生錯誤時，使程序轉跳到語句標號為0的程序塊B當發生錯誤時，不使用錯誤處理程序塊C當發生錯誤時，忽略錯誤行，繼續執行下一語句D當發生錯誤時，終止

18、本過程執行，繼續執行下一過程 9、在Visual Basic中，若要將控制權交給操作系統則通過（ ）的語句。AEnd BExit Do CExit Sub DDoEvents 10、在Visual Basic 中語句的續行號采用（ ）A空格與下劃線 B下劃線與空格 C空格與短線 D短線與空格 11、假定有以下程序段：For i=1 to 3For j=5 to 1 Step 1Print i*jNext j,i則語句Print i*j的執行次數是（ ）A15 B.16 C17 D18 12、從鍵盤上輸入兩個字符串，分別保存在變量str1、str2中。確定第二個字符串在第一個字符串中起始位置的函

19、數是（ ）ALeft BMid CString DInstr 13、如果將布爾常量值TRUE賦值給一個整型變量，則整型變量的值為（ ）A0B-1CTRUEDFALSE 14、下列敘述不正確的是（ ）A注釋語句是非執行語句，僅對程序的內容起注釋作用，它不被解釋和編譯B注釋語句可以放在代碼中的任何位置C注釋語句不能放在續行符的后面D代碼中加入注釋語句的目的是提高程序的可讀性 15、語句PRINT “INT(-13.2)”；INT(-13.2)的輸出結果為（ ）AINT(-13.2)= -13.2BINT(-13.2)= 13.2CINT(-13.2)= -13DINT(-13.2)= -14 16

20、、如果TAB函數的參數小于1，則打印位置在第（ ）列A0B1C2D3 17、變量未賦值時，數值型變量的值為（ ）A、0B空C1D無任何值 18、下列語句中正確的是（ ）Atxt1.text+txt2.text=txt3.textB=cmdokC12label.caption=1234Da=inputbox(“hello”) 19、假設變量BOOLVAR是一個布爾型變量，則下面正確的賦值語句是（ ）ABOOLVAR=TRUEBBOOLVAR=.TRUECBOOLVAR=#TRUE#DBOOLVAR=3<4 20、以下（ ）程序段可以實施X、Y變量值的變換（ ）AY

21、=X：X=YBZ=X：Y=Z：X=YCZ=X：X=Y：Y=ZDZ=X：W=Y：Y=Z：X=Y 21、語句PRINT “SGN(-26)=”；SGN(-26)的輸出結果為（ ）ASGN(-26)=26BSGN(-26)= -26CSGN(-26)= +1DSGN(-26)= -1 22、讀下面程序段，判斷變量Str2的取值是（ ）Dim Str1, Str2 as StringStr1="University"Str2=STRING$(3,Str1)AUniBUUUCityDyyy 23、VB支持自定義數據類型，在某程序中我們定義了如下類型：Type Studentnumbe

22、r As stringname As Stringage As IntegerEnd Type針對上述定義，如下幾項用法正確的是（ ）AS="張三" BDim s As S"張紅"CDim s As Type Student DDim s As Type ="張三" ="張三" 24、一個工程中包含兩個名稱分別為Form1、Form2的窗體，一個名稱為mdlFunc的標準模塊。假定在Form1、Form2和mdlFunc中分別建立了自定義過程，其

23、定義格式為：Form1中定義的過程：Private Sub frmfunction1()End SubForm2中定義的過程：Public Sub frmfunction2()End SubmdlFunc中定義的過程：Public Sub mdlFunction()End Sub在調用上述過程的程序中，如果不指明窗體或模塊的名稱，則以下敘述中正確的是（ ）A上述三個過程都可以在工程中的任何窗體或模塊中直接被調用B只有mdlFunction過程能夠被工程中各個窗體或模塊直接被調用Cfrmfunction1只能在form1中調用，而frmfunction2 則可以在所有模塊或窗體中被直接調用D上述

24、三個過程都只能在各自被定義的模塊中直接調用 25、VB中DoLoop結構既可以構成當型循環，也可以構成直到型循環，根據下面的代碼：Dim i,n as Integern = 20i = 1 Do Print i; i = i + 2Loop Until i >20判斷循環結構的類型和循環體的執行次數，正確的選項是（ ）A當型循環，20次B直到型循環，10次C當型循環，10次D直到型循環，20次 26、在程序中，使用InputBox函數可以接受用戶的輸入，如果要把它的返回值轉換為數值型的數據，應該使用的函數是（ ）AValBLenCStr DLog 27、動態數組因為在程序運行前無法確定數

25、組的大小，所以經常根據程序的運行情況，對數組進行重新定義，以下關于VB中動態數組的敘述中不正確的是（ ）A可以用ReDim語句重新定義動態數組，并且可以進行多次重定義B首次用Dim進行動態數組聲明的時候，必須指明它的類型和上下界CPreserve為ReDim語句的可選參數，用于保留動態數組原來的內容D當對動態數組使用Erase語句進行釋放操作時，將釋放其內存 28、VB中的控件也叫做部件或組件，主要包括三類，以下哪一項不屬于VB控件的分類（ ）A控件 B可插入對象CADO控件 DActiveX控件 29、表達式4+5 6 * 7 / 8 Mod 9 的值是（ ）A4 B5 C6 D7 30、可

26、以同時刪除字符串前導和尾部空白的函數是（ ）ALtrim BRtrim CTrim DMid三、簡答題 1、全局變量聲明有哪些限制？ 2、字符串是否可以自動轉換為數字類型？ 3、用Format函數格式化后的字符格式在不同區域環境下的輸出是否相同？為什么？ 4、在InputBox函數中，哪一個參數是必需的？ 5、在MsgBox函數中哪一個參數是必須的？ 6、在什么情況下使用過程？ 7、為什么要進行程序調試？ 8、調試程序有哪些手段？ 9、用語句Dim A(-3 To 5) As Integer定義的數組的元素個數是多少？ 10、設有如下的Visual Basic表達式：5*x2-3*x-2*Si

27、n(a)/3，與它對應的數學式是什么？ 11、數學式對應的VB表達式是什么？ 12、表達式2>3 And 4<=5 Or 4>4的值是什么？ 13、怎樣在程序中設置斷點？ 14、在什么情況下可以設置斷點？ 15、程序出錯的類型有哪幾種？ 16、在同一模塊、不同過程中聲明的相同變量名，兩者是否表示同一個變量？為什么？ 17、什么情況下會出現“數組下標越界錯誤”？ 18、逐語句和逐過程有什么區別？ 19、表達式2.75 * 2 3.45的值是什么？ 20、在程序設計中為什么盡量不用GoTo語句？四、讀程序題 1、分析以下程序，寫出運行結果。 Private Sub Form_Cl

28、ick() score = Int(Rnd * 10) + 80 Select Case score Case Is < 60 A$ = "F" Case 60 To 69 A$ = "D" Case 70 To 79 A$ = "C" Case 80 To 89 A$ = "B" Case Else A$ = "A" End Select Print A$ End Sub 2、讀下面的程序，分析其功能，寫出運行結果。在窗體上有一個命令按鈕，名稱為Command1。然后編寫如下程序：Pri

29、vate Sub Command1_Click()For I = 1 To 4For J = 0 To IPrint Chr$(65 + I);Next JPrintNext IEnd Sub程序運行后，如果單擊命令按鈕，則在窗體上顯示的內容是什么？ 3、閱讀下面的程序，分析并寫出其功能。Sub insert(a() As Single,ByVal x As Single)Dim m as integer,n as integern=1Do While n<20 And x>a(n)n=n+1LoopFor m=20-1 To n Step 1a(m+1)=a(m)Next ma(

30、n)=xEnd Sub 4、分析以下程序，寫出運行結果。Sub subP(b() As Integer)For i =1 To 4b(i)=2*iNext iEnd SubPrivate Sub Commandl_Click()Dim a(1 To 4)As Integera (1)=5a (2)=6a (3)=7a (4)=8subP a()For i =1 To 4Print a(i)Next iEnd Sub運行上面的程序，單擊命令按鈕，輸出結果是什么？ 5、分析以下程序，寫出運行結果。Sub sele() Dim n as Integer i=21:n=3 Do While i>

31、n i=in Loop Print iEnd Sub 6、分析以下程序，寫出運行結果。Sub selectPrint()Dim a as IntegerDim b as IntegerDim c as Integera=2:b=5:c=2If(a>=b)and(a>=c) or (b>c) Then Print aa=a+2ElsePrint bEndIfPrint a;b;cEnd Sub 7、分析以下程序，寫出運行結果。Sub swap() Dim x as Integer Dim y as Integer Dim z as Integer x=1:y=2:z=0 Pri

32、nt x;y;z x=x+y x=x*z Print x,y,zEnd Sub 8、分析以下程序，寫出運行結果。Sub selectPrint() Dim a as Integer Dim b as Integer Dim c as Integer a=3:b=3:c=2 If(a>=b)and(a>c)Then Print a Print a,b,cEnd Sub五、編程題 1、輸入一年號，判斷它是否是閏年。界面如下圖所示，包括兩個標簽、一個文本框和一個命令按鈕。提示：如果此年號能被400整除或者不能被400除盡，也不能被100除盡，但能被4整除，則它是閏年；否則，不是閏年。 2

33、、輸入兩個正整數m、n，求m和n的最大公約數。要求建立如下圖所示的窗體，其中主要的控件包括：兩個標簽（Lable1、Lable2）、兩個文本框（Text1、Text2）和一個按鈕（Command1）。 3、輸入某學生成績（百分制），若是100成績90輸出優秀；若是90成績80輸出良好；若是80成績70輸出中等；若是70成績60輸出及格；若是60成績0，輸出不及格；若是其他數則輸出error信息。 4、在窗體中顯示從9號字型到16號字型。 5、在有序序列中插入一個數，使插入后的數列仍然有序（設按由小到大排列）。 6、編程實現二維數組轉置。 7、隨機輸入10個100以內的整型數，計算其和及平均值。

34、 8、找出所有的水仙花數。水仙花數是個三位數，它的各位數字的立方和等于這個三位數本身。例如37133+73+13，則371是水仙花數。 9、從鍵盤輸入一個大于2的正整數，判斷該數是否是素數。 10、求二維數組中的最小值及其所在行號、列號。 11、求一元二次方程ax2+bx+c=0的根（包括實根和復根）。 12、輸入一個正整數n，計算出n!并輸出。 13、Faibonacci數列為0，1，1，2，3，5，8，13 ，計算并輸出第20項以及前20項的和。第四章 常用控件與窗體一、填空題 1、向列表框控件添加新項目的方法是_。 2、在VB中，最主要的兩種對象是_和_。 3、當窗體啟動時可通過_屬性控

35、制窗體位于所有者的中心位置。 4、若要將窗體Form1隱藏起來，則可通過執行代碼_來實現。 5、要使裝入到列表框中的數據項能自動按字母順序排序，應設置該控件的_屬性為_。 6、窗體上放置了若干個文本框和命令按鈕，當窗體裝入后，要將焦點自動定位到文本框Text1上，則在設計時需要將_控件的_屬性設置為_。 7、在標簽控件中通過編程使文字換行用的代碼是_。 8、設置計時器控件只能觸發_事件。 9、設置計時器對象觸發事件的時間間隔用_屬性。 10、滾動條控件主要支持兩個事件，它們是_事件。 11、要使鼠標停留在按鈕上顯示特殊的鼠標形狀，應設置的屬性值是_。 12、設某列表框共有10項，按題目要求補齊

36、程序，完成相應的功能。（1）按下命令按鈕Command1時將列表框第8項的內容顯示在窗體上：Private Sub Command1_Click( )List._(7)=TruePrint List1._End Sub（2）單擊列表框某一項時立即將該項打印在窗體上：Private Sub List1_Click( )Print_End Sub（3）按下命令按鈕Command1時在窗體上刪除第1、3、5、7、9項：Private Sub Command1_Click( )For I=1 To 5List1._Next IEnd Sub（4）在列表框的每一項之后插入一個新的項：Private Su

37、b Command1_Click( )For I=1 to 10X=InputBox(“請輸入插入的第” & I & “項內容”)List1.AddItem_Next IEnd Sub 13、設在界面上放置了一個滾動條Hscroll1和一個標簽控件Label1，要使每次單擊滾動條兩端箭頭時，或單擊滾動條滑塊與兩端箭頭之間的空白區域時，標簽內容能夠反映滾動條的值，補齊以下代碼。Private Sub Hscroll1._( )Label1.Caption = Hscroll1._End Sub要使拖動滾動條滑塊時標簽內容能夠反映滾動條的值，補齊以下代碼。Private Sub H

38、scroll1._( )Label1.Caption = Hscroll1._End Sub 14、列表框（ListBox）用于列出可供選擇的項目的列表，用戶可以選擇一個或多個項目。它具有幾個非常重要的數組屬性，其中_ _屬性存放了列表框中所有項目的值。 15、菜單項一般由標題、訪問鍵、快捷鍵和復選標志等構成，通過對相應的屬性進行設置可以改變這些項目的狀態，其中與復選標志相對應的屬性是_ _。 16、keydown與keypress事件各有其參數，若需獲得用戶按下 "a" 還是 "A" 需用_事件。 17、控件_組合了文本框和列表框的功能，是VB中一種功

39、能非常強大的選擇類控件。 18、若需要將窗體Form2以模態窗口的形式顯示出來，可通過執行代碼_來實現。 19、菜單中的分隔條是一種菜單控件，不響應_事件，不能被選中。二、選擇題 1、當程序運行時，在窗體上單擊鼠標，以下哪個事件是窗體不會接收到( )AMouseDownBMouseUpCLoad DClick 2、窗體Form1的Name屬性是Frm1，它的單擊事件過程名是（ ）AForm1_Click BForm_Click CFrm1_Click DMe_Click 3、用于設置通用對話框控件顯示文件類型的屬性是（ ）AFilter BPath CPartern DFoleName 4、用

40、于從內存刪除窗體的命令是（ ）AMove BHide CUnload DDelete 5、用于返回窗體可用區域寬度的屬性是（ ）AScaleWidth BScaleLeft CScaleHeight DScaleTop 6、下列關于屬性設置的敘述錯誤的是：（ ）A一個控件具有什么屬性是VB預先設計好的，用戶不能改變B一個控件具有什么屬性是VB預先設計好的，用戶可以改變C一個控件的屬性即可以在屬性窗口中設置，也可以用程序代碼設置D一個控件的屬性在屬性窗口中設置，還可以利用程序代碼為其設置新值 7、下列說法正確的是（ ）A對象屬性只能在“屬性窗口”中設置B一個新的工程可以在“工程窗口”中建立C必須

41、先建立一個工程，才能開始設計應用程序D只能在“代碼窗口”中編寫程序代碼 8、下列關于窗體上控件的基本操作錯誤的是（ ）A按下一次DEL鍵只能刪除一個控件B按下一次DEL鍵可以同時刪除多個控件C按住SHIFT鍵，然后單擊每個要選擇的控件，可以同時選中多個控件D按住ALT鍵，然后單擊每個要選擇的控件，可以同時選中多個控件 9、下列關于設置控件屬性的敘述正確的是（ ）A用戶必須設置屬性值B所有的屬性值都可以由用戶隨意設定C屬性值不必一一重新設置D不同控件的屬性項都完全一樣 10、不可以通過下列（ ）操作將焦點賦給對象A運行時使用TAB鍵B在代碼中用CALL語句調用C在代碼中用SETFOCUS方法D用

42、訪問鍵或用鼠標單擊選擇對象 11、要在FORM_LOAD事件過程中使用PRINT方法在窗體上輸出一定的內容，應（ ）A設置窗體的VISIBLE屬性B設置窗體的CAPTIONC調用窗體的SHOW方法D設置窗體ENABLED屬性 12、下面（ ）對象無CAPTION屬性AFORMBCOMMANDBUTTONCTEXTBOXDLABEL 13、通用對話框控件和文件列表框控件中，都能根據文件的類型對要顯示的文件進行篩選過濾，后者使用（ ）屬性進行該項設置。APatternBPath CFilter DFileName 14、對于復選框控件chkBoy，如果在程序中設置它為選中狀態，下面語句正確的是（

43、）AchkBoy.Checked = true BchkBoy.Value = trueCchkBoy.Selected = true DchkBoy.Value = 1 15、計時器（Timer）控件用于每隔一段時間自動觸發一次Timer事件，可以有規律地重復執行一段程序，它用于設置兩次事件時間間隔的屬性是（ ）AIntervalBSmallChangeCLargeChangeDMax 16、以下關于VB中窗體（Form）的說法中，不正確的描述為（ ）A執行Unload Form語句后，窗體Form消失，但仍在內存中B當窗體的Enabled屬性為False時，通過鼠標和鍵盤對窗體的操作都被禁

44、止C窗體的Height、width屬性用于設置窗體的高和寬D窗體的load事件在加載窗體時發生 17、關于滾動條控件，下面說法錯誤的是（ ）A點擊滾動條的箭頭，可以改變它的value值，從而引發Change事件B拖動滾動框，可以觸發Scroll事件C通常，水平滾動條的值從左向右遞增，垂直滾動條的值自上而下遞增D拖動滾動框，可以觸發Change事件，而且是連續觸發的 18、在窗體上放置一個命令按鈕，名稱為Command1。單擊命令按鈕時，執行如下事件過程：PriVate Sub Command1_C1ick()a$="software and hardware"b$Right

45、(a$,8)c$=Mid(a$,1,8)Msgbox a$,b$,c$,1End Sub則在彈出的信息框的標題欄中顯示的信息是（ ）AsoftWare and hardwareBsoftwareChardwafeD出現錯誤 19、在多重窗體程序設計中，關鍵的問題是要解決不同窗體之間的銜接和窗體的顯示、關閉等問題，以下關于窗體的相關語句和方法的敘述中，錯誤的是（ ）ALoad語句用于加載指定窗體，即在內存中創建該窗體BShow方法兼具Load語句的功能，可以將窗體顯示出來CHide方法用于將窗體隱藏起來DUnload語句用來釋放窗體，但窗體并沒從內存中消 20、滾動條控件的屬性中，表示取值范圍最

46、大值的屬性是（ ）AMaxBLargeChange CMinDValue 21、程序中如果需要檢測和控制鼠標的位置和狀態的改變，就需要使用鼠標事件，其中下面哪個選項用于表示拖動事件（ ）ADragDrop BMouseDownCMouseUpDMouseMove 22、為了使用通用對話框進行打開文件的操作，應將通用對話框的Action屬性設定為（ ）。A0 B1 C2 D3三、簡答題 1、什么是單選按鈕？什么是復選框？在使用上有什么不同？ 2、滾動條的change事件和scroll事件有什么不同？ 3、快捷鍵和訪問鍵有什么區別？ 4、在程序運行期間，如果拖動滾動條上的滾動塊（即滑塊），則觸發滾

47、動條的什么事件？ 5、假定有一個菜單項，名為MenuItem，為了在運行時使該菜單項失效（變灰），應使用什么語句？ 6、為了暫時關閉計時器（即時鐘控件），應把該計時器的什么屬性設置為False？ 7、單選按鈕和復選框（即檢查框）各用于什么情況？ 8、如何為一個菜單項設置熱鍵和快捷鍵？ 9、菜單的形式有哪兩種？ 10、在KeyPress事件中，如何取消用戶剛輸入的字符？ 11、框架的作用是什么？ 12、如果要計時器每秒鐘發生4個Timer事件，則Interval屬性值應設多少？ 13、在一個窗體的程序代碼中能否訪問另一個窗體上控件的屬性？若不行則請說明理由；若行則請說明如何訪問。 14、如何在框

48、架中建立控件？ 15、組合框有哪幾種類型？四、讀程序題 1、對窗體編寫如下代碼：Option Base 1Private Sub Form_KeyPress(KeyAscii As Integer)a = Array(237,126,87,48,498)m1 = a(1)m2 = 1If KeyAscii = 13 ThenFor i =2 To 5If a(i)>ml Thenm1 =a(j)m2 =iEnd IfNext iEnd IfPrint m1Print m2End Sub程序運行后，按回車鍵，輸出結果是什么？ 2、閱讀下面的程序，寫出執行結果。Private Sub Form_load()Form1.showd = 0For a = 1 To 2For b = 1 To aFor c = b To 5d = d +