第1-10章習(xí)題參考答案(填空題和選擇題)

1、第1章習(xí)題參考答案一、填空題 1. Visual Basic 2022 基于.NET構(gòu)架，是面向?qū)ο蟮?、可視化的程序設(shè)計(jì)語(yǔ)言。2. 類(lèi)是同類(lèi)對(duì)象集合的抽象，對(duì)象是類(lèi)的一個(gè)實(shí)例。3. 對(duì)象有三要素：屬性、事件和方法。4. .NET Framework的核心是公共語(yǔ)言運(yùn)行時(shí)。5. Visual Basic 2022 有設(shè)計(jì)、運(yùn)行和中斷三種工作模式。6. Visual Basic 2022 默認(rèn)窗口布局為：視圖設(shè)計(jì)器、代碼編輯器為 選項(xiàng)卡頁(yè)面 ，“解決方案資源管理器、“屬性窗口為可?？?，“工具箱窗口為自動(dòng)隱藏 。二、選擇題1. Visual Basic 2022 是一種面向?qū)ο蟮目梢暬Z(yǔ)言，采取了A

2、的編程機(jī)制。A. 事件驅(qū)動(dòng)B. 按過(guò)程順序執(zhí)行C. 從主程序開(kāi)始執(zhí)行D. 按模塊順序執(zhí)行2. Visual Basic 2022 中最根本的對(duì)象是D，它是應(yīng)用程序運(yùn)行的界面。A. 集成開(kāi)發(fā)環(huán)境B. 解決方案資源管理器C. 標(biāo)簽和命令按鈕D. 窗體3. 當(dāng)用戶(hù)將某個(gè)控件從工具箱拖動(dòng)到窗體上時(shí)，就創(chuàng)立了一個(gè)A。A. 該控件類(lèi)的實(shí)例B. 控件類(lèi)C. 控件圖標(biāo)D. 基類(lèi)庫(kù)中的特殊類(lèi)4. 用戶(hù)單擊窗體上的某個(gè)命令按鈕Button時(shí)，會(huì)引發(fā)一個(gè)A事件并調(diào)用一個(gè)處理該事件的過(guò)程。A. Click B. Move C. KeyDown D. KeyUp5. 如果希望窗體運(yùn)行時(shí)命令按鈕上顯示的文字為“退出，正確

3、的設(shè)置方法是C。A. 在屬性窗口中將命令按鈕 Name 屬性設(shè)置為“退出B. 在屬性窗口中將命令按鈕“外觀屬性設(shè)置為“退出C. 在屬性窗口中將命令按鈕 Text 屬性設(shè)置為“退出。D. 在代碼編輯器 Cilck 事件過(guò)程代碼段中添加“End語(yǔ)句。第2章習(xí)題參考答案一、填空題 1. 在 Visual Basic 2022中，有符號(hào)整數(shù)根據(jù)長(zhǎng)度又分為短整型Short、整型Integer和長(zhǎng)整型Long。無(wú)符號(hào)整數(shù)相應(yīng)也分為無(wú)符號(hào)短整型UShort、無(wú)符號(hào)整型UInteger和無(wú)符號(hào)長(zhǎng)整型ULong。2. 在 Visual Basic 2022中，1234、123456&、1.2346E+5、1.2

4、346D+5分別表示Integer、Long、Single、Double數(shù)據(jù)類(lèi)型。3. 字符類(lèi)型以Char表示，其存儲(chǔ)分配為2個(gè)字節(jié)，用于保存無(wú)符號(hào)的16位代碼，范圍為065535。每個(gè)碼位表示一個(gè)Unicode字符集中的一個(gè)字符。4. 字符串類(lèi)型數(shù)據(jù)的界定符為 ，日期類(lèi)型數(shù)據(jù)的界定符為#。5. 布爾類(lèi)型的變量如果用來(lái)存放數(shù)值，當(dāng)數(shù)值為 0 時(shí)表示False，數(shù)值非 0 時(shí)那么表示True 。6. 表示x是5的倍數(shù)或是9的倍數(shù)的邏輯表達(dá)式應(yīng)該寫(xiě)成x Mod 5=0 Or x Mod 9=07. a=3.5，b=5.0，c=2.5，d=True，那么表達(dá)式 a=0 And a+cb+3 Or N

5、ot d 的值是False 。8. 執(zhí)行語(yǔ)句 testCheck = aBBBa Like a*a ，testCheck 的值為T(mén)rue。9. 執(zhí)行以下語(yǔ)句序列：Dim intMn1 As Integer = 25Dim intResuit1, intResuit2 As IntegerintResuit1 = intMn1 2變量 intResuit1 的值為100，變量 intResuit2 的值為6。10. 執(zhí)行以下語(yǔ)句序列：Dim ma As IntegerDim mb As Stringma = 123 + 456mb = 123 & 456變量 ma 的值為579，變量 mb 的值

6、為123456。11. 執(zhí)行以下語(yǔ)句序列：Dim TestS1 As String = Visual Basic 2022Dim subS1, subS2 As StringsubS1 = Microsoft.VisualBasic.Left(TestS1, 6)subS2 = Microsoft.VisualBasic.Right(TestS1, 4)變量 subS1 的值為Visual，變量 subS2 的值為2022。12. 執(zhí)行以下語(yǔ)句序列：Dim strA As StringDim strB As StringDim intRetn As IntegerstrA = cba : st

7、rB = bcintRetn = String.Compare(strA, strB)變量 intRetn 的值為1。13. 執(zhí)行以下語(yǔ)句序列：Dim instance As String = I am a teacherDim returnValue As StringreturnValue = instance.Substring(7, 7)變量 intRetn 的值為teacher。14. 獲取計(jì)算機(jī)上的當(dāng)前日期和時(shí)間，可以使用DateTime 結(jié)構(gòu)的Now屬性。15. 將指定的字符串值后跟當(dāng)前行終止符寫(xiě)入控制臺(tái)，使用Console 類(lèi)中的WriteLine(String)方法。二、選擇

8、題1. 下面合法的變量名是D。A. 3.14 B. 1.0 C. 0.314E+1 D. pi2. 以下日期值正確的選項(xiàng)是A。A. #2010-9-18# B. 2022.09.18 C. 2010-9-18 D. 2010-9-183. 如果程序中需要用到一個(gè)整數(shù)的范圍是-3476840000，那么應(yīng)該把存儲(chǔ)這個(gè)整型數(shù)的變量聲明為C。A. Integer B. Byte C. Long D. Double4. 下面正確的 Visual Basic 表達(dá)式是A。A. #2010-9-18#-10 B. #9/18/2010# - Hour()C. 2022.09.18+30 D. 2022.0

9、9.18+10005. 設(shè)a=5,b=8,c=6，那么表達(dá)式a+a2+b3+c4的值為B。A. 11.67 B. 10 C. 8 D. 66. 表達(dá)式 System.Math.Cos(3.14159*60/180)的值為C。A. 1 B. -1 C. 0.50 D. -0.507. 下面是一個(gè)表達(dá)式：UCase(Microsoft.VisualBasic.Left(abcdef,2)+LCase(Microsoft.VisualBasic.Right(abcdef, 2) ，它的值應(yīng)該是C。A. abCD B. Cdef C. ABef D. abEF8. 如果x是一個(gè)正實(shí)數(shù)，對(duì)x的第3位小數(shù)

10、四舍五入的表達(dá)式是B。A. 0.01*INT(x+0.005) B. 0.01*INT(100*(x+0.005)C. 0.01*INT(100*(x+0.05) D. 0.01*INT(x+0.05)第3章習(xí)題參考答案一、填空題 1. Visual Studio 將工程名稱(chēng)指定為工程中所有代碼的默認(rèn)根命名空間。2. 如果要將一個(gè)命名空間導(dǎo)入到整個(gè)工程內(nèi)，可以翻開(kāi)工程屬性頁(yè)，在引用選項(xiàng)卡中進(jìn)行設(shè)置。3. 在代碼中導(dǎo)入命名空間使用Imports語(yǔ)句。4. Option Strict檢查可以將隱式數(shù)據(jù)類(lèi)型轉(zhuǎn)換限制為只能是擴(kuò)大轉(zhuǎn)換。5. Module 語(yǔ)句用于聲明模塊的名稱(chēng)，并引入模塊包含的變量、屬

11、性、事件和過(guò)程的定義。該語(yǔ)句只能在命名空間級(jí)別使用。6. 加載應(yīng)用程序后運(yùn)行的第一段過(guò)程代碼是Main 過(guò)程。7. 控制結(jié)構(gòu)包括用于決策的分支結(jié)構(gòu)，用于實(shí)現(xiàn)重復(fù)進(jìn)程的循環(huán)結(jié)構(gòu)。8. 在一些簡(jiǎn)單的判斷場(chǎng)合，可以用 Iif函數(shù)來(lái)替代If.Then.Else語(yǔ)句，也可以用 Choose函數(shù)來(lái)替代Select Case語(yǔ)句。9. 一般來(lái)說(shuō)，處理循環(huán)次數(shù)且循環(huán)變量為等差變化的問(wèn)題，使用For.Next循環(huán)結(jié)構(gòu)較為適宜。10. 如果 Do.Loop 循環(huán)中使用關(guān)鍵詞 While，通常被稱(chēng)為當(dāng)循環(huán)；如果使用關(guān)鍵詞 Until，通常被稱(chēng)為直到型循環(huán)。11. 在一個(gè)循環(huán)體內(nèi)包含了另一個(gè)完整的循環(huán)結(jié)構(gòu)稱(chēng)為循環(huán)的嵌

12、套。12. 執(zhí)行下面的程序段后，i 的值為5.6，s 的值為5.0。 Dim i, s As Doubles = 2 For i = 3.2 To 4.9 Step 0.8 s = s + 1 Next i二、選擇題1. 循環(huán)語(yǔ)句 For i= -3.5 To 5.5 Step 0.5 Next i 的循環(huán)次數(shù)為B。A. 18 B. 19 C. 16 D. 202. 整型變量a、b、c的值分別為10、20、30，函數(shù)： IIfab And bb, a+b,a+c的值為AA. 60 B. 30 C. 50 D. 203. 下面程序的輸出是B。 Dim X% X = 3 If X 6 Then C

13、onsole.Write () ElseIf X 10 Then Console.Write ( B. C. = D. 輸出不確定4. 下面程序的輸出是A。 Dim n, s As Integer s = 0 For n = 1 To 20 If n Mod 3 0 Then s = s + n Next n Console.Write(s)A. 147 B. 153 C. 19 D. 205. 執(zhí)行以下程序段后，變量 c 的值為D。 Dim a, b, c As String a = Visual Basic Programing b = Quick c = b & UCase(Mid(a,

14、 7, 6) & Microsoft.VisualBasic.Right(a, 11)A. Visual BASIC ProgramingB. Quick Basic ProgramingC. QUICK Basic ProgramingD. Quick BASIC Programing6. 執(zhí)行以下程序段后，變量 z 的值為B。 Dim i As Integer Dim a, x, y, z As String a = abbacddcba For i = 6 To 2 Step -2 x = Mid(a, i, i) y = Microsoft.VisualBasic.Left(a, i)

15、 z = Microsoft.VisualBasic.Right(a, i) z = UCase(x & y & z) Next iA. ABA B. BBABBA C. ABBABA D.AABAAB四、閱讀程序并寫(xiě)出運(yùn)行結(jié)果1. Dim a, b, c, n As Integera = 10: b = 20: c = 30n = Iif (a b And a c, a, Iif (b c, b, c)Console.WriteLine ( n )302. Dim i, j, n, s As Integers = 0For i = 0 To 2 n = 0 For j = 0 To 2 n

16、= n + i + j Next j s = s + nNext iConsole.WriteLine ( s )183. Dim i, j, x, n As Integer x = 0 : n = 3 For i = 1 To n For j = 1 To i x = x + 1 Next j Next i Console.WriteLine(x) 64. Dim i, s, x As Integer s = 0 For i = 1 To 15 x = 2 * i - 1 If x Mod 3 = 0 Then s = s + 1 Next i Console.WriteLine(s) 55

17、. Dim num As Double num = 1 Do Until num 6 Console.Write(num) Console.Write(,) num = num + 2.4 Loop 1,3.4,5.8，6. Dim x, y As Integer x = 2 y = 1 If x * y 0) False第4章習(xí)題參考答案一、填空題 1. 數(shù)組中的各個(gè)值稱(chēng)為數(shù)組元素，數(shù)組中元素的個(gè)數(shù)稱(chēng)為數(shù)組的長(zhǎng)度。為了能夠區(qū)分?jǐn)?shù)組中的各個(gè)元素，數(shù)組中使用了下標(biāo)。2. 語(yǔ)句 Dim atmospherePressures (, , , ) As Short 聲明了一個(gè)變量，它存儲(chǔ)一個(gè)四維數(shù)組。

18、該數(shù)組的名稱(chēng)為atmospherePressures，數(shù)組元素的數(shù)據(jù)類(lèi)型是Short類(lèi)型。3. 執(zhí)行語(yǔ)句 Dim validDates ( ) As Date = New Date ( ) 后，變量 validDates 中的數(shù)組長(zhǎng)度為0。4. 執(zhí)行語(yǔ)句 Dim answers As Boolean() = New Boolean() True, True, False, True 后，變量 answers 中的數(shù)組存儲(chǔ)了4個(gè)經(jīng)過(guò)初始化的元素。5. 聲明語(yǔ)句 Dim a (100, 5, 4) As Byte 執(zhí)行后，Ubound (a, 3) 的返回值是4。6. 假定一個(gè)一維數(shù)組的索引號(hào)從0

19、 到 n，如果要在其第 i-1 與第 i 個(gè)元素之間插入一個(gè)新元素 x，那么必須將第 n 至第 i 個(gè)元素依次向后移動(dòng)一個(gè)位置，然后進(jìn)行插入。插入后數(shù)組的索引號(hào)從0 到 n+1。7. 所有數(shù)組都是從 ( System ) 命名空間下的 Array 類(lèi)繼承的，因此 Array 類(lèi)是所有數(shù)組的基類(lèi)。8. 使用 Array 類(lèi)的屬性可以獲取數(shù)組的維數(shù)、長(zhǎng)度等根本信息。二、選擇題1. 執(zhí)行以下程序代碼后，控制臺(tái)窗口輸出為A。 Dim array1(10, 10) As Integer Dim i, j As Integer For i = 1 To 3 For j = 2 To 4 array1(i,

20、 j) = i + j Next j Next i Console.WriteLine(0,2:D, array1(2, 3) + array1(3, 4)A. 12 B. 13 C. 14 D. 152. 執(zhí)行以下程序代碼后，控制臺(tái)窗口輸出為B。 Dim i As Integer, j As Integer Dim a(10, 10) As Integer For i = 1 To 3 For j = 1 To 3 a(i, j) = (i - 1) * 3 + j Console.Write(0,2:D, a(i, j) Next j Next iA. 123246369 B. 12345

21、6789 C. 234345456 D. 1223344553. 執(zhí)行以下程序代碼后，控制臺(tái)窗口輸出為C。Dim testChars As Char() = New Char(2) %c, &c, cConsole.WriteLine(0,2:D, testChars(2)A. % B. & C. D. c4. 執(zhí)行以下程序代碼后，控制臺(tái)窗口輸出為C。 Dim aryA As Integer() = New Integer(4) 1, 2, 3, 4, 5 Dim i As Integer For i = 1 To UBound(aryA) aryA(i) = aryA(i) + i - 1

22、Next i Console.WriteLine(0,2:D, aryA(3)A. 4 B. 5 C. 6 D. 75. 執(zhí)行以下程序代碼后，控制臺(tái)窗口輸出為C。 Dim arr As Integer() = New Integer(9) 1, 3, 5, 7, 9, 11, 13, 15, 17, 19 Dim i, Sum As Integer Sum = 0 For i = 0 To 9 If arr(i) / 3 = arr(i) 3 Then Sum = Sum + arr(i) End If Next i Console.WriteLine(Sum)A. 13 B. 14 C. 2

23、7 D. 156. 執(zhí)行以下程序代碼后，控制臺(tái)窗口輸出為D。Dim tc As Char() = New Char(4) uc, vc, wc, xc, ycConsole.WriteLine(012, tc(2), tc(1), tc(4)A. uvw B. vwx C. wxy D. wvy7. 執(zhí)行下面語(yǔ)句后，myArray.Length 為B。 Dim myArray(,) As Short = New Short(,) 11, 12, 13, 21, 22, 23A. 2 B. 6 C. 1 D. 38. 執(zhí)行以下程序代碼后，控制臺(tái)窗口輸出為A。Dim sourceAry() As

24、Char = _New Char() Vc, ic, sc, uc, ac, lc, Bc, ac, sc, ic, ccArray.Reverse(sourceAry)Dim destinationArray(4) As CharArray.ConstrainedCopy(sourceAry, 2, destinationArray, 0, 5)Dim i As IntegerFor i = 0 To 4 Console.Write(0, destinationArray(i)Next i A. saBla B. Visua C. Basic D. sualB9. 執(zhí)行以下程序代碼后，元素

25、arr (2) 的值為D。 Dim arr As Integer() = New Integer(9) 12, 323, 1095, 7, 69, 11, 163, 315, 178, 190 Array.Clear(arr, 1, 2) Array.Sort(arr) Array.Reverse(arr)A. 1095 B. 7 C. 315 D. 17810. 執(zhí)行以下程序代碼后，變量 x 的值為B。 Dim arr As Integer() = New Integer(5) 21, 23, 10, 7, 69, 11 Dim x As Integer arr.SetValue(100,

26、2) x = Cint (arr.GetValue(0) + arr(2)A. 31 B. 121 C. 21 D. 10第5章習(xí)題參考答案一、填空題 1. 過(guò)程中可以使用Return語(yǔ)句或Exit Sub語(yǔ)句將控制從 Sub 過(guò)程返回給調(diào)用程序。2. 過(guò)程聲明語(yǔ)句中定義過(guò)程的參數(shù)也稱(chēng)為“形式參數(shù)。3. 調(diào)用過(guò)程時(shí)，有兩種方法傳遞參數(shù)。一種是傳值ByVal，另一種是傳址ByRef。4. 過(guò)程聲明語(yǔ)句可以使用ParamArray關(guān)鍵字聲明形參為參數(shù)數(shù)組。5. Property 屬性過(guò)程中，用戶(hù)可以聲明并定義Get過(guò)程和Set過(guò)程。二、選擇題1. 以下表達(dá)中正確的選項(xiàng)是B。A. 一個(gè) Sub 過(guò)程

27、至少要一個(gè) Exit Sub 語(yǔ)句B. 一個(gè) Sub 過(guò)程必須有一個(gè) End Sub 語(yǔ)句C. 可以在 Sub 過(guò)程中定義一個(gè) Function 過(guò)程，但不能定義 Sub 過(guò)程 D. 調(diào)用一個(gè) Function 過(guò)程可以獲得多個(gè)返回值2. 以下關(guān)于函數(shù)過(guò)程的表達(dá)中，正確的選項(xiàng)是D。A. 如果不指明函數(shù)過(guò)程參數(shù)的類(lèi)型，那么該參數(shù)沒(méi)有數(shù)據(jù)類(lèi)型B. 函數(shù)過(guò)程的返回值可以有多個(gè)C. 當(dāng)數(shù)組作為函數(shù)過(guò)程的參數(shù)時(shí)，既能以傳值方式傳遞，也能以引用方式傳遞D. 函數(shù)過(guò)程形參的類(lèi)型與函數(shù)返回值的類(lèi)型沒(méi)有關(guān)系3. 函數(shù)過(guò)程 F1 的功能是：如果參數(shù) b 為奇數(shù)，那么返回值為1，否那么返回值為0。以下能正確實(shí)現(xiàn)上述

28、功能的代碼是B。A. Function F1 (b As Integer ) As IntegerIf b / 2 = 0 ThenReturn 0ElseReturn 1End IfEnd FunctionB. Function F1(b As Integer) As IntegerIf b Mod 2 = 0 ThenF1 = 0ElseF1 = 1End IfEnd FunctionC. Function F1(b As Integer) As IntegerIf b Mod 2 = 0 ThenF1 = 1ElseF1 = 0End IfEnd FunctionD. Function

29、F1(b As Integer) As IntegerIf b Mod 2 0 ThenReturn 0ElseReturn 1End IfEnd Function4. 控制臺(tái)應(yīng)用程序代碼如下：Module Module1 Sub Main() Dim i, s As Integer s = 0 For i = 1 To 5 s = s + f (i) Next Console.WriteLine(s) Console.ReadLine() End Sub Public Function f(ByVal m As Integer) As Integer If m Mod 2 = 0 Then

30、f = m Else f = 1 End If End FunctionEnd Module該應(yīng)用程序運(yùn)行后，窗口輸出的內(nèi)容為C。A. 11 B. 10 C. 9 D. 85. 控制臺(tái)應(yīng)用程序代碼如下：Module Module1 Sub Main() Dim x As Integer = 10 Console.WriteLine(f(x) Console.ReadLine() End Sub Public Function f(ByRef x As Integer) As Integer Dim y As Integer = 15 f = x * y End FunctionEnd Modu

31、le該應(yīng)用程序運(yùn)行后，窗口輸出的內(nèi)容為B。A. 0 B. 150 C. 15 D. 106. 控制臺(tái)應(yīng)用程序代碼如下：Module Module1 Sub Main() Dim Str1, Str2 As String Str1 = abcdefg Str2 = Fun(Str1) Console.WriteLine(Str2) Console.ReadLine() End Sub Function Fun(ByVal S As String) As String Dim s1 As String = For i = 1 To Len(S) s1 = UCase(Mid(S, i, 1) &

32、s1 Next i Fun = s1 End FunctionEnd Module該應(yīng)用程序運(yùn)行后，窗口輸出的內(nèi)容為B。A. abcdefg B. ABCDEFGC. gfedcba D. GFEDCBA7. 以下表達(dá)中錯(cuò)誤的選項(xiàng)是D。A. 如果過(guò)程被定義為 Public 類(lèi)型，那么該過(guò)程中的局部變量都是 Public 類(lèi)型B. Sub 過(guò)程中不能嵌套定義 Sub 過(guò)程C. Sub 過(guò)程中可以嵌套調(diào)用Sub過(guò)程D. 事件過(guò)程可以像通用過(guò)程一樣由用戶(hù)定義過(guò)程名8. Property 語(yǔ)句用于定義A。A. 屬性過(guò)程 B. 事件過(guò)程 C. 通用過(guò)程 D. 函數(shù)過(guò)程第6章習(xí)題參考答案一、填空題 1.

33、在 Visual Basic 2022 中，窗體是命名空間下的一個(gè)類(lèi)。2. Windows.Forms 類(lèi)是Control類(lèi)的后代，繼承了該類(lèi)定義的屬性、方法和事件。3. 指定窗體的自動(dòng)縮放模式的屬性是AutoScaleMode，其默認(rèn)值為Font。4. 如果要指定窗體運(yùn)行時(shí)的初始狀態(tài)為最大化，應(yīng)該設(shè)置窗體的WindowState屬性為Maximized。5. 如果要指定窗體運(yùn)行時(shí)完全透明，應(yīng)該設(shè)置窗體的Opacity屬性為0。6. Windows 窗體應(yīng)用程序啟動(dòng)時(shí)的事件順序依次為L(zhǎng)oad、Activated、Shown。7. 鼠標(biāo)單擊窗體后引發(fā)了4個(gè)事件，事件順序依次為MouseDown、

34、Click、MouseClick、MouseUp。8. 一個(gè)工程中有多個(gè)并列窗體稱(chēng)為多重窗體。9. 在 MDI 應(yīng)用程序中，只有一個(gè)父窗體或 MDI 窗體，其他窗體均稱(chēng)為子窗體。10. 如果要將當(dāng)前窗體設(shè)置為父窗體，只需在屬性窗口中，將窗體的IsMDIContainer 屬性設(shè)置為T(mén)rue。11. 當(dāng)一個(gè)控件對(duì)象通過(guò)用戶(hù)操作或以代碼方式獲得焦點(diǎn)時(shí)，會(huì)引發(fā)GotFocus事件。當(dāng)對(duì)象失去焦點(diǎn)時(shí)，會(huì)引發(fā)LostFocus事件。12. 所有控件都由Control類(lèi)派生而來(lái)。13.Anchor屬性允許控件在調(diào)整其容器時(shí)自動(dòng)調(diào)整自身，其默認(rèn)值為T(mén)op, Left。14.Dock屬性確定控件是否將其自身附

35、加到其容器的一邊或多個(gè)邊，其默認(rèn)值為 none。15. 設(shè)置或獲取控件是否允許操作或是否有效的屬性是Enabled。16. 設(shè)置或獲取控件是否可見(jiàn)的屬性是Visible。17. 控件的Right屬性的值等于其Left屬性值與Width屬性值之和。18. CheckBox 控件的Checked屬性用于獲取或設(shè)置一個(gè) Boolean 值，指示控件是否處于選中狀態(tài)。19. 當(dāng)用戶(hù)單擊 RadioButton 控件時(shí)，其 Checked 屬性值為 True，并調(diào)用Click事件處理程序。當(dāng) Checked 屬性的值更改時(shí)，將引發(fā)CheckedChanged事件。20. ListBox 控件在 Sele

36、ctedIndex 屬性更改后引發(fā)SelectedIndexChanged事件。二、選擇題1. 下面哪一個(gè)屬性是 Label 控件沒(méi)有的A。A. Caption B. Name C. Text D. Dock2. 以下表達(dá)中錯(cuò)誤的選項(xiàng)是A。A. 在 Visual Basic 2022 中，可以使用代碼在運(yùn)行時(shí)修改控件的 Font 屬性。B. 在 Visual Basic 2022 中，可以在設(shè)計(jì)時(shí)設(shè)置控件的字體屬性。C. 在 Visual Basic 2022 中，F(xiàn)ont 是 System.Drawing 命名空間下的一個(gè)類(lèi)。D. 在 Visual Basic 2022 中，窗體及控件的 F

37、ont 屬性在運(yùn)行時(shí)為只讀屬性。3. 將Button控件的Enabled屬性設(shè)置為False，其余屬性均為默認(rèn)設(shè)置。以下表達(dá)中錯(cuò)誤的選項(xiàng)是B。A. Button可見(jiàn)，呈現(xiàn)暗灰色，不響應(yīng)鼠標(biāo)單擊事件。B. Button可見(jiàn)，呈現(xiàn)暗灰色，能響應(yīng)鼠標(biāo)單擊事件。C. 不能使用【Tab】鍵將焦點(diǎn)移到Button上。D. 可以在程序中將它的 Enabled 屬性修改為 True。4. 在窗體上創(chuàng)立一個(gè)文本框其N(xiāo)ame屬性為T(mén)extBox1，然后在Form1_Load 事件過(guò)程中輸入如下代碼：Dim sum As Integer TextBox1.Text = For i = 1 To 10 sum = s

38、um + i Next i TextBox1.Text = CStr(sum)窗體運(yùn)行后，TextBox1中的內(nèi)容是D。A. 不定值 B. 出錯(cuò) C. 0 D. 555. 在窗體上創(chuàng)立一個(gè) Button 和一個(gè) Label，其名稱(chēng)分別為 Buttonl 和 Labell ，然后編寫(xiě) Buttonl _Click 事件過(guò)程如下： Dim i, j, counter As Integer counter = 0 For i = 1 To 4 For j = 6 To 1 Step -2 counter = counter + 1 Next j Next i Label1.Text = CStr(c

39、ounter)窗體運(yùn)行后，單擊 Buttonl ， Labell 中的內(nèi)容是B。A. 11 B. 12 C. 16 D. 206. 在窗體上創(chuàng)立一個(gè)名稱(chēng)為L(zhǎng)istBox1的列表框和一個(gè)名稱(chēng)為 Label1的標(biāo)簽控件。列表框中添加假設(shè)干個(gè)列表項(xiàng)。要求當(dāng)用戶(hù)單擊列表框中某個(gè)列表項(xiàng)時(shí)，標(biāo)簽顯示被選中的列表項(xiàng)的索引號(hào)。在ListBox1_SelectedIndexChanged事件過(guò)程中，能正確實(shí)現(xiàn)上述操作的語(yǔ)句是C。A. Label1.Text = ListBox1.SelectedIndexB. Label1.Text = CStr(ListBox1. Index)C. Label1.Text =

40、 CStr(ListBox1.SelectedIndex)D. Label1.Text = CStr(ListBox1.SelectedItem)第7章習(xí)題參考答案一、填空題 1. 在 Visual Basic 2022 中，工具欄中的工具項(xiàng)控件均繼承自ToolStripItem類(lèi)。2. StatusStrip 類(lèi)是ToolStrip類(lèi)的后代，繼承了該類(lèi)定義的屬性、方法和事件。3. 在 Visual Basic 2022 中，下拉式菜單是通過(guò)MenuStrip控件創(chuàng)立的。4. 如果一個(gè)菜單項(xiàng)被選中，Checked 屬性的值為T(mén)rue，CheckState 屬性的值為 Checked。反之，Ch

41、ecked 屬性的值為False，CheckState 屬性值為Unchecked。如果菜單項(xiàng)的CheckOnClick屬性值為 True，那么每次單擊菜單項(xiàng)就切換一次選中狀態(tài)。5. ContextMenuStrip 控件是快捷菜單的容器。用戶(hù)可以將ToolStripMenuItem對(duì)象添加到 ContextMenuStrip 中。6. 在 Visual Basic 2022 中，對(duì)話框的基類(lèi)是CommonDialog。7. Visual Basic 工具箱中的對(duì)話框局部提供了與文件操作相關(guān)的OpenFileDialog和SaveFileDialog兩個(gè)組件。這兩個(gè)組件均繼承自FileDial

42、og。8. 顯示通用對(duì)話框使用ShowDialog方法。9. 消息框也是 Windows 窗體應(yīng)用程序常用的界面元素，顯示消息框使用 MessageBox類(lèi)的Show方法。10. 使用 RichTextBox 控件的LoadFile和SaveFile方法可以直接讀寫(xiě)文件。二、選擇題1. 以下表達(dá)中錯(cuò)誤的選項(xiàng)是C。A. MenuStrip 是 ToolStrip 的派生類(lèi)。B. ToolStrip 是 MenuStrip 的基類(lèi)。C. ToolStrip 繼承自 MenuStrip。D. MenuStrip 是 ToolStrip 的伴隨類(lèi)。2. 以下表達(dá)中正確的選項(xiàng)是C。A. Button 和

43、 ToolStripButton 均繼承自 ButtonBase。B. Button 和 ToolStripButton 均繼承自 ToolStripItem。C. Button 繼承自 ButtonBase，ToolStripButton 繼承自 ToolStripItem。D. Button 繼承自ToolStripItem，ToolStripButton 繼承自 ButtonBase。3. 以下表達(dá)中錯(cuò)誤的選項(xiàng)是D。A. StatusStrip 中可以包含 ToolStripStatusLabel、ToolStripProgressBar控件。B. StatusStrip 中可以包含 T

44、oolStripDropDownButton 和 ToolStripSplitButton。C. ToolStrip 中可以包含 Label、ProgressBar、DropDownButton 和 TextBox 控件。D. ToolStrip 中可以包含的控件包括 ToolStripStatusLabel、ToolStripProgressBar、ToolStripDropDownButton 和 ToolStripSplitButton。4. 以下表達(dá)中正確的選項(xiàng)是A。A.一個(gè) MenuStrip 菜單結(jié)構(gòu)由假設(shè)干個(gè)代表菜單命令的成員組成。每個(gè)成員是一個(gè) ToolStripMenuIte

45、m 對(duì)象。B. 一個(gè) MenuStrip 菜單結(jié)構(gòu)由假設(shè)干個(gè)代表菜單命令的成員組成。每個(gè)成員是一個(gè) ToolStripItem 對(duì)象。C. 一個(gè) MenuStrip 菜單結(jié)構(gòu)由假設(shè)干個(gè)代表菜單命令的成員組成。每個(gè)成員是一個(gè) ToolStrip 對(duì)象。D. 一個(gè) MenuStrip 菜單結(jié)構(gòu)由假設(shè)干個(gè)代表菜單命令的成員組成。每個(gè)成員是一個(gè)DropDownButton 對(duì)象。5. Visual Basic 2022 中，包括窗體在內(nèi)的許多可視控件，都有一個(gè)B屬性。通過(guò)設(shè)置該屬性，可以將控件與業(yè)已創(chuàng)立的快捷菜單關(guān)聯(lián)。A. MainMenuStrip B. ContextMenuStripC. Dat

46、aBindings D. Enabled 第8章習(xí)題參考答案一、填空題 1. 類(lèi)是對(duì)象的模板，有了類(lèi)定義后，基于類(lèi)就可以使用New 關(guān)鍵字創(chuàng)立該類(lèi)的對(duì)象。2. 如果不希望外部程序訪問(wèn)類(lèi)中的 Fields，通常將字段的訪問(wèn)級(jí)別聲明為Private。3. 如果不使用ReadOnly或WriteOnly關(guān)鍵字，那么 Property 語(yǔ)句塊中必須包含 Get 和 Set 過(guò)程。4. 在屬性賦值期間，Visual Basic 會(huì)將參數(shù)傳遞給Set過(guò)程。5. 如果要從 Get 過(guò)程返回某個(gè)值，可以將該值賦給屬性名，或者將其包含在Return 語(yǔ)句中。6. 用戶(hù)可以使用Event語(yǔ)句在類(lèi)中聲明一個(gè)事件，使

47、用RaiseEvent語(yǔ)句引發(fā)該事件。7. 在 Visual Basic 中，構(gòu)造事件處理程序最根本的方法是使用WithEvents和 Handles子句。此外，還可以在運(yùn)行時(shí)使用AddHandler語(yǔ)句將事件與事件處理程序相關(guān)聯(lián)。8. 面向?qū)ο缶幊虘?yīng)該具有三個(gè)主要特征，那就是封裝、繼承和多態(tài)。9. 默認(rèn)情況下，所有類(lèi)都是可繼承的，除非用NotInheritable關(guān)鍵字標(biāo)記。10. Visual Basic中僅可重寫(xiě)在其基類(lèi)中用Overridable關(guān)鍵字進(jìn)行標(biāo)記的成員。11. Visual Basic 2022 主要提供兩種方式實(shí)現(xiàn)多態(tài)，一是基于繼承實(shí)現(xiàn)多態(tài)，二是基于接口實(shí)現(xiàn)多態(tài)。12.

48、接口是一組只包含各種成員屬性、方法和事件等聲明的集合。接口表示一種約定，而不提供任何實(shí)現(xiàn)。13. 接口成員定義只使用一行代碼，在將屬性或過(guò)程聲明為接口的成員時(shí)，只定義該屬性或過(guò)程的簽名，即只包括屬性或過(guò)程類(lèi)型、參數(shù)和參數(shù)類(lèi)型、返回類(lèi)型。所有接口成員都隱式地具有Public訪問(wèn)級(jí)別。14.可以在一個(gè)接口中定義另一個(gè)接口。外部接口稱(chēng)為包含接口，而內(nèi)部接口稱(chēng)為嵌套接口。15.創(chuàng)立用戶(hù)控件的方法取決于 Visual Basic 2022 的版本。在 Visual Basic 2022 的速成版中，用戶(hù)必須先創(chuàng)立一個(gè)類(lèi)庫(kù)工程，然后才能添加“用戶(hù)控件模板。二、選擇題1. 在類(lèi)中定義的成員只存在于A。A.

49、對(duì)象的生存期內(nèi) B. 程序的整個(gè)生存期C. 類(lèi)代碼模塊 D. 某個(gè)過(guò)程2. 工具箱上的各種控件和組件是B。A. 對(duì)象 B. 類(lèi) C. 標(biāo)準(zhǔn)模塊 D. 圖標(biāo)3. 以下陳述中正確的選項(xiàng)是C。A. Class 語(yǔ)句只能在模塊和過(guò)程級(jí)別使用。B. Class 語(yǔ)句只能在類(lèi)和過(guò)程級(jí)別使用。C. Class 語(yǔ)句只能在命名空間或模塊級(jí)別使用。D. Class 語(yǔ)句只能在接口和過(guò)程級(jí)別使用。4. 如果屬性聲明為 Friend，那么可將 Set 過(guò)程聲明為B。A. Public B. Private C. Property D. Object5. 創(chuàng)立派生類(lèi)時(shí)使用D語(yǔ)句聲明繼承的基類(lèi)。A. MustInher

50、it B. NotInheritable C. Overridable D. Inherits6. 以下表達(dá)錯(cuò)誤的選項(xiàng)是D。A. MyBase 不能用于訪問(wèn)類(lèi)中的 Private 成員。B. MyBase 不能用來(lái)調(diào)用 MustOverride 基類(lèi)方法。C. MyBase 不能用在模塊中。D. MyBase 不是關(guān)鍵字，而是實(shí)對(duì)象。7. 以下表達(dá)正確的選項(xiàng)是C。A. Implements 只能指定類(lèi)實(shí)現(xiàn)接口。B. Implements 只能指定類(lèi)成員實(shí)現(xiàn)特定的接口成員。C. Implements 語(yǔ)句指定類(lèi)實(shí)現(xiàn)接口；Implements 關(guān)鍵字指定類(lèi)成員實(shí)現(xiàn)特定的接口成員。D. Interf

51、ace 語(yǔ)句指定類(lèi)實(shí)現(xiàn)接口；Interface 關(guān)鍵字指定類(lèi)成員實(shí)現(xiàn)特定的接口成員。8. 數(shù)據(jù)封裝的一個(gè)根本規(guī)那么是只能通過(guò)A過(guò)程或方法來(lái)修改或檢索類(lèi)中的數(shù)據(jù)。A. Property B. Set C. Get D. Interface第9章習(xí)題參考答案一、填空題 1. 關(guān)系模型是結(jié)構(gòu)模型，它由關(guān)系數(shù)據(jù)結(jié)構(gòu)、關(guān)系操作集合和關(guān)系的完整性約束三局部構(gòu)成。關(guān)系模型中數(shù)據(jù)的邏輯結(jié)構(gòu)是一張二維表。表中的一行稱(chēng)為關(guān)系的一個(gè)元組，表中的一列稱(chēng)為關(guān)系的一個(gè)屬性。2. 在關(guān)系數(shù)據(jù)庫(kù)系統(tǒng)中，表與表之間的聯(lián)系是通過(guò)公共屬性實(shí)現(xiàn)的，這個(gè)公共屬性應(yīng)該是一個(gè)表的主鍵和另一個(gè)表的外鍵。3. .NET Framework 數(shù)

52、據(jù)提供程序由Connection、Command、DataReader、和DataAdapter四個(gè)核心對(duì)象組成。4. 在 DataSet 中DataRelationCollection對(duì)象管理 DataSet 對(duì)象中所有數(shù)據(jù)表之間的關(guān)系。每個(gè)關(guān)系用一個(gè)DataRelation對(duì)象表示。DataTableCollection對(duì)象管理 DataSet 對(duì)象中所有的數(shù)據(jù)表。每一個(gè) DataSet 對(duì)象可以由假設(shè)干個(gè) DataTable 對(duì)象組成。每個(gè) DataTable 對(duì)象都包含一個(gè)DataColumnCollection，它定義了表的架構(gòu)。每個(gè) DataTable 對(duì)象都包含一個(gè)DataRow

53、Collection，它表示數(shù)據(jù)表中行的集合。每個(gè)DataRow對(duì)象表示數(shù)據(jù)表中一行數(shù)據(jù)。5. Visual Basic 2022 在工具箱中提供的數(shù)據(jù)類(lèi)組件中，BandingSource組件用于實(shí)現(xiàn)數(shù)據(jù)綁定，BindingNavigator組件用于在窗體中瀏覽、定位和操作數(shù)據(jù)。6. DataAdapter 對(duì)象用于實(shí)現(xiàn)在數(shù)據(jù)源和數(shù)據(jù)集之間交換數(shù)據(jù)。DataAdapter 的Fill方法使用 SelectCommand 的結(jié)果來(lái)填充數(shù)據(jù)集。7. SQL 語(yǔ)言的語(yǔ)句從功能角度可以分為四類(lèi)，分別為數(shù)據(jù)定義語(yǔ)句，DDL、數(shù)據(jù)查詢(xún)語(yǔ)句，DQL、數(shù)據(jù)操縱語(yǔ)句，DML和數(shù)據(jù)控制語(yǔ)句，DCL。8. Tabl

54、eAdapter 可以包含多個(gè)查詢(xún)，其中定義表架構(gòu)的查詢(xún)稱(chēng)為主查詢(xún)。二、選擇題1. ADO.NET 是A中用以操作數(shù)據(jù)庫(kù)的類(lèi)庫(kù)的總稱(chēng)。A. NET Framework B. Visual BasicC. 數(shù)據(jù)提供程序 D. DataSet2. 連接到 Access 數(shù)據(jù)庫(kù)應(yīng)該使用B對(duì)象。A. SqlConnection B. OleDbConnectionC. OdbcConnection D. OracleConnection3. 管理 DataSet 中所有數(shù)據(jù)表之間關(guān)系的對(duì)象是C。A. DataTableCollection B. DataTableC. DataRelationCollection D. DataRel