1、WORD格式*省高*息技術"算法與程序設計VB選修"知識要點相關知識點一算法1. 定義相關題解：1 算法： 就是解決問題的方法和步驟。算法是程序設計的“靈魂，算法 +數據構造程序。專業資料整理WORD格式單項選擇題1、以下關于算法說法不正確的選項是(AA 、算法獨立于任何具體的語言，BASIC)算法只能用BASIC語言來實現專業資料整理WORD格式B、解決問題的過程就是實現算法的過程C、算法是程序設計的“靈魂D、其它三項都正確2算法的描述方法：1 算法的描述：可分多種表達方法，一般用自然語言、流程圖和偽代碼進展描述。2 自然語言描述法： 指用人們日常生活中使用的語言本國語言

2、 ，用自然語言描述符合我們的習慣，且容易理解。3 流程圖描述： 也稱程序框圖，它是算法的一種圖形化表示方法。且描述算法形象、直觀，更易理解。4 偽代碼描述法： 是介于自然語言和計算機程序語言之間的一種算法描述。是專業軟件開發人員常用方法。開場或完畢輸入或輸出判斷處理或運算連流程線接點相關題解：單項選擇題1、圖形符號"" 在算法流程圖描述中表示(B).A 處理或運算的功能B 輸入輸出操作C 用來判斷條件是否滿足需求D 算法的開場或完畢2、圖形符號 "" 在算法流程圖描述中表示 ( A).A 處理或運算的功能B 輸入輸出操作C 用來判斷條件是否滿足需求D 算

3、法的開場或完畢3、以下哪個是算法的描述方法"(A)A 流程圖描述法 B 枚舉法C 順序法D 列表法4、以下哪個是算法的描述方法"(D)A順序法B列表法C集合法D自然語言描述法二程序設計根底（ 1常用高級編程語言： BASIC 、 VB 、Pascal、 C、 C+ 、 Java1 面向對象的程序設計語言：其中的 對象 主要是系統設計好的對象，包括窗體等、控件等2 控件： 是指工具箱中的工具在窗體中畫出的、能實現一定功能的部件，如文本框，命令按鈕等。常用控件 ：控件對象的類型前綴名字舉例專業資料整理WORD格式窗體Formfrmfrmfind命令按鈕Command butto

4、ncmdcmdok標簽Labellbllblinput文本框TextBoxtmrtmrClock假設命令按鈕 (Command) 的 Enabled 屬性設置為True 時按鈕有效，設置為False 時按鈕無效3 對象的屬性、方法和事件1 屬性專業資料整理WORD格式NameCaptionTextHeightWidthTOPLeftFontBackColorForeColorBorderStyleAlignmentAutoSizeVisibleEnabled屬性設置對象的名稱決定控件中顯示的內容文字決定窗體中文本框中顯示的內容(初始為空白 )決定控件高度決定控件寬度決定控件的靠頂部位置決定控件

5、的靠左邊位置設置控件中字體格式設置控件背風光設置控件的前風光設置控件的邊框風格即標簽文字對齊屬性 ：(0)Left Justify 時文本左對齊； (1)Right Justify 時文本右對齊；設置為 (2)Center 時文本居中。設置為 False 時輸入控件Caption 中文字超過控件寬度時超出局部被裁剪掉，設置為 True 時，控件可水平擴大，以適應控件Caption 屬性。決定控件是否可見決定控件運行時是否有效專業資料整理WORD格式對象 .屬性屬性值對象中屬性可以在設計界面時通過屬性窗中設置，也可以在運行時通過程序代碼設置,方法如下例：給文本框“Txt123 的“ Text屬性

6、賦值為字符串“20，代碼如下Txt123.text = 20變量對象 .屬性如果要獲取對象的狀態或特性，這時就要讀取對象的屬性值，方法如下例：讀取文本框“txt123的“ Text屬性的代碼如下a = txt123.text2 方法.對象 方法參數名表例： form.print 歡迎使用 該語句使用 print 方法在 form1 窗體中顯示字符串“歡迎使用3 事件及事件驅動Click 事件。如事件是對象對外部操作的響應，如在程序執行時，單擊命令按鈕會產生一個需要命令按鈕響應 Click 事件，就把完成 Click事件功能的代碼寫到Click 事件的事件過程中，與事件一一對應。事件過程的形式如

7、下：Private Sub 對象 _事件名 ( ) 事件過程代碼專業資料整理WORD格式End Sub一個簡單的VB 程序求圓的周長和面積Private Sub Command1_Click()Dim r As Single'定義 r 為單精度型Dim c As Single'定義 c 為單精度型Dim s As Single'定義 s 為單精度型r = Val(Text1.Text) '輸入半徑 rc = 2 * 3.14159 * r'計算周長s = 3.14159 * r * r'計算面積Text2.Text = c'輸出周長Tex

8、t3.Text = s'輸出面積End SubPrivate Sub Command2_Click()End'退出End Sub 相關題解：單項選擇題專業資料整理WORD格式1、以下關于程序設計說法正確的選項是(B)。專業資料整理WORD格式A 、程序設計語言的開展經歷了機器語言、匯編語言到高級語言的過程，比較流行的高級語言是 PASCAL, FORTRAN, EXCEL, C+ 等專業資料整理WORD格式B、程序設計就是尋求解決問題的方法，并將其實現步驟編寫成計算機可以執行的程序的過程C、程序設計語言和計算機語言是同一個概念的兩個方面D、程序設計就是指示計算機如何去解決間題或

9、完成一組可執行指令的過程2、以下說法錯誤的選項是D .A 、程序設計就是尋求解決問題的方法，并將其實現步驟編寫成計算機可以執行的程序的過程B、程序設計語言的開展經歷了機器語言、匯編語言、高級語言的過程C、計算機程序就是指計算機如何去解決間題或完成一組可執行指令的過程D、程序設計語言和計算機語言是同一概念的兩個方面專業資料整理WORD格式一、常量 ：批在程序進展過程中不變的量在VB中一般分 數值常量 與字符常量 兩種專業資料整理WORD格式數值常量： 就是數學中說的常數，分整型常量 和實型常量 兩種整型常量： 即整數，指不帶小數點的數值如1、 0、 -10、 +35等都是合法的整數專業資料整理W

10、ORD格式實型常量： 即實數，指帶小數點的數值。實型常量 又分為 定點數 和浮點 數兩種。例：定點數： 3.14159 和 -6.8， 1.99浮點數： 2E6、 1E5、 88E例： 1.2345× 103可表示為 1.2345E3，字母 E 表示底數 10 浮點數就是數學上的科學計數法。字符串常量：被一對雙引號括起來的假設干個合法的字符稱為字符串常量。例如：China 、 Visual Basic 、18、 3.1415等，雙引號中字符，不包括雙引號本身。符號常量： 如果屢次用到同一個常量，那么可用一個有意義的名字表示這個常量。二、變量 ：在程序執行過程中，其值可以改變的量稱為變

11、量變量命名注意要點：1、必須以字母開頭,不能以數字或其他字符開頭。2、只能由字母、 漢字、數字學或下劃線組成，不能含有小數點、空格等字符。3、最長不超過255 個字符4、不能以 VB 保存字作變量名，如語句定義符、函數名等。專業資料整理WORD格式5、 VB 不區分變量名中字母大小寫。如 HELLO 和 Hello 是同一個變量。數據及運算（ 1常用數據類型：(整型)Integer、長整型Long、單精度型Single、雙精度型Double 、字符串型 String 、布爾型 Boolean 、日期型 Date其中 (整型 )Integer 、長整型 Long 、單精度型 Single、雙精度

12、型 Double 屬于數值型表示X圍：(整型 )Integer (-32768 32767，存儲為16 位 ， 2 個字節 )(長整型 )Long(-21 億21 億，可以表示人口數量)(布爾型 Boolean(True 真、是或 False 假、非 )字符串型 String( 定長字符串： 0 65535 個字符，不定長字符串：0 20 億個字符 )字符串型數據是指用“括起來的一串字符。如“歡迎進入 VB 世界！、“VisualBasic、“1234 都是字符串類型。日期型 Date 100/1/1 9999/12/31日期型數據專門用來處理日期和時間。VB 采用一對“ #把日期和時間的值括

13、起來，如 #2003/08/20#表示 2003 年 8 月 20 日。 2常量和變量的命名、聲明及賦值符號常量的聲明：Const 常量名As 常量類型 = 常量值如： ConstpiAsSingle = 3.14159常量名為pi變量的聲明 ：Dim < 變量名>As < 變量類型 >如： DimaAsInteger 定義一個整型變量，變量名為a變量的賦值VB 中使用 Let 語句給變量賦值，其形式如下：Let變量= 表達式其中，方括號 表示這局部內容是可選的，通常可以省略該關鍵字。例題Private Sub Form_Click()Dim a As Integer,

14、 b As Integer, c As IntegerDim str As StringLet a = 54Let b = 114c = a + bstr = "HelloWorld"Print "a=" a, "b=" b, "c=" cPrint strEnd Sub數據的輸出程序中運算得到的結果， 除可以使用文本框和標簽顯示外， 對于大批量的數據更適合用 Pint 方法輸出，格式如下 對象 . Pint 表達式列表 例題：Private Sub Form_Click()Dim x As Single, y A

15、s SingleForm1.Print-61; -34Form1.Print9 * 2; 12Form1.Print"This is" "a book"x = 3: y = 4Print "x=" x, "y=" yEnd Sub專業資料整理WORD格式注意： Print 方法專業資料整理WORD格式相關題解：單項選擇題1、以下變量名寫法錯誤的選項是( B )A 、 abc_123B、 123abcC、 abc123D、 abc2、以下語句中定義了一個實型變量的是( B )A 、 Dim end as Intege

16、rB 、 Dim sum As SingleC、 Dim Name As StringD、其它三項都不對3、在 VB 中，以下哪個是正確表示十六進制整型數常量"(D)A、32FB、 H32FC、 h32FD、 &32F4、在 VB 中，以下關于符號常量的聲明，聲明正確的選項是:(C)A 、 Dim TAG as StringB 、Const TAG as String "Visual" + "Basic"C、 Const TAG as String ="Visual Basic"D、 Const TAG as Str

17、ing5、下面 ( B)不是字符串常量A 、 "True"B 、 #False#C、" "D、"你好 "運算符1、 算術運算：+ 加- 減* 乘指數例：22=4/浮點除例：5/2=2.5整除例： 52=2Mod求余數例： 5 Mod 2 = 1求：3*306/2相關題解單項選擇題1、分析以下程序 :Private Sub Form_Click()s=113 + 11 Mod 3Print sEnd Subs 的值是 (A).當單擊窗體時A 、 5B、6C、 4D、 3關系運算專業資料整理WORD格式=<>>=賦值、不

18、等于大于等于號< 小于號> 大于號< =小于等于號專業資料整理WORD格式注意：關系表達式的運算結果為布爾值True 或 False例： 3 > 2 結果為 True(真或是 )相關題解單項選擇題1、下面表達式的值是false 的有 ( C).A 、 "969" < "n97"B 、Int(4.99) <> len("basic")C、str(2000) < "1997"D、3>2邏輯運算Not取反 And與Or 或運算結果為布爾型Boolean True 或

19、False邏輯運算符的優先級為：No > And > OrTrue Or False And False And Not False日期運算符與日期表達式專業資料整理WORD格式日期表達式是用日期運算符“+或“ -將算式表達式、日期型常量、日期型變量、日期函數等連接起來的式子，如表達式“#2003/09/01# +30的運算結果是“2003-10-1 ；表達式專業資料整理WORD格式“#2003/10/20# - #2003/10/10# 的運算結果為整數 10相關題解單項選擇題1、設 a=2, b=3, 在 VB 中，表達式a>b Or b>3 值是 :(B)A 、

20、FalseB、 TrueC、 -1D、 1字符運算字符串連接符為“+和“ & “ 123 +“45 =“ 12345 “ 123 &“45 =“ 12345 123+ “45 =168“ 123 + 45 = 168運算符的執行順序在 VB 中，當一個表達式中同時出現多種運算符時，運算次序由運算符的優先級決定， 優先級高的運算符先運算， 優先級一樣的從左向右進展運算。不同性質的運算符優先級如下。算術運算符> 字符串運算符>關系運算符>邏輯運算符7+6 >5-3 and 3*155/2常用函數數學函數Abs(x)求 x 的絕對值，例：abs(-3.6) =

21、 3.6Sqr(x) 求 x 的平方根，例：sqr(100) = 10Int(x) 求 x 的最大整數例： int(3.6) = 3int(-3.6) = -4Rnd(x) 產生 0， 1)之間的隨機數 不包括1Sin(x)Cos(x)Tan(x)Atn(x)Exp(x)Log(x)使用三角函數 時，參數應是弧 度， 如數學中 sin300應寫為：sin(30*3.14159/180)字符串函數Len(字符串 ) 求字符串的長度,例： Len( “ hello) = 5Left( 字符串，截取長度) 截取字符串左邊局部,例 :Left(“ hello,2) =“ heMid( 字符串，起始位置

22、，截取長度) ,例： Mid( “ hello,2,2) =“ el其他：Right ( 字符串 ,長度 )截取字符串右邊局部。例: Right (“ hello,2) =“ loString( 數值，字符 )生成指定長度與指定字符的字符串，例：String(3,9) =999常用轉換函數Val(字符串 ) 將字符串轉換為數值Str(數值 ) 將數值轉換為字符串Chr( 字符代碼 )Asc(字符 )Tab 定位函數的使用專業資料整理WORD格式例題專業資料整理WORD格式Private Sub Form_Click()Dim aAs IntegerDim bAs Integera = 4: b

23、 = 9Print Tab(1); " 數 " Tab(9); " 平方 " Tab(18); " 立方 " Tab(27); " 平方根 "Print Tab(1); a; Tab(9); a * a; Tab(18); a * a * a; Tab(27); Sqr(a)Print Tab(1); b; Tab(9); b * b; Tab(18); b * b * b; Tab(27); Sqr(b)End Sub用戶交互函數VB 提供 InputBox( )和 MsgBox( )函數用于人機交互InputB

24、ox( )其語法格式為：InputBox( 提示 ，標題 ，默認值 ,X 坐標 ，Y 坐標 )MsgBox( ) 其語法格式為：MsgBox(提示信息 ，按鈕 ，標題 )相關題解單項選擇題1、 Visual Basic 中，以下 ( A)函數是求絕對值的。A、ABS XB 、SQR(X C、INT X D、GNX)2、表達式 Abs(-3.6)*sqr(100) 的值是 (C )。A、-36B、360C、 36D 、 -3603、以下 (A)數據類型不是數值型。A 、 DateB、 SingleC、 DoubleD、 Integer4、以下函數中，返回值是字符串的是(A).A 、 MidB、

25、InstrC、 ValD 、 Len5、以下 (A)函數返回系統的當前時間。A 、 time()B、 date()C、 day()D、 year()專業資料整理WORD格式6、代數表達式 A 、 g*t*t/21 gt 22 表達式后錯誤的選項是 ( D )B 、 1/2*g*t2C、 g*t2/2D、 gt2/2專業資料整理WORD格式2ab7、數學式子4ab在 VB 中的正確寫法是： A 、 (2*a+b)/4*aB、 (2*a+b)/(4ab) C 、 (2a+b)(4ab)D 、(2*a+b)/(4*a*b)8、判斷 x 是否在區間a, b上，在 VB中以哪個邏輯表達式是正確的 &qu

26、ot;(C )A 、 a<x andx<=bB 、 a<x<=bC、 a<x and x bD 、 a>x and x<=b綜合分析1、向 n 變量存入1 個 2 位整數，要使此2 位數十位和個位上的值分別存入x, y 變量。正確的算法是 ( D)。選項 :x、 x=Left(n,1) y=n-x*10 Print x:Print yB、 x=Left(n,1) y=Right(n,1) Print x:Print yC、 x=n/10 y=n-x*10 Print x:Print yD、 x=Int(n/10) y=n-x*10 Print x:Pr

27、int y2、向 x 變量中輸入任意一個小寫字母，再將x 變量中的小寫字母轉成大寫字母。正確的算法是( A ).選項 :A 、輸人字母到x a=Asc(x)-32 x=chr(x) Print xB、輸人字母到x a=Asc(x)+32 x=chr(x) Print xC、輸人字母到x a=Val(x) 一 32 x=Chr(x) Print xD、輸人字母到x a=Val(x)+32 x=Chr(x) Print x專業資料整理WORD格式程序設計的順序構造順序構造：代碼按照由上到下的順序一行一行地執行。程序執行過程中沒有分支、沒有重復，這種構造稱為順序構造。例題：交換兩個變量中的數據。Pr

28、ivate Sub cmdSwap_Click()Dim x As Single, y As SingleDim m As Singlex = Val(txtsx.Text)y = Val(txtsy.Text)m = x: x = y: y = m'交換數據txtdx.Text = Str(x)txtdy.Text = Str(y)End SubPrivate Sub cmdEnd_Click()EndEnd Sub相關題解單項選擇題1、以下是一段VB 程序：a = 1b = a + 1c = a + bA它的根本構造屬于A 、順序構造B、選擇構造C、循環構造D 、樹型構造2、以下

29、VB 程序運行后，變量x 的值為 (A).x=2Print x+lPrint x+2A 、 2B、 3C、5D 、8程序設計的分支構造行 If 語句行 If 是指在一行中寫完的If 語句。其一般格式為：格式一： If 條件 Then 語句執行這種形式的If 語句時，首先對條件進展判斷。假設條件成立，那么執行Then 后面的語句；假設條件不成立，那么執行If 語句后繼程序行的語句格式二： If 條件 Then 語句 1 Else 語句 2例題：輸入三個不一樣的數，求出其中最小數。Private Sub Form_Click()Dim aAs Single, b As Single, cAs Si

30、ngleDim MinAs Singlea = InputBox(" 輸入 a", " 輸入框 ")b = InputBox("輸入 b", " 輸入框 ")c = InputBox("輸入 c", " 輸入框 ")If a < b Then Min = a Else Min = bIf c < Min Then Min = cPrint " 最小數 " MinEnd Sub1；否那么執行語句 2。執行這種形式的語句時，先進展判斷。假設條件成立

31、，那么執行語句塊 If 語句專業資料整理WORD格式上述 If-then 語句只能根據條件的真假是否執行一條語句，當 Then局部和 Else局部包含的內專業資料整理WORD格式容較多時，那么可選用“塊 If 語句構造。格式三： If 條件 Then語句塊End If60 時顯示"及格"，該例題：當從輸入一個數時，當該數大于或等于數小于 60 時顯示 "不及格 "。Private Sub Command1_Click()Dim a As Singlea = Val(Text1.Text)If a >= 60 ThenLabel1.Caption =

32、 " 及格 "End IfIf a < 60 ThenLabel1.Caption = " 不及格 "End IfEnd Sub格式四： If 條件 Then語句塊 1Else語句塊 2End If例題：編寫程序，求函數 Y 的值當 x0 時， y=3x+1；當 x>0 時，y=4x+1。Private Sub Form_Click()Dim x As SingleDim y As Singlex = Val(InputBox(" 請輸入變量x")If x <= 0 Theny = 3 * x + 1Elsey =

33、4 * x + 1End IfPrint "y=" yEnd Sub相關題解單項選擇題1、以下是一段Visual Basic 程序 :If I=1 ThenX=X+1Else專業資料整理WORD格式X=X*2End If它的根本構造屬于(A).A 、選擇構造B、循環構造2、以下程序段運行后，變量x = 20If x >= 10 ThenValue = 5 * xElseValue = 4 * xEnd IfA、100B、 80C、90C、順序構造D、樹型構造Value 的值是A D 、70專業資料整理WORD格式綜合分析1、如要完成 :從鍵盤輸入一個正整數，判斷是否是

34、奇數，如是就在屏幕上顯示。比較好專業資料整理WORD格式的算法是 (BD選項 :A 、輸人的數存人B、輸人的數存人C、輸人的數存人D、輸人的數存人)。n 變量 f=(n/2=Int(n/2) 如果 f 中的值為True 就顯示n 變量 f=(n/2=Int(n/2) 如果 f 中的值為 False 就顯示n 變量如果n/2=Int(n/2) 成立，就顯示n 中值n 變量如果n/2=Int(n/2) 不成立，就顯示n 中值n 中值n 中值專業資料整理WORD格式2、下面是判斷變量x 是不是能被Private Sub commandl_Click()Dim x As Integerx=Val(Te

35、xt1. Text)If_ = 0 ThenLabell.Caption= 這個數是能被ElseLabell.Caption= 這個數不是能被End If5 整除的偶數的程序，橫線上的邏輯表達式應為5 整除的偶數5 整除的偶數(AB)專業資料整理WORD格式選項：專業資料整理WORD格式A 、 (x Mod 5) = 0 And (x Mod 2 ) = 0B、 x Mod 10 = 0C、 x Mod 5 = 0D、 x Mod 2 = 03、如要完成 :從鍵盤輸入一個正整數，判斷是否是偶數，如是就在屏幕上顯示。比較好的算法是 ( AC)。選項 :A 、輸入的數存人n 變量 f=(n/2=I

36、nt(n/2)如果 f 中的值為 True 就顯示 n 中值B、輸入的數存人n 變量 f=(n/2=Int(n/2)如果 f 中的值為 False 就顯示 n 中值C、輸入的數存人n 變量如果 n/2=Int(n/2) 成立，就顯示n 中值D、輸入的數存人n 變量如果n/2=Int(n/2) 不成立，就顯示n 中值4、以下程序段運行后,m 的值為 (A )A=2: b=1: c=5If A < b Then m = A Else m = bIf c < m Then m = c選項：A 、 1B、 2C、 5D、提示錯誤，無答案程序設計的循環構造一、 For-Next 循環For

37、循環變量一般形式是：For 循環變量 =初值 To 終值 Step 循環變量增量循環體Nxt 循環變量例題 1：求 s1+2+3+4.+100Private Sub Form_Click()Dim i As IntegerDim sumAs Integersum = 0For i = 1 To 100sum = sum + i' 循環體專業資料整理WORD格式Next iPrint "sum=" sumEnd Sub例題 2： Step循環變量增量Private Sub Form_Click()For j = 3 To 15 Step 2Print jNext jE

38、nd Sub循環變量的初值、終值、 循環變量增量都是數值型。其中要重復執行的操作稱為循環體，增量可正可負，如果沒有設置 Step，那么增量的缺省值為 11、 循環變量取初值；2、 循環變量與終值比較，沒有超過終值轉3，否那么循完畢， 接著執行循環語句的后繼語句；3、 執行一次循環體4、 循環變量增加一個增量5、 重復步驟24。以上可以看出，For-Next 循環變量是一種當型循環。說明（ a For 語句與 Next 語句必須成對出現，而且它們當中的“循環變量必須是同一個變量，如上例中均為 I 。（ b 當循環變量為正時，循環變量超過終值，是指循環變量的值大于終值時；假設為負，那么是指循環變量

39、的值小于終值。入口PA出口二、 DoLoop 循環For-Next 循環的次數是確定的，但是有的問題只知道循環完畢的條件，重復執行的次數事先并不知道，這時需要 Do-Loop 循環格式一：Do While 條件循環體Loop例題：求最大公約數Private Sub Command1_Click()Dim a As IntegerDim b As IntegerDim r As Integera = Val(Text1.Text)b = Val(Text2.Text)r = a Mod bDo While r <> 0專業資料整理WORD格式a = bb = rr = a Mod b

40、LoopText3.Text = Str(b)End SubPrivate Sub Command2_Click()EndEnd Sub當 VB 執行 Do While-Loop 循環時，先判斷指定的條件是否為真，假設條件為真，執行循環體，條件為假時退出循環。格式二： Do循環體Loop Until 條件這種循環的執行過程如下列圖。 進入循環體后， 先執行一次循環體 A，然后再檢專業資料整理WORD格式查條件 P 是否成立。如果不成立，就重復執行循環體 A，直到條件循環體。P 成立退出專業資料整理WORD格式ANP例題：如果我國人口每年以平均 1.5% 的速度增長，問多少年后我國人口到達或超過

41、 15 億？設現在人口為 12.3 億。Private Sub Form_Click()Dim pAs SingleDim rAs SingleDim nAs Integerp = 1230000000#r = 0.015n = 0Dop = p * (1 + r)n = n + 1Loop Until p >= 1500000000#Print n; " 年后 ", " 人口 =" pEnd Sub專業資料整理WORD格式1、以下流程圖表示的是程序的( BA 其它三項都不是B 循環構造2、在 VB 中，以下程序段:x=0Do While x<

42、;50x=(x+2)*(x+3)根本構造的算法。C 選擇構造D 順序構造專業資料整理WORD格式Loop專業資料整理WORD格式執行后，x 的值為:(C).專業資料整理WORD格式A、168B 、50C、 72D 、 0專業資料整理WORD格式3、閱讀下面程序，當單擊窗體之后，窗體上輸出的是(A)Private Sub Form_Click()Dim i As Integer:Dim s As Integers = 0專業資料整理WORD格式For i = 1 To 5s = s + iNext iPrint s,iEnd Sub選項 :A、156B、4、要求計算機打印出s=15i=6C、 6

43、5D、 s=6100 至 200 之問所有偶數的平方根值。正確的算法是i=5( C)。專業資料整理WORD格式選項 :A 、 i=100 Do While i<200:Print i ， Sqr(i):LoopB、 i=100 Do While i<200:Print i ，Sqr(i):i=i+1:LoopC、 For i=100 To 200 Step 2:Print i ， Sqr(i):Next iD、 For i=100 To 200:Print i ， Sqr(i):Next i專業資料整理WORD格式5、以下程序段中，循環體執行的次數是y = 2Do While y <= 8y = y+yLoop選項 :A、2B、3C、4D、5(B)專業資料整理WORD格式6、閱讀下面程序，當單擊窗體之后，m 的值是( C).專業資料整理WORD格式Private Sub Form_Click()Dim m As Integer:Dim i As Integerm = 0For i = 1 To 3m = m + 2Next iPrint mEnd Sub選項：專業資料整理WORD格式A 、 0B 、4C、 6D、 8專業資料整理WORD格式7、在 VB 中，假定有以下程序段:For i=1