VB程序練習(xí)題整理稿

1、1退出Visual Basic的快捷鍵是_。 A. Ctrl+Q B. Shift+Q C. Alt+Q D. Ctrl+Alt+Q2窗體設(shè)計器是用于設(shè)計_。 A應(yīng)用程序的界面 B. 對象的屬性 C應(yīng)用程序的代碼 D. 窗體的代碼3啟動Visual Basic后, VB為用戶建立的第一個窗體是_。 AForm1 B. Form C窗體1 D. 窗體4啟動Visual Basic后, VB為用戶新建立的工程的名字是_。 A窗體1 B. 工程1 C窗體 D. 工程5工程資源管理器窗口包含的文件類型有_種。 A1 B. 2 C3 D. 46如果VB環(huán)境中缺少某個窗口，一般應(yīng)從主菜單_的下拉菜單中找到

2、相應(yīng)的激活命令。 A編輯 B. 文件 C調(diào)試 D. 視圖7能夠通過標(biāo)準(zhǔn)工具欄打開的窗口是_。 A代碼窗口 B. 設(shè)計器窗口 C屬性窗口 D. 窗體布局窗口8窗體文件的擴(kuò)展名_。 A.bas B. vbp C.exe D. frm9工程文件的擴(kuò)展名_。 A.com B. vbp C. exe D. bas10Visual Basic的編程機制是_。 A面向過程 B. 面向?qū)ο?C事件驅(qū)動 D. 可視化（三）練習(xí)題使用VB建立一個應(yīng)用軟件的全過程有哪些步驟？。1具體過程如下（1）在窗體上建立用戶窗口（界面）對象。（2）分別對對象設(shè)置屬性。（3）分別對對象事件的過程編程且完成代碼輸入。（4）運行程序

3、和調(diào)試程序。（5）保存程序。12 保存VB文件，至少要保存幾個文件？應(yīng)先保存什么文件？2至少保存2個文件，先保存窗體文件，后保存工程文件。工程文件，窗體文件，標(biāo)準(zhǔn)模塊文件，類模塊文件的文件名的擴(kuò)展名分別是什么？3.vbp, .frm, .bas, .3 用代碼對窗體中的控件設(shè)置屬性值，這些代碼應(yīng)該放在什么事件中？ 應(yīng)該放在窗體裝入（Form_Load）事件中4 運行程序有幾種方法？各是什么？三種：方法一是執(zhí)行工具欄中的啟動按鈕；方法二是選取菜單中的“運行/啟動”命令；方法三是直接按F5鍵。5 從代碼窗口返回到設(shè)計窗體窗口（VB集成開發(fā)環(huán)境）有幾種方法？至少5種方法：點擊窗體窗口；選擇菜單欄的v

4、iewobject; shift+F7; 點擊資源管理器中的窗體按鈕；單擊工程資源管理器中的窗體名稱（如：form1）。7輸入代碼忘記屬性值時怎么辦？在代碼窗口輸入代碼時，控件的名稱及圓點輸入后，系統(tǒng)自動出現(xiàn)屬性及方法的下拉列表，可以幫助使用者快速輸入。8在代碼窗口輸入代碼時，輸入控件的名稱及圓點后，出現(xiàn)下拉列表后，如何輸入方法或?qū)傩裕枯斎敕椒ɑ蛘邔傩躁P(guān)鍵字的首字母進(jìn)行初選，再用鼠標(biāo)或者光標(biāo)鍵細(xì)選，然后雙擊鼠標(biāo)左鍵或者單擊空格鍵。9窗體、標(biāo)簽、命令按鈕、文本框的默認(rèn)屬性分別是什么？標(biāo)簽、命令按鈕、文本框、圖形圖像框的默認(rèn)屬性分別為：caption、caption、text和picture。10

5、在輸入代碼時，如何從屬性列表和方法列表中快速輸入屬性及方法？ 可以先輸入屬性或方法的首字母，然后找到需要的屬性及方法并選擇，用鼠標(biāo)雙擊或擊空格鍵即可完成輸入。第三章 VB語言基礎(chǔ)（三）練習(xí)題1. VB定義了哪幾種數(shù)據(jù)類型？變量有哪幾種數(shù)據(jù)類型？常量有哪幾種數(shù)據(jù)類型？ VB6.0定義了13種數(shù)據(jù)類型，分別是整數(shù)、長整數(shù)、單精度浮點型、雙精度浮點型、貨幣型、字節(jié)型、變長字符串、定長字符串、布爾型、日期型、對象型、可變類型（數(shù)值）、可變類型（字符）。變量的數(shù)據(jù)類型有：數(shù)值型（整型、長整型、單精度浮點型、雙精度浮點型、貨幣型和字節(jié)型）、字符串（變長字符串和定長字符串）、布爾型、日期型、對象型、可變數(shù)據(jù)

6、類型（數(shù)值和字符）。1. 常量的數(shù)據(jù)類型有：字符串常量、數(shù)值常量（整型、長整型、單精度浮點型、雙精度浮點型、貨幣型和字節(jié)型）、布爾常量、日期常量。2. 如果希望使用變量x來存放數(shù)據(jù)765432.123456，應(yīng)該將變量x聲明為何種類型？ 應(yīng)該使用雙精度數(shù)Double類型。 3. VB共有幾種表達(dá)式？根據(jù)什么確定表達(dá)式的類型？VB有5種類型的表達(dá)式，分別是：算術(shù)表達(dá)式、字符串表達(dá)式、關(guān)系表達(dá)式、布爾表達(dá)式和日期表達(dá)式，VB根據(jù)表達(dá)式的運算符來確定表達(dá)式的類型。4.5. 在VB中，對于沒有賦值的變量，系統(tǒng)默認(rèn)值是什么？在VB中，當(dāng)使用聲明語句建立一個變量后，系統(tǒng)自動將數(shù)值類型的變量賦初值0，變長的

7、字符串被初始化為一個零長度的字符串（""），而定長的字符串則用空格填充。Variant變量被初始化為Empty。將布爾型的變量初始化為False。6.7. VB算術(shù)表達(dá)式a/(b+c/(d+e/Sqr(f)的數(shù)學(xué)表達(dá)式是什么？寫成的數(shù)學(xué)表達(dá)式為8. 函數(shù)Int(Rnd(0)*10)屬于哪個范圍內(nèi)的整數(shù)？(0,10)9. 順序結(jié)構(gòu)的特點是什么？順序結(jié)構(gòu)是一種線性結(jié)構(gòu)，在這種結(jié)構(gòu)中，各操作塊按照各自某種順序依次執(zhí)行。10. Rem和單撇號有什么不同？Rem命令及命令后的說明文字要求獨占一行，Rem和注釋文字間一定要加一個空格，如果非要使用Rem命令將注釋語句寫在某條語句后，則需

8、在Rem前使用英文“:”號；而單撇號沒有上述限制11. 試述Tab()和Space()兩個函數(shù)的區(qū)別？Tab()函數(shù)是絕對定位函數(shù)，總是從左邊界開始；Space()函數(shù)能從當(dāng)前輸出位置起輸出若干空格（形成一段空距）12. 試述Int()和Fix()兩個函數(shù)的區(qū)別？Fix(x)函數(shù)無論對正數(shù)或負(fù)數(shù)都是去掉小數(shù)部分，取整數(shù)部分（符號不變），如：Fix(9.1)=Fix(9.9)=9，F(xiàn)ix(-9.1)=Fix(-9.9)=-9；而Int(x)函數(shù)返回的是不超過x的最大整數(shù)，如：Int(9.1)=Int(9.9)=9，Int(-9.1)=Int(-9.9)=-10。（5）練習(xí)題1將一個一維數(shù)組a(9

9、)中各元素值按行的順序放入二維數(shù)組b(3×3)。 Private Sub Command2_Click()Dim Sum As Single, Count As Integer, Val As SingleSum = 0Count = -1Val = 1While Val <> 0 Val = InputBox("請輸入一個數(shù):" & Chr(13) & Chr(10) & "輸入0結(jié)束程序!") Sum = Sum + Val Count = Count + 1WendIf Count <> 0

10、 ThenPrint "While-Wend 循環(huán):","共輸入了" Count; "個數(shù)","平均值為:" Sum / CountEnd IfEnd Sub2用隨機數(shù)函數(shù)產(chǎn)生10個40內(nèi)的整數(shù)，使用選擇排序法從小到大排序 Private Sub Form_Click()Dim N as Integer,Sum as Single,Term as SingleN = 1Sum = 0DoTerm = 1 / (N * N)Sum = Sum + TermN = N + 2Loop Until Term < 0

11、.0001Print "運算結(jié)果為:" SumPrint "最后一項的值為:" TermEnd Sub3生成下列二維數(shù)組，且按下列格式輸出。 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 Private Sub Command1_Click()Print Tab(18); "雙循環(huán)的結(jié)果"For i = 1 To 10 Print Tab(25 - i); For j = 1 To 2 * i - 1 Print "*" Next j Print Next iEnd Sub4將一

12、個一維數(shù)組反序放置。例如： a=(67,89,76,98,66), 反序放置后，a=(66,98,76,89,67) Private Sub Command1_Click()Dim ACount As Integer, BCount As Integer,Dim CCount As Integer, QCount As IntegerDim CH As String * 1ACount = 0BCount = 0CCount = 0QCount = 0For I = 1 To 30CH = InputBox("請輸入一個字符!" & Chr(13) & Ch

13、r(10) + "連續(xù)輸入三個字符Q,可結(jié)束程序", "字符統(tǒng)計")CH = UCase(CH)If CH = "Q" Then QCount = QCount + 1 Else QCount = 0If QCount = 3 ThenMsgBox "連續(xù)輸入了三個字符Q,結(jié)束輸入", , "注意"Exit ForEnd IfSelect Case CHCase "A"ACount = ACount + 1Case "B"BCount = BCount +

14、 1Case "C"CCount = CCount + 1End SelectNext IText1.Text = ACount: Text2.Text = BCount: Text3.Text = CCountEnd Sub5有一個m×n矩陣，找出最大元素值及其最大元素值所在的行、列位置。 Private Sub Form_Click() Dim N As Integer, I As Integer N = InputBox("請輸入一個數(shù)正整數(shù)N：") factorial = 1 Sum = 0 For I = 1 To N factori

15、al = factorial * I Sum = Sum + factorial Next I Print "小于自然數(shù)" N; "的自然數(shù)階乘之和為：", SumEnd Sub6將矩陣m(n,n)主對角線和次對角線上的元素置為1，其余元素置為0。 Private Sub Form_Click() a = 0 b = 1 Print a, b, For i = 1 To 9 a = a + b b = a + b Print a, b, If i Mod 2 = 1 Then Print Next iEnd Sub運行結(jié)果見圖：7Private Sub

16、Form_Click() For i = 1 To 9 For j = 1 To i Print Tab(11 * (j - 1); j; "*" i; "=" Str(i * j); Next j Print Next iEnd Sub運行結(jié)果如下圖所示：7將一個二維數(shù)組a（m,n）按行順序?qū)⒚總€元素放入一個一維數(shù)組b(m×n)。 編寫了兩個按扭的事件程序。“求最大公約數(shù)”按扭的過程為：Dim A As Integer, B As Integer, N As Integer, M As Integer, R As IntegerPrivate

17、 Sub Command1_Click() M = Val(Text1.Text) N = Val(Text2.Text) A = M B = N If N = 0 Then Exit Sub R = M Mod N Do While R <> 0 M = N N = R R = M Mod N Loop Label3.Caption = NEnd Sub“求最小公倍數(shù)”按扭的過程為：Private Sub Command2_Click() If N <> 0 Then Label4.Caption = A * B / NEnd Sub運行界面可參閱圖。說明：該設(shè)計運行

18、時，如果要求最小公倍數(shù)，需要先按“求最大公約數(shù)”的按扭，求出最大公約數(shù)后方可按“求最小公倍數(shù)”的按扭8將用 inputbox()輸入的一個數(shù)插入到一個按遞增排列的有序數(shù)列中，插入后該數(shù)列仍然有序。 窗體的Click事件過程為：Private Sub Form_Click() n = 0 For i = 3 To 1000 Step 2 prime = 1 x = 2 m = Int(Sqr(i) While x <= m And prime = 1 If i Mod x = 0 Then prime = 0 Else x = x + 1 End If Wend If prime = 1

19、And i Mod 10 = 3 Then n = n + 1 If n Mod 5 = 0 Then Print i Else Print i, End If End If Next i Print Print "1000以內(nèi)個位數(shù)為3的素數(shù)共有" n; "個"End Sub 9有一個無序數(shù)組，刪去與第一個元素值相同的其他元素值，刪除后其他元素的值前移。運行結(jié)果見圖10窗體的Click事件過程為：Private Sub Form_Click() Sum = 1 / 2 x = 1 y = 2 For i = 2 To 10 temp = x x = y

20、 y = x + temp Sum = Sum + x / y Next i Print "數(shù)列的前10項的和為：", Sum Print "該數(shù)列的第10項為：", x; "/" yEnd Sub說明：該數(shù)列的規(guī)律是：數(shù)列項的分子為其前一項的分母，分母為其前一項的分子與分母之和。在程序中注意生成新的分子和分母時需要利用中間變量temp，并且關(guān)注計算的順序。1函數(shù)過程有什么不足？1當(dāng)有以下二點時，用函數(shù)不方便：（1）不是為了獲得某個函數(shù)值，而是為了某種功能的處理。（2）要獲得多個結(jié)果。2子過程與函數(shù)過程區(qū)別有哪些？2(1)函數(shù)過程名有

21、值，有類型，在函數(shù)體內(nèi)至少賦值一次；子過程名無值，無類型，在子過程體內(nèi)不能對子過程名賦值；(2)調(diào)用時，子過程調(diào)用是一句獨立的語句。函數(shù)過程不能作為單獨的語句加以調(diào)用，必須參與表達(dá)式運算。(3)一般當(dāng)過程有一個函數(shù)值，使用函數(shù)過程較直觀；反之若過程無返回值，或有多個返回值，使用子過程較直觀。3函數(shù)的參數(shù)傳遞時，什么是傳址方式？3傳址：形參得到的是實參的地址，當(dāng)形參值的改變同時也改變實參的值4函數(shù)的參數(shù)傳遞時，什么是傳值方式4傳值： 形參得到的是實參的值，形參值的改變不會影響實參的值。5什么是變量、過程的作用域？5作用域：變量、過程隨所處的位置不同，可以被訪問的范圍6過程的作用域有哪幾個級別？其

22、對應(yīng)的關(guān)鍵字是什么？6 窗體/模塊級：加Private關(guān)鍵字的過程，只能被定義的窗體或模塊中的過程調(diào)用。全局級：加Public關(guān)鍵字（缺?。┑倪^程，可供該應(yīng)用程序的所有窗體和所有標(biāo)準(zhǔn)模塊中的過程調(diào)用。7在VB中，變量有哪些級別？如何定義？7局部變量：在過程內(nèi)聲明的變量，只能在本過程中使用。窗體/模塊級變量：在“通用聲明”段中用Dim語句或用Private語句 聲明的變量,可被本窗體/模塊的任何過程訪問。 全局變量：在“通用聲明”段中用Public語句聲明的變量，可被本應(yīng)用程序的任何過程或函數(shù)訪問。8什么是遞歸？請舉例說明。8用自身的結(jié)構(gòu)來描述自身就稱為“遞歸”。例如對階乘的定義：n！n*（n1

23、）?。╪1)?。╪1）*（n2）！，0！19設(shè)計遞歸時應(yīng)遵循哪些原則？ 9遞歸過程中有終止的條件和終止時的值或某種操作；每遞歸調(diào)用一次，其中的參數(shù)要向終止方向收斂。（三）練習(xí)題1. VB中可使用的控件分為哪幾類？1. VB中可使用的控件分為三類：標(biāo)準(zhǔn)控件、ActiveX控件和可插入對象。2. 框架有什么作用？2. 每個窗體中可能會存在許多控件，為了將控件適當(dāng)?shù)匕垂δ芊纸M，可以使用框架將某些控件組合在一起，對一個窗體中的各種功能進(jìn)行分類，以便于用戶識別。當(dāng)用框架將同一個窗體上的單選按鈕分組后，每一組單選按鈕都是獨立的3. 列表框的作用是什么？3. 列表框以列表形式顯示一系列項目，用戶可以從中選擇

24、一個或者多個列表項。4. 組合框有哪幾種類型？4. 組合框的類型有：下拉式組合框（Style屬性值為0）、簡單組合框（Style屬性值為1）和下拉式列表框（Style屬性值為2）。5. 時鐘控件的作用如何？5. 時鐘控件是一種可按一定時間間隔觸發(fā)事件的控件，通常用于檢查系統(tǒng)時鐘，確定是否執(zhí)行某項任務(wù)。運行時，時鐘控件不可見。6. 鼠標(biāo)事件有哪些？6. 鼠標(biāo)事件有Click、Dblclick、MouseDown、MouseUp和MouseMove。7. 鍵盤事件有哪些？各自的作用如何？7. 鍵盤事件有KeyPress、KeyUp和KeyDown。其中KeyUp和KeyDown所接收到的信息與Ke

25、yPress接收到的不完全相同。KeyUp和KeyDown能檢測到KeyPress不能檢測到的功能鍵、編輯鍵和箭頭鍵。KeyPress接收到的是用戶通過鍵盤輸入的ASCII碼字符。8. Animation控件有什么用處？8. Animation控件只能播放無聲的AVI文件，不能播放含有聲音數(shù)據(jù)的AVI文件。9. 怎樣設(shè)置鼠標(biāo)光標(biāo)的形狀? 9. 鼠標(biāo)光標(biāo)的形狀通過MousePointer屬性來設(shè)置，該屬性可以在屬性窗口中設(shè)置，也可以在程序代碼中設(shè)置。MousePointer的屬性是一個整數(shù)，可以取015。10. SSTab控件的Click事件過程有什么特點？10. SSTab控件用來制作含有選項

26、卡的對話框。SSTab控件具有特殊的Click事件過程，其參數(shù)previoustab標(biāo)識先前為活動的選項卡。另外，在當(dāng)前活動的選項卡上單擊不會觸發(fā)Click事件，只有當(dāng)單擊其他的選項卡時才發(fā)生該事件。第八章 數(shù)據(jù)文件（三）練習(xí)題1什么是文件？1文件是存儲在外部介質(zhì)上數(shù)據(jù)的集合。2根據(jù)訪問模式，文件可分為哪些種類？請說出其特點。2 文件是記錄的集合?？煞譃橄铝腥N：順序訪問模式：順序文件，記錄可長可短；按順序依次把記錄寫入文件；按順序依次把記錄讀出來。隨機訪問模式：隨機文件，記錄的長度相同；隨機文件可以直接訪問文件中的任意一個記錄，根據(jù)記錄號訪問。二進(jìn)制訪問模式：二進(jìn)制文件（可認(rèn)為記錄長度為1）

27、。直接把二進(jìn)制碼存放在文件中。3若要對文件進(jìn)行訪問，需要經(jīng)過哪幾個步驟？3需要進(jìn)行三個步驟：打開文件、對文件進(jìn)行操作和關(guān)閉文件。4打開一個順序文件時，有哪幾種打開的模式？都有什么作用？4有三種打開的模式可以選擇：OUTPUT：對文件進(jìn)行寫操作；INPUT：對文件進(jìn)行讀操作；APPEND：把數(shù)據(jù)追加到文件末尾。5讀順序文件時，有哪幾種命令可以使用？命令的格式和作用各是什么？5有三種命令語句可以使用：INPUT #文件號,變量列表把讀出的每個數(shù)據(jù)項分別存放到所對應(yīng)的變量。LINE INPUT #文件號,字符串變量讀一行到變量中，主要用來讀取文本文件。INPUT$(讀取字符數(shù),#文件號)隨意讀取字符

28、6LOF()和EOF()都有什么作用？6 LOF(文件號)：返回文件的長度(總字節(jié)數(shù))。EOF(文件號)：返回讀寫位置。指針在文件尾時，EOF函數(shù)為True，否則為False。7已知有一個數(shù)據(jù)文件data.dat，請編寫程序?qū)ata.dat中的數(shù)據(jù)復(fù)制到文件student.dat中去。7Private Sub Form_Load()Dim char As ByteDim FileNum1,FileNum2 as IntegerFileNum1 = FreeFile '打開源文件Open "C:DATA.DAT" For Binary As # FileNum1Fi

29、leNum2 = FreeFile ' 打開目標(biāo)文件Open "C:STUDENT.DAT" For Binary As # FileNum2Do While Not EOF(FileNum1)Get # FileNum1, , char ' 從源文件讀出一個字節(jié)Put # FileNum2, , char ' 將一個字節(jié)寫入目標(biāo)文件LoopClose #FileNum1Close #FileNum2End Sub8已知一個學(xué)生信息的文本文件為student.dat，學(xué)生信息包括：姓名（字符型），專業(yè)（字符型），年齡（整型），分?jǐn)?shù)（整型）編寫程序，找出其中分?jǐn)?shù)最高的和分?jǐn)?shù)最低的學(xué)生并輸出其記錄到文件HL.TXT中去。 8 Private Sub Form_Click() Dim name$, spe$, age%，score% Dim hname$, hspe$, hage%，hscore% Dim lname$, lspe$, lage%，lscore% Open "c:student.dat" Fo