1、vb 程序設計教程第四版課后答案【篇一：visual_basic 程序設計教程（第4 版 ）_課后答案】第一章習題參考答案1、 填空題1 、對象事件驅動2 、編譯運行模式解釋運行模式2、 簡答題1 、 簡述 vb 的特點。答：可視化的程序設計方法面向對象的程序設計思想事件驅動的編程機制結構化的程序設計語言高度的可擴充性強大的數據庫訪問能力支持動態數據交換支持對象鏈接與嵌入2 、簡述vb 的安裝過程。答：向光驅中放入vb安裝光盤；計算機將運行自動安裝程序，若沒有，執行 vb目錄下的 setup.exe ；根據提示逐一回答問題，并點擊 下一步”；點擊 “完成 ”；3 、如何啟動vb 。答：三種方法

2、：單擊 “開始 ”按鈕，選擇“程序 ”菜單下的“ microsoft visual basic6.0 中文版 ”菜單項并單擊；雙擊桌面上的vb6.0 快捷圖標；在 “開始 ”菜單的運行對話框中輸入命令來啟動vb；第二章習題參考答案一、選擇題：1-10、 dcacdbcbbc11-20 、 badcabbaab21-29 、 aacbbcddc二、填空題1 窗體、控件2 屬性值3 屬性窗口設置、代碼窗口設置4 事件過程5 對象名、下劃線、事件名6 form_click第三章習題參考答案一、選擇題1、 b 2、 c 3、 a4、 b5、 a6、 c 7、 c二、填空題1、 11字符型、字節型、整型

3、、長整型、單精度型、雙精度型、貨幣型、邏輯型、日期型、對象型、變體型。string 、 byte 、 integer 、 long 、single 、 double 、 currency 、 boolean 、 date 、 object 、 variant2、 雙引號（英文）、 #3、 ascii 、 1 、 24、 public 、通用、dim 、 static 、 private 、 static5、 、 +、 +6、 、now（） 、 time 、日期型三、解答題1、 （3） 2、 （1 ）3、（1 ）常量（關鍵字）（ 2）字符型常量（3）邏輯型常量（4）變量 （ 5）字符串常量（ 6

4、）變量（ 7）字符串常量（8）變量（9）日期型常量（題目應是#11/16/1999# ）（ 10 ）數值型常量（單精度）4、 315、 （1） （1+y/x）/（1-y/x）（2） x八3+3*x*y/（2-y）（3） sqr（abs（a*b-c八3）（4） sqr（s*（s-a）*（s-b）*（s-c）6、7、 、（1 ） 13 （ 2） 17（ 3） #1999-11-12# （ 4） zxy123abc8、（1 ） 19（ 2） 8.16666666666667（ 3） 5 25（ 4） 29、（1 ） -4 （ 2） 2 . 82842712474619 （ 3） -3（ 4） 49（

5、 5） ” hello （” 6） he7) 16 (8) “-459.65 ” ( 9) 510、(4)11 、(2)12、(4)第四章習題參考答案一、選擇題：1 7: daabbcd二、填空題1 500.00%2 將字號擴大為原來的二倍3 b三、編程題(略)1 文本框、標簽和命令按鈕的名稱分別為text1 、 label1 、command1 private sub command1_click()label1.caption=text1.textcommand1.caption=text1.textend sub2 單價、數量、折扣和應付款對應的文本框的名稱分別為：text1 、text

6、2 、 text3 和 text4 ，計算和清除命令按鈕的名稱分別為：command1 和 command2 。private sub command1_click()text4=val(text1)*val(text2)*val(text3)end subprivate sub command2_click()text1= ”: text2= ”: text3= ”: text4= ”end sub3 文本框、“轉大寫 ”命令按鈕和“轉大寫 ”命令按鈕的名稱分別為text1 、 command1 和 command2private sub command1_click()text1=ucas

7、e(text1)end subprivate sub command2_click()text1=lcase(text1)end sub第五章 習題參考答案一、選擇題：二、填空題1 (3) 2 1 2 3 3 223 4 160 5 96 78 7 x=5 ( 或 x6 或x7) 8 b9 isum isum+j 1250三、編程題1 private sub form_click()dim i%,s%s=0for i = 101 to 200 step 2if i mod 30 thenprint is=s+iend ifnext iprint send sub2 private sub fo

8、rm_click()dim n%,ss=1:n=0while s=400000n=n+1s=s*nwendif s400000 then n=n-1print nend sub3 private sub form_click()dim imin%,imax%,i%,r%imin=100:imax=20for i=1 to 20r=int(rnd*51+50)if rimax then imax=rif rimin then imin=rnext iprint imax,iminend sub第六章 習題參考答案一、選擇題：1 13: abaaccbadadbb二、填空題1 intervalla

9、bel1.caption=time2 list1.listcountinterval三、編程題1. private sub command1_click()if option1.value = true and option3.value = true thentext1.fontname = 宋體text1.fontsize = 8end ifif option1.value = true and option4.value = true thentext1.fontname = 宋體text1.fontsize = 12end ifif option2.value = true and o

10、ption3.value = true thentext1.fontname = 黑體text1.fontsize = 8end ifif option2.value = true and option4.value = true thentext1.fontname = 黑體text1.fontsize = 12end ifend sub hscroll1.max2.9.timer 的 enable 為 falseinterval 為 100private sub command1_click()timer1.enabled = trueend subprivate sub command2

11、_click()timer1.enabled = falseend subprivate sub timer1_timer()汽車 .left = 汽車 .left + 100end sub第七章 習題參考答案一、選擇題：1 12: dcadd bbdac cb二、填空題1 42 2 index 3 414 a(i)=a(11-i) a(11-i)=tmp5 1 6 x mod 7=0 7 2108 0 to 8i+1 to 99 3 k110 1001max maxarrn(i) ( 或者 arrn(i)max)三、編程題1 private sub c1_click()if op1(0).v

12、alue=true then p1.print選擇了橢圓形“”if op1(1).value=true then p1.print 選擇了圓形 “”if op1(2).value=true then p1.print選擇了正方形“”end sub2 統計按鈕名為command1 ，輸入框名為text1 ，輸出框為text2(multline 設為 true)private sub command1_click()dim x(1 to 26) as integer,i as integerdim s as string,l as integerl=len(text1.text)for i=1 t

13、o ls=mid(text1,i,1) s=ucase(s)if s = a and s = z then【篇vb 程序設計教程課后答案（第三版）】找。習題二1.對象指現實世界中的實體。每個對象有自己的特征（屬性）、行為（方法）和發生在該對象上的活動（事件）。類是對同一種對象的集合與抽象。類包含所創建對象的屬性數據，以及對這些數據進行操作的方法。封裝和隱藏是類的重要特性，將數據結構和對數據的操作封裝在一起，類的內部實現細節對用戶來說是透明的。vb 工具箱中的可視圖標是vb 系統設計好的標準控件類。通過將控件類實例化，得到真正的控件對象。在窗體上畫一個控件，就將類轉換為對象，創建了一個控件對象。

14、vb 中常用的對象是控件。此外，vb 還提供了系統對象。窗體是個特例，它既是類也是對象。當向一個工程添加一個新窗體時，實質就由窗體類創建了一個窗體對象。對象的三要素：屬性、事件和方法。屬性：存放對象的數據(決定對象外觀及功能)對象屬性的設置方法：在設計階段，利用屬性窗口直接設置屬性值；程序運行時，通過語句 對象名. 屬性名=屬性值。若屬性只能在設計階段設置，在程序運行階段不可改變，稱為只讀屬性。事件：發生在對象上的事情。同一事件，對不同的對象，會引發不同的反應。事件過程：應用程序處理事件的步驟。應用程序設計的主要工作就是為對象編寫事件過程的代碼。方法：面向對象的程序設計語言，為程序設計人員提供

15、了一種特殊的過程和函數。方法是面向對象的，調用時一定要指明對象。2. 窗體和控件具有的基本屬性“(1) name 屬性：名稱所創建的對象名稱,在程序中引用。(2) caption 屬性：標題該屬性決定了對象上顯示的內容。(3) height 、 width 、 top 和 left 屬性決定對象的大小和位置。(4) enabled 屬性：對象是否允許操作(5) visible 屬性：對象是否可見(6) font 屬性組：文本的外觀fontname 字體、 fontsize 大小fontbold 粗體、 fontitalic 斜體fontstrikethru 刪除線fontunderline 下

16、劃線(7) forecolor 屬性：前景顏色(8) backcolor 屬性：背景顏色mousepointer 屬性：鼠標指針類型,設置值范圍015,由系統指定 。若為99，由用戶提供的圖形文件定義鼠標指針形狀。(10) mouseicon 屬性：在mousepointer 屬性值為99 時，存放自定義的鼠標圖標文件(.ico 或 .cur )。圖標庫在graphics 目錄下。3. 窗體的事件：load 事件是在窗體被裝入工作區時觸發的事件。當應用程序啟動，自動執行該事件，該事件通常用來在啟動應用程序時對屬性和變量進行初始化。窗體的方法: ( 1 ) print 方法用來顯示文本內容，格式

17、：對象.print 表達式( 2) cls 方法清除運行時在窗體或圖形框中產生的文本或圖形, cls 方法不能清除窗體在設計時的文本和圖形。格式：對象.cls( 3) move 方法可移動窗體或控件，并可改變其大小。語法格式如下：對象 .move 左邊距離,上邊距離,寬度 ,高度 4. 標簽作用：用于顯示文本(輸出)信息，不能作為輸入信息的界面。其內容只能通過caption 屬性設置或修改，不能直接編輯。5. 文本框是一個文本編輯區域，可以在該區域輸入、編輯、修改和顯示正文內容。在vb 中字符長度以字為單位，也就是一個西文字符與一個漢字都是一個字，長度為1 。重要屬性(1) text 顯示或輸

18、入的正文內容。(2) maxlength 設置文本框可輸入的文字最大長度。默認值為0，表示可以輸入任意長字符串。(3) multiline 多行屬性設置為 true 時，文本框可以輸入或顯示多行正文，同時具有文字處理器的自動換行功能，按enter 鍵可插入一空行。(4) scrollbars 滾動條屬性0-none 無滾動條1-horizontal 水平滾動條2-vertical 垂直滾動條3-both 同時加水平和垂直滾動條注意：當multiline 為 true 時， scrollbars 才有效(5) passwordchar 設置顯示文本的替代符。例如，當設置為“ *，”則在文本框輸入

19、的內容均以“ *”顯示，而存儲的值是用戶輸入的原文。一般用于設置口令的輸入。當 multiline 為 true 時，該屬性不起作用，密碼不允許多行。(6) locked 指定文本控件是否可被編輯，默認值為false( 可編輯)，當設置為true 時，文本控件相當于標簽控件的作用。注意： locked 與 enabled 的區別。(7)文本內容進行選擇操作的三個屬性selstart 選定的正文開始位置sellength 選定的正文長度seltext 選定的正文內容這 3 個屬性互相關聯,例如設置selstart 、 sellength 后， seltext 自動存放指定的文本。注意：屬性窗口中

20、沒有這三個屬性，只能在程序代碼中使用。6. 文本框的事件：(1) change 事件：當text 屬性值發生改變時引發該事件(2) keypress 事件：按下并且釋放鍵盤上的一個鍵時，引發焦點所在控件的keypress 事件，所按鍵的值存放在參數keyascii 中。對回車的判斷keyascii=137. 文本框最有用的方法是setfocus ，把光標移到指定的文本框中。8. 命令按鈕picture 屬性：按鈕可顯示圖片文件(.bmp 和 .ico) ，當style 為 1 時有效。10 . 啟動窗體時將命令按鈕定位在窗體中央的代碼private sub form_load()command

21、1.left = form1.scalewidth / 2 - command1.width / 2command1.top = form1.scaleheight / 2 - command1.height / 2 end sub11 vb 圖片文件在c:program filesmicrosoft visualstudiocommongraphics 文件夾。安裝 vb 時可選擇是否安裝這些圖片文件。習題三1. 合法常量：(1) double(2) 錯誤(3) double(4) double(5) 錯誤(6) integer(7) string(8) string(9) date(10)

22、 double(11) 錯誤(漢字字符)(12)integer( 八進制 )(13) 錯誤(八進制無數碼8)(14) integer(15) boolean(16) 錯誤(17) 錯誤(十六進制無數碼g)(18) single說明：浮點型變量默認為double 類型而非single 。2. 合法變量名：vv(3) 誤：數字開頭(4) 誤：含空格(5) 誤：關鍵字(6) V(7) 誤：關鍵字(8) 誤：有括號(9) V(10) V(11) v(12) ”漢字字符可作為變量名，但不常用，且此名稱易誤解)變量命名規則見p.41-42 。字母(漢字)開頭，字母(漢字)、數字、下劃線組成，長度為1255

23、 個字符；關鍵字不可作為變量名，但可在變量名中嵌入關鍵字；不區分大小寫。常量、數組、類型、函數、過程、對象命名規則與此相同。常量名通常全用大寫。3. 寫 vb 表達式(1) abs(x + y) + z 八 5(2) (1 + x * y)八 6(3) (10 * x + sqr(3 * y) / (x * y)(-b + sqr(b 八 2 - 4 * a * c) / (2 * a)(5) 1 / (1 / r1 + 1 / r2 + 1 / r3)(6) sin(45 * 3.14159 / 180) + (exp(10) + log(10) / sqr(x + y + 1)【篇三：vb

24、 程序設計教程課后答案】二章：1 、 簡述 vb6.0 的主要特點答：方便、直觀的可視化設計工具；面向對象程序設計方法；事件驅動的編程機制；易學易用的應用程序集成開發環境；結構化程序設計語言；完備的聯機幫助功能；強大的多媒體、數據庫和網絡功能。 2、 當正常安裝vb6.0 后，誤把windows 子目錄刪除。當重新安裝 windows 后，是否需要再次安裝vb6.0 ？答：要重新安裝的。因為安裝vb6.0 時，有些vb 程序被系統自動安裝在 windows 目錄下，所以一旦刪除windows 子目錄，就必須重新安裝 vb6.0 。3、 visual basic 6.0 分為學習版、專業版和企業

25、版，如何知道所安裝的是哪個版本？答：在 vb6.0 的啟動界面上，能顯示對應的版本。4、 敘述建立一個完整應用程序的過程答：首先建立用戶界面的控件對象（簡稱控件）；然后對控件屬性進行設置；再對控件事件過程及編程；保存應用程序；程序調試和運行。5、 visual basic 6.0 有多種類型窗口，若要在設計時看到代碼窗口，應怎樣操作？答：選擇“視圖 ”“ 代碼窗口”命令或單擊“工程資源管理器”窗口中的 “ 查看代碼”按鈕。 6、 當建立好一個簡單的應用程序后，假定該工程僅有一個窗體模塊。試問該工程涉及多少個要保存的文件？若要保存該工程的所有文件，應先保存什么文件？再保存什么文件？若不這樣做，系

26、統會出現什么信息？答：涉及兩個文件要保存。先保存窗體文件（.frm ），再保存工程文件（.vbp ）。若先保存工程文件，系統也會先彈出“文件另存為”對話框，要求先保存窗體文件。7、保存文件時，若不改變目錄名，則系統默認的目錄是什么？答：系統默認的目錄是vb988、 安裝 visual basic 6.0 后，幫助系統是否也已安裝？答：沒有。vb6.0 的幫助系統在兩張光盤上，即msdn library ，其中還包含了vc 、 vfp 等其他語言的幫助系統。9、 如何使用visual basic 6.0 的幫助系統？答：最方便的方法是選定要幫助的內容，然后按f1 功能鍵，這時系統打開 msdn

27、library 查閱器，直接顯示與選定內容有關的幫助信息。10、 什么是類？什么是對象？什么是事件過程？答：類是同類對象集合的抽象，它規定了這些對象的公共屬性和方法； 對象是類的一個實例，對象包含三個要素：屬性、方法和事件。當在對象上發生了事件后，應用程序就要處理這個事件，而處理的步驟就是事件過程。11 、 屬性和方法的區別是什么？答：屬性是對象的特征，方法是對象的行為。前者有值，可以被賦值或引用；后者沒有值，表示能夠執行的操作。12、 當標簽邊框的大小由caption 屬性的值進行擴展或縮小時，應對該控件的什么屬性進行何種設置？答：將該控件的autosize 屬性值設置為true 。13、

28、在 vb6.0 中，命令按鈕的顯示形式可以有標準的和圖形的兩種選擇，它們通過什么屬性來設置？若選擇圖形的，則通過什么屬性來裝入圖形？若已在規定的屬性里裝入了某個圖形文件，但該命令按鈕還是不能顯示該圖形，而顯示的是caption 屬性設置的文字，應怎樣修改？答：命令按鈕的顯示形式通過將 style 屬性值設置為graphical 來實現。通過 picture 屬性來裝入圖形。不能顯示圖形是因為style 屬性值被設置為standard ，只要將其改為graphical ，并且將caption 的值設置為空即可。14、 如果文本框要顯示多行文字，應對什么屬性設置為何值？答：將 multiline

29、屬性的值設置為true 。15、標簽和文本框的區別是什么？答：在程序運行時，標簽只能顯示文字，不能輸入文字，顯示文字通過對 caption 屬性賦值來實現；而文本框既能顯示文字，也能輸入文字，這通過text 屬性來實現。16 、 要讓文本框獲得焦點的方法是什么？答： setfocus 方法。17、 簡述文本框的change 和 keypress 事件的區別答：相同點是當在文本框輸入內容時，同時激發上述兩個事件；不同點是 keypress 事件可通過參數keyascii 返回所按鍵的編碼值，可依此判斷數據輸入的正確性或數據輸入結束與否，因而該事件使用較多；change 事件還可以發生在程序改變文

30、本框的text 屬性時。18、 、 當某文本框輸入數據后(按了回車鍵)，經判斷后認為是數據輸入錯，應怎樣刪除原來文本框中的數據？答：假定文本框的名稱為text1 ，則事件過程如下：private subtext1_keypress(keyascii as integer ) if keyascii = 13 thenif 出錯條件判斷成立then text1= II II end if ?end if end sub注意：刪除剛輸入的字符，通過keyascii=0 語句實現；焦點定位文本框對象采用setfocus 方法。19、 在程序運行前，對某些控件設置屬性值，除了在窗體中直接設置外，還可以

31、通過代碼設置，這些代碼一般存放在什么事件中？如果要將命令按鈕定位在窗體的中央，試寫出事件過程代碼。答：這些代碼一般放在forem_load ()事件過程中。將窗體定位在屏幕的中央，只能在屬性窗口中將form1 窗口的 startupposition 屬性值設置為2(表示屏幕中心)，該屬性不能在運行時設置。要將按鈕定位在窗體的中央，事件過程如下：private sub form_load()command1.left= form1.scalewidth2-command1.width2commandl.top = forml.scaleheight 2- commandl.height 2end

32、 sub其中， scalewidth 、 scaleheight 表示窗體的相對寬度和高度。20、 vb6.0 提供的大量圖形文件存放在哪個目錄？若你的計算機上 沒有安裝，應怎樣安裝這些圖形文件？答：存放在graphics 目錄下。在vb6.0 的安裝盤上可以找到graphics 子目錄，將其復制到硬盤上的vb 目錄下。第 3 章：略(在書本上)1 、合法的有：(1 )單精度(3 )單精度( 4)雙精度(6)整形(7)字符型(9)日期型(10)雙精度(12)八進制表示(14)十六進制表示(15)邏輯型(18)單精度數2、合法變量有：(1)，(2)，(6)，(9)，(10)，(11 )3、算術表

33、達式寫成vb 表達式(1) | x+y | + z5? abs(x+y) +zA5(2) (a+xy)6 ?(1 + x * y )八6( 3)? (10*x + sqr(3*y) ) / (x * y )( 4) ? ( -b+sqr(bA2-4*a*c) )/2/a( 5) ?1 / (1/r1+1/r2+1/r3)( 6) ? sin(45*3.14/180)+ ( exp(10)+ log(10) )/ sqr( x+y+1)4 、 根據條件寫出相應的vb 表達式(1) chr( int ( rnd * 10 +67 ) (2) int ( rnd * 101 +100 )(3) x

34、* y 0 (4) x%5=0 or x % 7 =0 (5) (x mod 10) 10 + x /10(6)round(123.2389*100)/100 (7) ucase (c ) =II a II anducase(c )= II z II or lease (c ) = II a II and lcase(c )= II z II (8) mid ( s, 5 6 ) (9) x =10 and x 20 (10) ( x z and y z ) or ( x z and y z) (11) xz and y z5 、 下出下列表達式的值:(1) 123+23 mod 10 7 +

35、asc( all) ? 188, (2) 100+ | 100 |100 ?200100 ( 3)int ( 68.555*100+0.5)/100 ? 68.56(4) 已知 a$= 87654321求表達式 val(left$(a$,4)+ mid(a,4,2)的值？ 876554 (5) dateadd( -mlI ,1,#1/30/2000#) ? 2000-2-29(6) len ( II vb程序設計 II) ? 6 6、略第 4 章： vb 控制語句1 、 結構化程序設計的三種基本結構是什么？答：順序結構、選擇結構和循環結構。2 、 指出下列賦值語句中的錯誤(包括運行時錯誤)：(

36、 1 ) 10x=sin(x)+y ?10x 是非法變量名2 2) c=3+sqr(-3) ? 待求平方根的數為負數( 3) c+x+y=c*y 賦值符左邊是表達式了( 4) x=sin(x)/(20 mod 2) ? 分母為零了3 、 msgbox 函數與 inputbox 函數之間有什么區別？各自獲得什么值？答：兩個函數共同之處都顯示對話框。區別：inputbox 函數等待用戶在文本框中輸入數據，獲得的是輸入的字符串數據；msgbox 函數等待用戶按一按鈕，獲得的是表示按鈕的整數值，以決定程序的流向。 4、 要使單精度變量x,y,z 分別保留1 位、 2 位、 3 位小數，并在窗體顯示，應

37、使用什么函數？如何編寫對應的print 方法？答：使用 format 函數，具體如下：print format(x, II 0.0 II )print format ( y , 0.00 ) print format ( z , 0.000 )5、 語句if表達式then中的表達式可以是算術、字符、關系、邏輯表達式中的哪些？答：算術、關系、邏輯表達式6、指出下列語句中的錯誤：(1) if x y then print x?表達式書寫錯誤，應寫成： x=y (2) if10x20 then x=x+20 ? 表達式書寫錯，應是：10x and x207、按照下列條件，寫出相應的條件語句(1)字符

38、型變量中第三個字符是“c時，利用 msgbox 顯示“yes：否則顯示 “no” if mid ( c , 3, 1 ) = c II then msgbox yes II elsemsgbox no II (2)利用if語句、select case 語句兩種方法計算分段函數：y = x * x + 3 * x +2 elseif x=10 theny = sqr ( 3 * x ) 2elseif x0theny= 1 / x + abs ( x ) end ifprint y end sub（ 3）利用if 語句和 iif 函數兩種方法求三個數x,y,z 中的最大值并存入變量max 中。

39、if xy then max=x else max = y if zmax thenmax = zmax = iif （ xy , x , y ） : max = iif （ max z, max , z ）8 、 在多分支結構的實現中，可以用if?then?elseif?endif 形式的語句，也可以用select case?endselect 形式的語句，由于后者的條件書寫更靈活、簡潔，是否完全可以取代前者？答：雖然select case?end select 形式的語句中條件書寫更靈活、簡潔，程序可讀性強，但使用它有限制。（適合于對一個變量判斷的） 首先，看該語句的形式：select case