《VB程序設(shè)計(jì)》綜合復(fù)習(xí)資料習(xí)題(共31頁)

1、精選優(yōu)質(zhì)文檔-傾情為你奉上VB程序設(shè)計(jì)綜合復(fù)習(xí)資料習(xí)題.txt男人偷腥時(shí)的智商僅次于愛因斯坦。美麗讓男人停下，智慧讓男人留下。任何東西都不能以健康做交換。VB程序設(shè)計(jì)綜合復(fù)習(xí)資料第一章 Visual Basic程序設(shè)計(jì)概述一、填空題 1、Visual Basic是一種面向_的可視化程序設(shè)計(jì)語言，采取了_的編程機(jī)制。 2、在VB中工程文件的擴(kuò)展名是_，窗體文件的擴(kuò)展名是_，標(biāo)準(zhǔn)模塊文件的擴(kuò)展名是_。 3、執(zhí)行"工程"菜單下的_命令，可選擇并添加ActiveX控件。 4、Visual Basic 6.0用于開發(fā)_環(huán)境下的應(yīng)用程序。二、選擇題 1、下面不是VB工作模式的是（ ）A

2、設(shè)計(jì)模式B運(yùn)行模式C匯編模式D中斷模式 2、可視化編程的最大優(yōu)點(diǎn)是（ ）A具有標(biāo)準(zhǔn)工具箱B一個(gè)工程文件由若干個(gè)窗體文件組成C不需要編寫大量代碼來描述圖形對(duì)象D所見即所得 3、下列不能打開屬性窗口的操作是（ ）A執(zhí)行"視圖"菜單中的"屬性窗口"命令B按F4鍵 C按Ctrl+TD單擊工具欄上的"屬性窗口"按鈕 4、下列可以打開立即窗口的操作是（ ）ACtrl+D BCtrl+E CCtrl+F DCtrl+G 5、Visual Basic的編程機(jī)制是（ ）A可視化 B面向?qū)ο?C面向圖形 D事件驅(qū)動(dòng)三、簡(jiǎn)答題 1、代碼窗口主要包括哪幾部分

3、？ 2、在工程資源管理器窗口中，主要列出了哪三類文件？ 3、窗體布局窗口的主要用途是什么？ 4、VB的基本特點(diǎn)是什么？ 5、怎樣理解可視化設(shè)計(jì)？ 6、怎要理解事件驅(qū)動(dòng)編程？第二章 簡(jiǎn)單的VB程序設(shè)計(jì)一、填空題 1、設(shè)置是否可以用Tab鍵來選取命令按鈕，應(yīng)該用_屬性。 2、一個(gè)控件在窗體的位置由_和_屬性決定，其大小由_和_屬性決定。 3、利用對(duì)象的屬性setfocus可獲得焦點(diǎn)，對(duì)于一個(gè)對(duì)象，只有其visible屬性和_屬性為true，才能接受焦點(diǎn)。 4、設(shè)置控件背景顏色的屬性名稱是_。 5、所有控件都具有的共同屬性是_屬性。 6、一般情況下，控件有兩個(gè)屬性項(xiàng)的缺省值是相同的，這兩個(gè)屬性項(xiàng)是_

4、。 7、VB中的每個(gè)對(duì)象（控件）都有一組特征，這組特征稱為_，我們通過修改它可以控制對(duì)象的外觀和操作。 8、通常情況下，VB中一個(gè)工程主要包括如下四個(gè)文件：窗體文件、工程文件、類模塊文件和_文件，后者的擴(kuò)展名為.Bas，通常由Basic語言編寫，是一個(gè)可共用的子程序。 9、VB有三種工作模式，分別是設(shè)計(jì)（Design）模式、_和中斷（Break）模式。二、選擇題 1、以下能夠觸發(fā)文本框Change事件的操作是（ ）A文本框失去焦點(diǎn)B文本框獲得焦點(diǎn)C設(shè)置文本框的焦點(diǎn)D改變文本框的內(nèi)容 2、應(yīng)用程序設(shè)計(jì)完成后，應(yīng)將程序保存，保存的過程是（ ）A只保存窗體文件即可B只保存工程文件即可C先保存工程文件

5、，之后保存窗體文件D先保存窗體文件（或標(biāo)準(zhǔn)模塊文件），之后還要保存工程文件 3、VB應(yīng)用程序的運(yùn)行模式是（ ）A解釋運(yùn)行模式B編譯運(yùn)行模式C兩者都有D匯編模式 4、任何控件都具有的屬性是（ ）ATEXTBCAPTIONCNAMEDFORECOLOR 5、決定控件上文字的字體、字形、大小及效果的屬性是（ ）ATEXTBCAPTIONCNAMEDFONT 6、在窗體上建立了多個(gè)控件，如TEXT、LABEL1、COMMAND1，若要使程序一運(yùn)行焦點(diǎn)就定位在COMMAND1控件上，應(yīng)將COMMAND1控件的（ ）設(shè)置為0AINDEXBTABINDEXCTABSTOPDENABLED 7、運(yùn)行時(shí)，當(dāng)用戶

6、向文本框輸入新的內(nèi)容，或在程序代碼中對(duì)文本框的TEXT屬性進(jìn)行賦值從而改變了文本框的TEXT屬性值時(shí)，將觸發(fā)文本框的（ ）事件ACLICKBDBLCLICKCGOTFOCUSDCHANGE 8、在運(yùn)行時(shí)，按TAB鍵跳過了一個(gè)可以獲得焦點(diǎn)的控件（如文本框），則可能是因?yàn)椋?）A該控件的TABSTOP屬性值為TRUE B該控件的TABINDEX屬性值為FALSEC該控件的ENABLED屬性值為TRUE D該控件的ENABLED屬性值為FALSE 9、為了防止用戶隨意將光標(biāo)置于控件上，應(yīng)（ ）A將控件的TABINDEX屬性設(shè)置為0B將控件的TABSTOP屬性設(shè)置為TRUEC將控件的TABSTOP屬性

7、設(shè)置為FALSED將控件的ENABLED屬性設(shè)置為FALSE 10、若要使標(biāo)簽控件顯示時(shí)，不覆蓋其背景內(nèi)容，應(yīng)設(shè)置標(biāo)簽控件的（ ）屬性ABACKCOLORBBORDERSTYLECFORECOLORDBACKSTYLE 11、如果要在文本框中輸入字符時(shí)，只顯示某個(gè)字符，如星號(hào)（*），運(yùn)行時(shí)，在文本框中輸入的字符仍然顯示出來，而不顯示星號(hào)，原因可能是（ ）A文本框的MULTILINE屬性值為TRUEB文本框的LOCKED屬性值為TRUEC文本框的MULTILINE屬性值為FALSED文本框的LOCKED屬性為FALSE 12、在運(yùn)行階段，要在文本框TEXT1獲得焦點(diǎn)時(shí)選中文本框中所有內(nèi)容，對(duì)應(yīng)的

8、事件過程是（ ） APrivate Sub Text1_GotFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub BPrivate Sub Text1_LostFocus( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub CPrivate Sub Text1_Change( )Text1.SelStart=0Text1.Sellength=Len(Text1.Text)End Sub DPrivate Sub Text1_SetFocus( )Text1.S

9、elStart=0Text1.Sellength=Len(Text1.Text)End Sub 13、Visual Basic繼承了Basic語言簡(jiǎn)單易用的語法特點(diǎn)，同時(shí)支持面向?qū)ο蟮木幊虣C(jī)制，其中構(gòu)成其控件（對(duì)象）的三要素是（ ）A屬性、事件、事件過程 B控件、窗體、事件C屬性、過程、方法 D屬性、事件、方法 14、決定標(biāo)簽（Label）顯示的屬性是（ ）AText BName CCaption DAlignment 15、命令按鈕的標(biāo)題文字由（ ）屬性來設(shè)置。AText BCaption CName D(名稱) 16、若要設(shè)置文本的顯示顏色，則可用（ ）屬性來實(shí)現(xiàn)。ABackColor B

10、Forecolor CFillColor DBackstyle 17、在運(yùn)行時(shí)，若要調(diào)用某命令鈕的Click事件過程，則可設(shè)置該命令鈕對(duì)象的（ ）屬性為Ture來實(shí)現(xiàn)。AEnabled BValue CDefault DCancel 18、在運(yùn)行時(shí)，若要獲得用戶在文本框中所選擇的文本，可通過訪問（ ）屬性來實(shí)現(xiàn)。ASelStart BSelLenght CText DSelText三、簡(jiǎn)答題 1、事件驅(qū)動(dòng)的含意是什么？舉例說明。 2、交互式開發(fā)方法和傳統(tǒng)的應(yīng)用程序開發(fā)過程有什么不同？ 3、文本框在什么情況下使用？ 4、什么是工程？ 5、結(jié)構(gòu)化程序設(shè)計(jì)的三種基本結(jié)構(gòu)是什么？ 6、對(duì)象的三要素是什

11、么？并分別進(jìn)行簡(jiǎn)單的解釋。 7、為什么要生成可執(zhí)行文件和制作安裝盤？ 8、使用變量前先聲明有什么好處？ 9、如何使用幫助功能？ 10、結(jié)構(gòu)化程序設(shè)計(jì)的特點(diǎn)是什么？ 11、為了把焦點(diǎn)移到某個(gè)指定的控件，在代碼中應(yīng)使用的方法是什么？ 12、啟動(dòng)Visua Basic后，只創(chuàng)建了一個(gè)窗體，若此時(shí)保存，需要保存幾個(gè)文件？各是什么文件？先保存的是哪一個(gè)？ 13、為了防止文本框中的信息運(yùn)行后被用戶修改，應(yīng)設(shè)置什么屬性？第三章 VB語言基礎(chǔ)一、填空題 1、一般可以使用_關(guān)鍵字聲明常量。 2、_類型也稱變體類型，是一種通用的、可變的數(shù)據(jù)類型，它可表示或存儲(chǔ)任何一種數(shù)據(jù)類型。 3、變量的聲明分為兩種方法：_和_

12、。 4、在VB中，用_語句設(shè)定數(shù)組的下界，用_和_語句分別返回?cái)?shù)組的上、下界。 5、在代碼模塊中加入Option Explicit的目的是_。 6、function aa (a1 as date,optional a2 as boolean) as single，寫出optional命令的作用_。 7、在VB中，我們用一個(gè)簡(jiǎn)單的_語句就能實(shí)現(xiàn)退出程序。 8、生成消息框的命令是_，生成輸入框的命令是_。 9、通用對(duì)話框（commondialog）屬activex控件，它可以顯示多個(gè)標(biāo)準(zhǔn)對(duì)話框，包括打開/另存為、字體、打印等對(duì)話框，若要顯示所有文件，則應(yīng)設(shè)置其屬性filter=_，若要使它顯示為打

13、印對(duì)話框，則應(yīng)使用什么方法_。 10、從字符串中任意位置截取字符的函數(shù)是_。 11、語句For j = 3 To 20 Step 3 使循環(huán)體執(zhí)行了_次。 12、對(duì)于正在使用的動(dòng)態(tài)數(shù)組Arraya()，要增加一個(gè)單元，但不能破壞數(shù)組內(nèi)的數(shù)據(jù)，則應(yīng)使用語句_。 13、在Visual Basic中聲明靜態(tài)變量的關(guān)鍵字是_。 14、表達(dá)式10 Mod 6 4的值為_。 15、表達(dá)式chr(Asc("a") + 5)的值為_。 16、VB中使用注釋有2種方法，即_和_。 17、VB中的數(shù)據(jù)以四種形式存儲(chǔ)：常量、_、_和記錄。 18、為了在VB中存儲(chǔ)一個(gè)4行5列的二維矩陣，需要定義一

14、個(gè)整型的數(shù)組，請(qǐng)把數(shù)組定義語句補(bǔ)充完整：Dim Juzhen(_ _) as Integer。 19、控件數(shù)組由一組相同類型的控件組成，這些控件共用一個(gè)相同的控件名，但是每個(gè)控件都有一個(gè)唯一的下標(biāo)來區(qū)分，我們使用屬性_ _來設(shè)置下標(biāo)。 20、在過程調(diào)用中，實(shí)現(xiàn)調(diào)用過程的實(shí)參和被調(diào)用過程的形參之間的數(shù)據(jù)傳遞有兩種方式：按值傳遞和_ _。 21、為了保證程序中必須對(duì)變量的強(qiáng)制性定義，需要在代碼模塊的聲明部分加入_語句。 22、分析For.Next循環(huán)結(jié)構(gòu)的實(shí)例：For i = 5 To 30 Step 2 中，循環(huán)體一共執(zhí)行了_次。 23、表達(dá)式Mid("UniversityOfPetr

15、oleum", 8, 4) 的值為_。 24、常量分為普通常量和_常量。 25、要將大寫字母轉(zhuǎn)換為小寫字母，可使用_函數(shù)。 26、不管焦點(diǎn)在哪個(gè)控件上，按_鍵相當(dāng)于按了取消按鈕。 27、執(zhí)行"工程"菜單下的_命令，可選擇并添加ActiveX控件。 28、_是程序中VB停止執(zhí)行的地方。 29、邏輯常量為True或_。 30、使用了_的聲明后，當(dāng)程序中使用未經(jīng)聲明的變量時(shí)，程序運(yùn)行時(shí)會(huì)報(bào)錯(cuò)。 31、要將小寫字母轉(zhuǎn)換為大寫字母，可使用_函數(shù)。 32、自字符串N1位開始向右取N2個(gè)字符，要使用_函數(shù)。 33、日期常量表示時(shí)，用符號(hào)_將日期型數(shù)據(jù)括起來。 34、局部變量只能

16、在_中聲明和使用。 35、模塊級(jí)變量的聲明關(guān)鍵字是Dim或_。 36、函數(shù)Abs(x)的功能是_。 37、表達(dá)式3/6*5的值是_。二、選擇題 1、以下哪個(gè)是合法的變量（ ）ArightBabc123C123_abcDab123c 2、下列說法錯(cuò)誤的是（ ）A在同一模塊不同過程中的變量可以同名B不同模塊中定義的全局變量不可以同名C引用另一模塊中的全局變量時(shí)，必須在變量名前加模塊名D同一模塊中不同級(jí)的變量可以同名 3、把MsgBox的返回值轉(zhuǎn)換為數(shù)值應(yīng)該使用的函數(shù)是（ ）ALog BStr CLen DVal 4、語句DIM AA(3,4,5)中定義的數(shù)組有（ ）個(gè)元素A12 B60 C120

17、D345 5、下面程序運(yùn)行后輸出的結(jié)果是（ ） A$="CHINA" B$=STRING$(3,A$) PRINT B$ ENDACHI BCCC CINA DAAA 6、以下語句的輸出結(jié)果是（ ）Print Format$(32548.5, "000,000.00")A32548.5 B325,485.00 C032,548,50 D32,548,50 7、以下敘述中錯(cuò)誤的是（ ）A如果過程被定義為Static類型，則該過程中的局部變量都是Static類型BSub過程中不能嵌套定義Sub過程CSub過程中可以嵌套調(diào)用Sub過程D事件過程可以像通用過程一

18、樣由用戶定義過程名 8、Visual Basic提供的On Error Resume next錯(cuò)誤陷阱語句表示（ ）A當(dāng)發(fā)生錯(cuò)誤時(shí)，使程序轉(zhuǎn)跳到語句標(biāo)號(hào)為0的程序塊B當(dāng)發(fā)生錯(cuò)誤時(shí)，不使用錯(cuò)誤處理程序塊C當(dāng)發(fā)生錯(cuò)誤時(shí)，忽略錯(cuò)誤行，繼續(xù)執(zhí)行下一語句D當(dāng)發(fā)生錯(cuò)誤時(shí)，終止本過程執(zhí)行，繼續(xù)執(zhí)行下一過程 9、在Visual Basic中，若要將控制權(quán)交給操作系統(tǒng)則通過（ ）的語句。AEnd BExit Do CExit Sub DDoEvents 10、在Visual Basic 中語句的續(xù)行號(hào)采用（ ）A空格與下劃線 B下劃線與空格 C空格與短線 D短線與空格 11、假定有以下程序段：For i=1 t

19、o 3For j=5 to 1 Step -1Print i*jNext j,i則語句Print i*j的執(zhí)行次數(shù)是（ ）A15 B.16 C17 D18 12、從鍵盤上輸入兩個(gè)字符串，分別保存在變量str1、str2中。確定第二個(gè)字符串在第一個(gè)字符串中起始位置的函數(shù)是（ ）ALeft BMid CString DInstr 13、如果將布爾常量值TRUE賦值給一個(gè)整型變量，則整型變量的值為（ ）A0B-1CTRUEDFALSE 14、下列敘述不正確的是（ ）A注釋語句是非執(zhí)行語句，僅對(duì)程序的內(nèi)容起注釋作用，它不被解釋和編譯B注釋語句可以放在代碼中的任何位置C注釋語句不能放在續(xù)行符的后面D代碼

20、中加入注釋語句的目的是提高程序的可讀性 15、語句PRINT "INT(-13.2)"；INT(-13.2)的輸出結(jié)果為（ ）AINT(-13.2)= -13.2BINT(-13.2)= 13.2CINT(-13.2)= -13DINT(-13.2)= -14 16、如果TAB函數(shù)的參數(shù)小于1，則打印位置在第（ ）列A0B1C2D3 17、變量未賦值時(shí)，數(shù)值型變量的值為（ ）A、0B空C1D無任何值 18、下列語句中正確的是（ ）Atxt1.text+txt2.text=txt3.textB=cmdokC12label.caption=1234Da

21、=inputbox("hello") 19、假設(shè)變量BOOLVAR是一個(gè)布爾型變量，則下面正確的賦值語句是（ ）ABOOLVAR='TRUE'BBOOLVAR=.TRUECBOOLVAR=#TRUE#DBOOLVAR=3<4 20、以下（ ）程序段可以實(shí)施X、Y變量值的變換（ ）AY=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)的輸出結(jié)果為（ ）ASGN(-26)=26BSGN(-26)= -26CSGN(-26)= +1D

22、SGN(-26)= -1 22、讀下面程序段，判斷變量Str2的取值是（ ）Dim Str1, Str2 as StringStr1="University"Str2=STRING$(3,Str1)AUniBUUUCityDyyy 23、VB支持自定義數(shù)據(jù)類型，在某程序中我們定義了如下類型：Type Studentnumber As stringname As Stringage As IntegerEnd Type針對(duì)上述定義，如下幾項(xiàng)用法正確的是（ ）AS="張三" BDim s As S"張紅

23、"CDim s As Type Student DDim s As Type ="張三" ="張三" 24、一個(gè)工程中包含兩個(gè)名稱分別為Form1、Form2的窗體，一個(gè)名稱為mdlFunc的標(biāo)準(zhǔn)模塊。假定在Form1、Form2和mdlFunc中分別建立了自定義過程，其定義格式為：Form1中定義的過程： Private Sub frmfunction1() End Sub Form2中定義的過程： Public Sub frmfunction2() End Sub mdlFunc中定義的過程： Public Sub

24、mdlFunction() End Sub 在調(diào)用上述過程的程序中，如果不指明窗體或模塊的名稱，則以下敘述中正確的是（ ）A上述三個(gè)過程都可以在工程中的任何窗體或模塊中直接被調(diào)用B只有mdlFunction過程能夠被工程中各個(gè)窗體或模塊直接被調(diào)用Cfrmfunction1只能在form1中調(diào)用，而frmfunction2 則可以在所有模塊或窗體中被直接調(diào)用D上述三個(gè)過程都只能在各自被定義的模塊中直接調(diào)用 25、VB中Do.Loop結(jié)構(gòu)既可以構(gòu)成當(dāng)型循環(huán)，也可以構(gòu)成直到型循環(huán)，根據(jù)下面的代碼：Dim i,n as Integern = 20i = 1 Do Print i; i = i + 2L

25、oop Until i >20 判斷循環(huán)結(jié)構(gòu)的類型和循環(huán)體的執(zhí)行次數(shù)，正確的選項(xiàng)是（ ）A當(dāng)型循環(huán)，20次B直到型循環(huán)，10次C當(dāng)型循環(huán)，10次D直到型循環(huán)，20次 26、在程序中，使用InputBox函數(shù)可以接受用戶的輸入，如果要把它的返回值轉(zhuǎn)換為數(shù)值型的數(shù)據(jù)，應(yīng)該使用的函數(shù)是（ ） AValBLen CStr DLog 27、動(dòng)態(tài)數(shù)組因?yàn)樵诔绦蜻\(yùn)行前無法確定數(shù)組的大小，所以經(jīng)常根據(jù)程序的運(yùn)行情況，對(duì)數(shù)組進(jìn)行重新定義，以下關(guān)于VB中動(dòng)態(tài)數(shù)組的敘述中不正確的是（ ）A可以用ReDim語句重新定義動(dòng)態(tài)數(shù)組，并且可以進(jìn)行多次重定義B首次用Dim進(jìn)行動(dòng)態(tài)數(shù)組聲明的時(shí)候，必須指明它的類型和上下界

26、CPreserve為ReDim語句的可選參數(shù)，用于保留動(dòng)態(tài)數(shù)組原來的內(nèi)容D當(dāng)對(duì)動(dòng)態(tài)數(shù)組使用Erase語句進(jìn)行釋放操作時(shí)，將釋放其內(nèi)存 28、VB中的控件也叫做部件或組件，主要包括三類，以下哪一項(xiàng)不屬于VB控件的分類（ ）A控件 B可插入對(duì)象CADO控件 DActiveX控件 29、表達(dá)式4+5 6 * 7 / 8 Mod 9 的值是（ ）A4 B5 C6 D7 30、可以同時(shí)刪除字符串前導(dǎo)和尾部空白的函數(shù)是（ ）ALtrim BRtrim CTrim DMid三、簡(jiǎn)答題 1、全局變量聲明有哪些限制？ 2、字符串是否可以自動(dòng)轉(zhuǎn)換為數(shù)字類型？ 3、用Format函數(shù)格式化后的字符格式在不同區(qū)域環(huán)境

27、下的輸出是否相同？為什么？ 4、在InputBox函數(shù)中，哪一個(gè)參數(shù)是必需的？ 5、在MsgBox函數(shù)中哪一個(gè)參數(shù)是必須的？ 6、在什么情況下使用過程？ 7、為什么要進(jìn)行程序調(diào)試？ 8、調(diào)試程序有哪些手段？ 9、用語句Dim A(-3 To 5) As Integer定義的數(shù)組的元素個(gè)數(shù)是多少？ 10、設(shè)有如下的Visual Basic表達(dá)式：5*x2-3*x-2*Sin(a)/3，與它對(duì)應(yīng)的數(shù)學(xué)式是什么？ 11、數(shù)學(xué)式對(duì)應(yīng)的VB表達(dá)式是什么？ 12、表達(dá)式2>3 And 4<=5 Or 4>4的值是什么？ 13、怎樣在程序中設(shè)置斷點(diǎn)？ 14、在什么情況下可以設(shè)置斷點(diǎn)？ 15

28、、程序出錯(cuò)的類型有哪幾種？ 16、在同一模塊、不同過程中聲明的相同變量名，兩者是否表示同一個(gè)變量？為什么？ 17、什么情況下會(huì)出現(xiàn)"數(shù)組下標(biāo)越界錯(cuò)誤"？ 18、逐語句和逐過程有什么區(qū)別？ 19、表達(dá)式2.75 * 2 3.45的值是什么？ 20、在程序設(shè)計(jì)中為什么盡量不用GoTo語句？四、讀程序題 1、分析以下程序，寫出運(yùn)行結(jié)果。 Private Sub Form_Click() score = Int(Rnd * 10) + 80 Select Case score Case Is < 60 A$ = "F" Case 60 To 69 A$ =

29、 "D" Case 70 To 79 A$ = "C" Case 80 To 89 A$ = "B" Case Else A$ = "A" End Select Print A$ End Sub 2、讀下面的程序，分析其功能，寫出運(yùn)行結(jié)果。在窗體上有一個(gè)命令按鈕，名稱為Command1。然后編寫如下程序：Private Sub Command1_Click()For I = 1 To 4For J = 0 To IPrint Chr$(65 + I);Next JPrintNext IEnd Sub程序運(yùn)行后，如果

30、單擊命令按鈕，則在窗體上顯示的內(nèi)容是什么？ 3、閱讀下面的程序，分析并寫出其功能。 Sub insert(a() As Single,ByVal x As Single) Dim m as integer,n as integer n=1 Do While n<20 And x>a(n) n=n+1 Loop For m=20-1 To n Step -1 a(m+1)=a(m) Next m a(n)=xEnd Sub 4、分析以下程序，寫出運(yùn)行結(jié)果。Sub subP(b() As Integer)For i =1 To 4b(i)=2*iNext iEnd SubPrivate

31、 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運(yùn)行上面的程序，單擊命令按鈕，輸出結(jié)果是什么？ 5、分析以下程序，寫出運(yùn)行結(jié)果。Sub sele() Dim n as Integer i=21:n=3 Do While i>n i=in Loop Print iEnd Sub 6、分析以下程序，寫出運(yùn)行結(jié)果。Sub selectPrint()Dim a as IntegerDim b as IntegerD

32、im 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、分析以下程序，寫出運(yùn)行結(jié)果。Sub swap() Dim x as Integer Dim y as Integer Dim z as Integer x=1:y=2:z=0 Print x;y;z x=x+y x=x*z Print x,y,zEnd Sub 8、分析以下程序，寫出運(yùn)行結(jié)果。Sub selectPrint() Dim a as Integer Di

33、m 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、輸入一年號(hào)，判斷它是否是閏年。界面如下圖所示，包括兩個(gè)標(biāo)簽、一個(gè)文本框和一個(gè)命令按鈕。提示：如果此年號(hào)能被400整除或者不能被400除盡，也不能被100除盡，但能被4整除，則它是閏年；否則，不是閏年。 2、輸入兩個(gè)正整數(shù)m、n，求m和n的最大公約數(shù)。要求建立如下圖所示的窗體，其中主要的控件包括：兩個(gè)標(biāo)簽（Lable1、Lable2）、兩個(gè)文本框（Text1、Text2）和一個(gè)按鈕（Com

34、mand1）。 3、輸入某學(xué)生成績(jī)（百分制），若是100成績(jī)90輸出優(yōu)秀；若是90成績(jī)80輸出良好；若是80成績(jī)70輸出中等；若是70成績(jī)60輸出及格；若是60成績(jī)0，輸出不及格；若是其他數(shù)則輸出error信息。 4、在窗體中顯示從9號(hào)字型到16號(hào)字型。 5、在有序序列中插入一個(gè)數(shù)，使插入后的數(shù)列仍然有序（設(shè)按由小到大排列）。 6、編程實(shí)現(xiàn)二維數(shù)組轉(zhuǎn)置。 7、隨機(jī)輸入10個(gè)100以內(nèi)的整型數(shù)，計(jì)算其和及平均值。 8、找出所有的水仙花數(shù)。水仙花數(shù)是個(gè)三位數(shù)，它的各位數(shù)字的立方和等于這個(gè)三位數(shù)本身。例如37133+73+13，則371是水仙花數(shù)。 9、從鍵盤輸入一個(gè)大于2的正整數(shù)，判斷該數(shù)是否是素

35、數(shù)。 10、求二維數(shù)組中的最小值及其所在行號(hào)、列號(hào)。 11、求一元二次方程ax2+bx+c=0的根（包括實(shí)根和復(fù)根）。 12、輸入一個(gè)正整數(shù)n，計(jì)算出n!并輸出。 13、Faibonacci數(shù)列為0，1，1，2，3，5，8，13 .，計(jì)算并輸出第20項(xiàng)以及前20項(xiàng)的和。第四章 常用控件與窗體一、填空題 1、向列表框控件添加新項(xiàng)目的方法是_。 2、在VB中，最主要的兩種對(duì)象是_和_。 3、當(dāng)窗體啟動(dòng)時(shí)可通過_屬性控制窗體位于所有者的中心位置。 4、若要將窗體Form1隱藏起來，則可通過執(zhí)行代碼_來實(shí)現(xiàn)。 5、要使裝入到列表框中的數(shù)據(jù)項(xiàng)能自動(dòng)按字母順序排序，應(yīng)設(shè)置該控件的_屬性為_。 6、窗體上放

36、置了若干個(gè)文本框和命令按鈕，當(dāng)窗體裝入后，要將焦點(diǎn)自動(dòng)定位到文本框Text1上，則在設(shè)計(jì)時(shí)需要將_控件的_屬性設(shè)置為_。 7、在標(biāo)簽控件中通過編程使文字換行用的代碼是_。 8、設(shè)置計(jì)時(shí)器控件只能觸發(fā)_事件。 9、設(shè)置計(jì)時(shí)器對(duì)象觸發(fā)事件的時(shí)間間隔用_屬性。 10、滾動(dòng)條控件主要支持兩個(gè)事件，它們是_事件。 11、要使鼠標(biāo)停留在按鈕上顯示特殊的鼠標(biāo)形狀，應(yīng)設(shè)置的屬性值是_。 12、設(shè)某列表框共有10項(xiàng)，按題目要求補(bǔ)齊程序，完成相應(yīng)的功能。（1）按下命令按鈕Command1時(shí)將列表框第8項(xiàng)的內(nèi)容顯示在窗體上：Private Sub Command1_Click( )List._(7)=TruePri

37、nt List1._End Sub（2）單擊列表框某一項(xiàng)時(shí)立即將該項(xiàng)打印在窗體上：Private Sub List1_Click( )Print_End Sub（3）按下命令按鈕Command1時(shí)在窗體上刪除第1、3、5、7、9項(xiàng)：Private Sub Command1_Click( )For I=1 To 5List1._Next IEnd Sub（4）在列表框的每一項(xiàng)之后插入一個(gè)新的項(xiàng)：Private Sub Command1_Click( )For I=1 to 10X=InputBox("請(qǐng)輸入插入的第" & I & "項(xiàng)內(nèi)容"

38、)List1.AddItem_Next IEnd Sub 13、設(shè)在界面上放置了一個(gè)滾動(dòng)條Hscroll1和一個(gè)標(biāo)簽控件Label1，要使每次單擊滾動(dòng)條兩端箭頭時(shí)，或單擊滾動(dòng)條滑塊與兩端箭頭之間的空白區(qū)域時(shí)，標(biāo)簽內(nèi)容能夠反映滾動(dòng)條的值，補(bǔ)齊以下代碼。Private Sub Hscroll1._( )Label1.Caption = Hscroll1._End Sub要使拖動(dòng)滾動(dòng)條滑塊時(shí)標(biāo)簽內(nèi)容能夠反映滾動(dòng)條的值，補(bǔ)齊以下代碼。Private Sub Hscroll1._( )Label1.Caption = Hscroll1._End Sub 14、列表框（ListBox）用于列出可供選擇的項(xiàng)

39、目的列表，用戶可以選擇一個(gè)或多個(gè)項(xiàng)目。它具有幾個(gè)非常重要的數(shù)組屬性，其中_ _屬性存放了列表框中所有項(xiàng)目的值。 15、菜單項(xiàng)一般由標(biāo)題、訪問鍵、快捷鍵和復(fù)選標(biāo)志等構(gòu)成，通過對(duì)相應(yīng)的屬性進(jìn)行設(shè)置可以改變這些項(xiàng)目的狀態(tài)，其中與復(fù)選標(biāo)志相對(duì)應(yīng)的屬性是_ _。 16、keydown與keypress事件各有其參數(shù)，若需獲得用戶按下 "a" 還是 "A" 需用_事件。 17、控件_組合了文本框和列表框的功能，是VB中一種功能非常強(qiáng)大的選擇類控件。 18、若需要將窗體Form2以模態(tài)窗口的形式顯示出來，可通過執(zhí)行代碼_來實(shí)現(xiàn)。 19、菜單中的分隔條是一種菜單控件，不

40、響應(yīng)_事件，不能被選中。二、選擇題 1、當(dāng)程序運(yùn)行時(shí)，在窗體上單擊鼠標(biāo)，以下哪個(gè)事件是窗體不會(huì)接收到( )AMouseDownBMouseUpCLoad DClick 2、窗體Form1的Name屬性是Frm1，它的單擊事件過程名是（ ）AForm1_Click BForm_Click CFrm1_Click DMe_Click 3、用于設(shè)置通用對(duì)話框控件顯示文件類型的屬性是（ ）AFilter BPath CPartern DFoleName 4、用于從內(nèi)存刪除窗體的命令是（ ）AMove BHide CUnload DDelete 5、用于返回窗體可用區(qū)域?qū)挾鹊膶傩允牵?）AScaleWi

41、dth BScaleLeft CScaleHeight DScaleTop 6、下列關(guān)于屬性設(shè)置的敘述錯(cuò)誤的是：（ ）A一個(gè)控件具有什么屬性是VB預(yù)先設(shè)計(jì)好的，用戶不能改變B一個(gè)控件具有什么屬性是VB預(yù)先設(shè)計(jì)好的，用戶可以改變C一個(gè)控件的屬性即可以在屬性窗口中設(shè)置，也可以用程序代碼設(shè)置D一個(gè)控件的屬性在屬性窗口中設(shè)置，還可以利用程序代碼為其設(shè)置新值 7、下列說法正確的是（ ）A對(duì)象屬性只能在"屬性窗口"中設(shè)置B一個(gè)新的工程可以在"工程窗口"中建立C必須先建立一個(gè)工程，才能開始設(shè)計(jì)應(yīng)用程序D只能在"代碼窗口"中編寫程序代碼 8、下列關(guān)于

42、窗體上控件的基本操作錯(cuò)誤的是（ ）A按下一次DEL鍵只能刪除一個(gè)控件B按下一次DEL鍵可以同時(shí)刪除多個(gè)控件C按住SHIFT鍵，然后單擊每個(gè)要選擇的控件，可以同時(shí)選中多個(gè)控件D按住ALT鍵，然后單擊每個(gè)要選擇的控件，可以同時(shí)選中多個(gè)控件 9、下列關(guān)于設(shè)置控件屬性的敘述正確的是（ ）A用戶必須設(shè)置屬性值B所有的屬性值都可以由用戶隨意設(shè)定C屬性值不必一一重新設(shè)置D不同控件的屬性項(xiàng)都完全一樣 10、不可以通過下列（ ）操作將焦點(diǎn)賦給對(duì)象A運(yùn)行時(shí)使用TAB鍵B在代碼中用CALL語句調(diào)用C在代碼中用SETFOCUS方法D用訪問鍵或用鼠標(biāo)單擊選擇對(duì)象 11、要在FORM_LOAD事件過程中使用PRINT方法

43、在窗體上輸出一定的內(nèi)容，應(yīng)（ ）A設(shè)置窗體的VISIBLE屬性B設(shè)置窗體的CAPTIONC調(diào)用窗體的SHOW方法D設(shè)置窗體ENABLED屬性 12、下面（ ）對(duì)象無CAPTION屬性AFORMBCOMMANDBUTTONCTEXTBOXDLABEL 13、通用對(duì)話框控件和文件列表框控件中，都能根據(jù)文件的類型對(duì)要顯示的文件進(jìn)行篩選過濾，后者使用（ ）屬性進(jìn)行該項(xiàng)設(shè)置。APatternBPath CFilter DFileName 14、對(duì)于復(fù)選框控件chkBoy，如果在程序中設(shè)置它為選中狀態(tài)，下面語句正確的是（ ）AchkBoy.Checked = true BchkBoy.Value = tr

44、ueCchkBoy.Selected = true DchkBoy.Value = 1 15、計(jì)時(shí)器（Timer）控件用于每隔一段時(shí)間自動(dòng)觸發(fā)一次Timer事件，可以有規(guī)律地重復(fù)執(zhí)行一段程序，它用于設(shè)置兩次事件時(shí)間間隔的屬性是（ ）AIntervalBSmallChangeCLargeChangeDMax 16、以下關(guān)于VB中窗體（Form）的說法中，不正確的描述為（ ）A執(zhí)行Unload Form語句后，窗體Form消失，但仍在內(nèi)存中B當(dāng)窗體的Enabled屬性為False時(shí)，通過鼠標(biāo)和鍵盤對(duì)窗體的操作都被禁止C窗體的Height、width屬性用于設(shè)置窗體的高和寬D窗體的load事件在加載

45、窗體時(shí)發(fā)生 17、關(guān)于滾動(dòng)條控件，下面說法錯(cuò)誤的是（ ）A點(diǎn)擊滾動(dòng)條的箭頭，可以改變它的value值，從而引發(fā)Change事件B拖動(dòng)滾動(dòng)框，可以觸發(fā)Scroll事件C通常，水平滾動(dòng)條的值從左向右遞增，垂直滾動(dòng)條的值自上而下遞增D拖動(dòng)滾動(dòng)框，可以觸發(fā)Change事件，而且是連續(xù)觸發(fā)的 18、在窗體上放置一個(gè)命令按鈕，名稱為Command1。單擊命令按鈕時(shí)，執(zhí)行如下事件過程： PriVate Sub Command1_C1ick() a$="software and hardware" b$Right(a$,8) c$=Mid(a$,1,8) Msgbox a$,b$,c$,1

46、 End Sub則在彈出的信息框的標(biāo)題欄中顯示的信息是（ ）AsoftWare and hardwareBsoftwareChardwafeD出現(xiàn)錯(cuò)誤 19、在多重窗體程序設(shè)計(jì)中，關(guān)鍵的問題是要解決不同窗體之間的銜接和窗體的顯示、關(guān)閉等問題，以下關(guān)于窗體的相關(guān)語句和方法的敘述中，錯(cuò)誤的是（ ） ALoad語句用于加載指定窗體，即在內(nèi)存中創(chuàng)建該窗體 BShow方法兼具Load語句的功能，可以將窗體顯示出來 CHide方法用于將窗體隱藏起來 DUnload語句用來釋放窗體，但窗體并沒從內(nèi)存中消 20、滾動(dòng)條控件的屬性中，表示取值范圍最大值的屬性是（ ）AMaxBLargeChange CMinDV

47、alue 21、程序中如果需要檢測(cè)和控制鼠標(biāo)的位置和狀態(tài)的改變，就需要使用鼠標(biāo)事件，其中下面哪個(gè)選項(xiàng)用于表示拖動(dòng)事件（ ）ADragDrop BMouseDownCMouseUpDMouseMove 22、為了使用通用對(duì)話框進(jìn)行打開文件的操作，應(yīng)將通用對(duì)話框的Action屬性設(shè)定為（ ）。A0 B1 C2 D3三、簡(jiǎn)答題 1、什么是單選按鈕？什么是復(fù)選框？在使用上有什么不同？ 2、滾動(dòng)條的change事件和scroll事件有什么不同？ 3、快捷鍵和訪問鍵有什么區(qū)別？ 4、在程序運(yùn)行期間，如果拖動(dòng)滾動(dòng)條上的滾動(dòng)塊（即滑塊），則觸發(fā)滾動(dòng)條的什么事件？ 5、假定有一個(gè)菜單項(xiàng)，名為MenuItem，為了在運(yùn)行時(shí)使該菜單項(xiàng)失效（變灰），應(yīng)使用什么語句？ 6、為了暫時(shí)關(guān)閉計(jì)時(shí)器（即時(shí)鐘控件），應(yīng)把該計(jì)時(shí)器的什么屬性設(shè)置為False？ 7、單選按鈕和復(fù)選框（即檢查框）各用于什么情況？ 8、如何為一個(gè)菜單項(xiàng)設(shè)置熱鍵和快捷鍵？ 9、菜單的形式有哪兩種？ 10、在KeyPress事件中，如何取消用戶剛輸入的字符？ 11、框架的