VB考點(diǎn)參考模板

1、第一章1、主窗口主要由標(biāo)題欄、菜單欄和工具欄組成 VB工作狀態(tài)(模式)：設(shè)計(jì)、運(yùn)行和中斷(Break)2、后綴名：工程文件 .vbp 窗體文件 .frm 標(biāo)準(zhǔn)模塊文件 .bas3、生成可執(zhí)行文件 （兩種運(yùn)行程序的方式：解釋方式；編譯方式 ； 執(zhí)行“文件”菜單中的“生成.exe”命令）4、在VB中，編寫程序代碼應(yīng)在代碼窗口中進(jìn)行第二章1、變量的命名規(guī)則：以字母或漢字開頭；不能出現(xiàn)句號(hào)、空格，不能嵌入！、#、￥、%&等字符；不能用VB關(guān)鍵字；不能超過(guò)255個(gè)字符；有效范圍內(nèi)唯一；不區(qū)分大小寫。2、注意點(diǎn)：整形是Integer(%),不能寫成Int;長(zhǎng)整形為long(&);單精度Si

2、ngle(!);雙精度Double(#);貨幣型Currency()3、算術(shù)運(yùn)算符的優(yōu)先級(jí)：先指數(shù)再取負(fù)，乘除（/）之后再整除（），還有取余要記住，加減運(yùn)算放最后。4、關(guān)系運(yùn)算符：不等于<> 等于=5運(yùn)算符優(yōu)先級(jí)：算術(shù)、字符串、關(guān)系、邏輯6、數(shù)學(xué)函數(shù)：Int(n)不大于n的最大整數(shù) 例如：Int(2)=2, Int(-2.5)=-3, Int(-3)=-37、name與caption的區(qū)分：Name屬性：用于設(shè)置窗體的名稱。指定窗體的名稱。只讀，2 / 18不能在應(yīng)用程序中修改Caption屬性：用于設(shè)置窗體標(biāo)題欄上的標(biāo)題內(nèi)容8、表達(dá)式中的變量必須是賦過(guò)值的，否則變量的初值自動(dòng)取零

3、值(變長(zhǎng)字符串變量取空字符)。例如： a = 1： c = a + b + 3 b未賦過(guò)值，為0執(zhí)行后，c 值為 49、賦值號(hào)兩邊的數(shù)據(jù)類型必須一致，即同時(shí)為數(shù)值型或同時(shí)為字符型。10、輸出數(shù)值數(shù)據(jù)時(shí)，前面有一個(gè)符號(hào)位(正號(hào)以空格表示)，后面留有一個(gè)空格；輸出字符串時(shí)，前后不留空格 當(dāng)輸出多個(gè)表達(dá)式時(shí)，各表達(dá)式之間用分號(hào)“；”(緊湊格式)或逗號(hào)“，”(按區(qū)格式)隔開。按區(qū)格式(14個(gè)字符位置)若語(yǔ)句行末尾有分號(hào)或逗號(hào),則輸出本行輸出項(xiàng)后不換行例題 Private Sub Form_Click() a = 2：b = "VB"：Print 50 * a '計(jì)算并輸出表

4、達(dá)式的值 Print b '輸出變量的值 Print '輸出空行 Print "The Total is" '輸出字符串常量 End Sub 運(yùn)行結(jié)果：Private Sub Form_Click() a = 3: b = 4 Print a, b, 4 + a, Print 2 * b Print a, , b： Print "a=" a, "b=" b End Sub在窗體上已經(jīng)建立了兩個(gè)文本框Text1和Text2，并編寫 如下三個(gè)事件過(guò)程： Private Sub Form_Click() Text2.

5、Text = "P" Text1.Text = "P" + Text1.Text End Sub Private Sub Text1_Change() ´內(nèi)容發(fā)生改變 Text2.Text = Text2.Text + "N" + Text1.Text End Sub Private Sub Form_Load() Text2.Text = "M" Text1.Text = "M" End Sub 運(yùn)行程序后單擊窗體，則在文本框Text2中顯示的內(nèi)容是 A. PNM B. NPM C.

6、 PNP D. PNPM 14、邏輯型數(shù)據(jù)只有True(真)和False(假)兩個(gè)值。 日期型數(shù)據(jù)用兩個(gè)“#”符號(hào)把日期和時(shí)間的值括起來(lái)。 如：#08/20/2001#、#2001-08-20#15、算術(shù)表達(dá)式：運(yùn)算符及其優(yōu)先級(jí)： (乘方) -(求負(fù)) */ Mod +- 16、字符串表達(dá)式：運(yùn)算符有兩個(gè)：&和+ ”計(jì)算機(jī)” & ”網(wǎng)絡(luò)” 結(jié)果為 ”計(jì)算機(jī)網(wǎng)絡(luò)” 17、 日期表達(dá)式： #8/8/2001# - #6/3/2001# 結(jié)果為 66 #12/1/2000# - 32 結(jié)果為 #10/30/2000#例題：1 + 2 * 14 Mod 17 6 / 2 = ？ 按運(yùn)算

7、符的優(yōu)先級(jí)分成若干運(yùn)算步驟先乘除，再整除和求Mod，后加運(yùn)算 （1 + 28 Mod 5=4）18、VB的內(nèi)部函數(shù)大體上分為四大類：數(shù)學(xué)函數(shù)，字符串函數(shù)，日期與時(shí)間函數(shù)和轉(zhuǎn)換函數(shù)。例題：給定一個(gè)兩位數(shù)(如36)，交換個(gè)位數(shù)和十位數(shù)的位置，把處理后的數(shù)顯示在窗體上Private Sub Form_Click() Dim x As Integer, a As Integer Dim b As Integer, c As Integer x = 36 a=Int(x/10) '求十位數(shù) b=xMod10 '求個(gè)位數(shù) c=b*10+a '生成新的數(shù)Print "處理后

8、的數(shù): " c End Sub19、字符串函數(shù)：(1)函數(shù)Mid(字符串，p，n) 從第P個(gè)開始取n個(gè)字符 示例：Mid(“ABCDEG”,3,2) 的結(jié)果為 ”CD” 若省略n，則得到的是從P開始的往后所有字符示例：Mid(“ABCDE”，2) 的結(jié)果為 “BCDE”(2)在函數(shù)Instr中，f和k均為可選參數(shù)，f表示開始搜索的位置(默認(rèn)值為1)，k表示比較方式，若k為0(默認(rèn))，表示區(qū)分大小寫；若k為1，則不分大小寫。 格式： Instr(f, 字符串1,字符串2,k) 例如 Instr(3, ”A12a34A56”, ”A”) 的結(jié)果為 7 Instr(3, ”A12a34A5

9、6”, ”A”, 1) 的結(jié)果為 4 Instr(”A12a34A56”, ”A”) 的結(jié)果為 120、類型轉(zhuǎn)換函數(shù)：Val函數(shù)將數(shù)字字符串轉(zhuǎn)換為數(shù)值型數(shù)字時(shí)，會(huì)自動(dòng)將字符串中的空格去掉，并依據(jù)字符串中排列在前面的數(shù)值常量來(lái)定值 ；Str(n) 將數(shù)值轉(zhuǎn)換成字符串； Asc(s)將字符轉(zhuǎn)換成Asc11碼；Chr(n)將Asc11碼轉(zhuǎn)換成字符 例如：Val("A12") 的值為 0；Val("12A12") 的值為 12 Val("1.2e2") 的值為 120例題：Private Sub Form_Click()x = "1

10、23":y = 123:a = Chr(Asc(x) + 5): b = Str(Val(x) + 5) c = Val(Str(y) + "5"): Print a,b, c End Sub(6 128 1235)第三章1、賦值語(yǔ)句：見第二章2、窗體(Form)是設(shè)計(jì)VB應(yīng)用程序的基本平臺(tái)；窗體本身是一個(gè)對(duì)象，又是其他對(duì)象的載體或容器；多數(shù)應(yīng)用程序是從窗體開始執(zhí)行的 ; 一個(gè)程序可以有多個(gè)窗體 一些常用的窗體屬性： ·Name屬性：用于設(shè)置窗體的名稱。指定窗體的名稱。只讀，不能在應(yīng)用程序中修改 ·Caption屬性：用于設(shè)置窗體標(biāo)題欄上的標(biāo)題

11、內(nèi)容。 ·Maxbutton和Minbutton屬性：用于設(shè)置最大化和最小化按鈕 ·Height和Width屬性：確定窗體的初始高度和寬度 ·Left和Top屬性：確定窗體的左上角在屏幕上的橫、縱坐標(biāo) ·Appearance屬性：用于設(shè)置窗體的外觀是平面還是三維的 ·BackColor和ForeColor屬性：設(shè)置窗體的背景色和前景色 ·Picture屬性：用于在窗體上設(shè)置要顯示的圖形。 對(duì)象.Picture=LoadPicture("文件名") · Visible(可見性)：設(shè)置對(duì)象的可見性，默認(rèn)值為T

12、rue 3.1屬性：對(duì)象的特性。如 Text1.Text,Label1.BackColor等 設(shè)置方法：(1) 在屬性窗口中設(shè)置 (2) 在程序中更改對(duì)象的屬性如 Text1.Text = “ABCDEFG”3.2事件：由系統(tǒng)預(yù)先設(shè)置好的、能被對(duì)象識(shí)別的動(dòng)作。 例如：鼠標(biāo)的移動(dòng)(MouseMove)、單擊(Click)等用來(lái)引發(fā)事件過(guò)程 3.3 方法：方法是對(duì)象能夠執(zhí)行的動(dòng)作 它是對(duì)象本身內(nèi)含的函數(shù)或過(guò)程，用于完成某種特定的功能。 一般格式：對(duì)象名.方法名(參數(shù)) 如 Form1.Cls 消除窗體Form1上的內(nèi)容 Form1.Print "Visual BASIC" &#

13、180;在當(dāng)前窗體上顯示4、控件：三種基本控件命令按鈕、標(biāo)簽和文本框 命令按鈕(commandButten)用于引發(fā)應(yīng)用程序的某個(gè)操作 標(biāo)簽(Label)主要用來(lái)顯示比較固定的提示性信息。 文本框(TextBox)是一個(gè)文本編輯區(qū)域，用戶可以在該區(qū)域中輸入、編輯和顯示文本內(nèi)容。5、對(duì)話框：對(duì)話框既可以用來(lái)顯示信息，也可以用于輸入信息 VB中能夠建立兩種預(yù)制對(duì)話框：輸入框和消息框 使用系統(tǒng)提供的函數(shù)(InputBox和MsgBox)，而不必為對(duì)話框另建窗體例3.4a 通過(guò)輸入框輸入姓名，然后再消息框中顯示出來(lái) Private Sub Form_Load() x = InputBox("

14、輸入您的姓名", "您叫什么名?") y = MsgBox( x & "先生：祝您馬到功成！") End Sub例3.8 從輸入框中輸入圓的半徑，計(jì)算圓的周長(zhǎng)和面積Private Sub Command1_Click() r = Val(InputBox("請(qǐng)輸入圓的半徑", "計(jì)算圓的周長(zhǎng)和面積") k = 2 * 3.14159 * r:s = 3.14159 * r * r Text1.Text = k:Text2.Text = s s=MsgBox "計(jì)算已完成", ,

15、 "例3.5" End Sub Private Sub Command2_Click() End End Sub討論題：1、下列程序段執(zhí)行后，輸出結(jié)果是_D_。 Dim a As String*4 a="Computer" a$= "Internet"a是定長(zhǎng)4 的字符串變量 Print a Print a$ a與a$是同一個(gè)變量 A. Computer B. Comp C. Comp D. Inte Internet Internet Inte Inte2、 假設(shè)Text1是某一個(gè)文本框的名稱，下列語(yǔ)句中正確的是 A A. Text

16、1.Height = 600 B. Text1.Print 123 C. Text1.Caption="新標(biāo)題" D. Text1.Name="文本框" 3、要在標(biāo)簽Lab1上顯示“計(jì)算結(jié)果”， 可用 _B_ 語(yǔ)句。 A. Lab1.Caption = 計(jì)算結(jié)果 B. Lab1.Caption = "計(jì)算結(jié)果" C. Lab1.Name = "計(jì)算結(jié)果" D. Lab1.Name = 計(jì)算結(jié)果 4、運(yùn)行下列程序段后，輸出結(jié)果是 1 x = 3 : y = 2 : z = 1 x = y : y = z z = x

17、: x = y Print x5、在窗體上已建立兩個(gè)文本框(Text1和Text2)和一個(gè)命令按鈕(Command1)，并編寫如下兩個(gè)事件過(guò)程： Private Sub Command1_Click() Text1.Text = Val(Text1.Text) + Val(Text2.Text) Text2.Text = Val(Text1.Text + Text2.Text) End Sub Private Sub Form_Load() Text1.Text = "1" Text2.Text = "2" End Sub 程序運(yùn)行后，單擊命令按鈕Com

18、mand1，在兩個(gè)文本框Text1和Text2中顯示的內(nèi)容分別為_D_(1)_和_(2)_B_。 (1) A0 B. 1 C2 D. 3 (2) A12 B. 32 C21 D. 226、設(shè)計(jì)程序，實(shí)現(xiàn)兩個(gè)文本框內(nèi)容的交換 Private Sub Command1_Click() “交換”按鈕 Dim t As String, a As String, b As String a = Text1.Text： b = Text2.Text 輸入 t = a ： a = b ：b = t 交換 Text1.Text = a：Text2.Text = b 輸出 End Sub拓展：Private S

19、ub Command1_Click() Dim t As String, a As String, b As String a = Val(Text1.Text)：b = Val(Text2.Text) t = a ：a = b：b = t Text1.Text = a：Text2.Text = b End Sub 如果輸入a=m,b=4 結(jié)果為：4，0（非數(shù)字文本為0）第四章 選擇結(jié)構(gòu)1、格式：?jiǎn)涡薪Y(jié)構(gòu)不需要end if2、IIf數(shù)格式：IIf(條件，條件為真時(shí)的值，條件為假時(shí)的值)例4.2 輸入三個(gè)數(shù)a、b、c，求出其中最大數(shù)Private Sub Command1_Click() 

20、9;m用來(lái)存放較大值 Dim a As Integer, b As Integer Dim c As Integer, m As Integer a = Val(Text1.Text) b = Val(Text2.Text) c = Val(Text3.Text) If a > b Then m = a Else m = b End If If c > m Then m = c Text4.Text = m End Sub3、選擇性控件：?jiǎn)芜x按鈕、復(fù)選框、列表框和組合框單選按鈕OptionButton： Caption屬性Value屬性：表示單選按鈕是否被選中，選中時(shí)Value值為

21、True,否則為False。 使用單選按鈕組時(shí)，選中其中一個(gè)，其余就會(huì)自動(dòng)關(guān)閉Alignment屬性：設(shè)置單選按鈕標(biāo)題的對(duì)齊方式復(fù)選框(CheckBox) 控件由一個(gè)四方形小框和緊挨它的文字組成。提供“選中”和“未選中”兩種可選項(xiàng)。常用屬性：Caption屬性 Value屬性：表示復(fù)選框的狀態(tài) 有三種取值：0未選中(缺省值) 1選中 2不可用(灰色顯示) Alignment屬性；Style屬性計(jì)時(shí)器(Timer)每隔一定的時(shí)間間隔產(chǎn)生一次Timer事件(或稱報(bào)時(shí))?？梢愿鶕?jù)這個(gè)特性來(lái)定時(shí)控制某些操作，或進(jìn)行計(jì)時(shí)。運(yùn)行時(shí)計(jì)時(shí)器不顯示 Enabled屬性：確定計(jì)時(shí)器是否可用 Interval屬性：

22、設(shè)置兩個(gè)Timer事件之間的時(shí)間間隔，其值以毫秒(1ms=1/1000 s)為單位。最長(zhǎng)時(shí)間為64.8秒。 例如，如果希望每半秒鐘產(chǎn)生一個(gè)Timer事件，那么Interval屬性值應(yīng)設(shè)置為500，這樣每隔500 ms就會(huì)觸發(fā)一次Timer事件，從而執(zhí)行相應(yīng)的Timer事件過(guò)程計(jì)時(shí)器控件只響應(yīng)一個(gè)Timer事件。也就是說(shuō)，計(jì)時(shí)器控件對(duì)象在間隔了一個(gè)Interval設(shè)定時(shí)間后，便觸發(fā)一次Timer事件第五章*1、For.Next循環(huán)主要是用在知道循環(huán)次數(shù)的情況下；若事先不知道循環(huán)次數(shù)，可以使用當(dāng)型循環(huán)Do.LoopFor.Next循環(huán)語(yǔ)句For 循環(huán)變量初值 To 終值 Step 步長(zhǎng)值 循環(huán)體N

23、ext 循環(huán)變量Do While.Loop語(yǔ)句Do While|Until條件 循環(huán)體Loops = 0For k = 1 To 8 s = s + kNext kPrint "s=" s n = 1: s = 0 Do While n <= 8 s = s + n n = n + 1 Loop Print "s=" s(下一行的)例題：For t = 1 To 3 If t <= 1 Then a = 3 If t <= 2 Then a = 2 If t <= 3 Then a = 1 Print a;Next t Print

24、 tA. 3 3 3 3 B. 1 2 3 4 DC. 3 2 1 4 D. 1 1 1 4For t = 1 To 3A. 3 3 3 3 B. 1 2 3 4 CC. 3 2 1 4 D. 1 1 1 4 If t >= 1 Then a = 3 If t >= 2 Then a = 2 If t >= 3 Then a = 1 Print a; Next t Print tA. 2 B. 3C. 4 CD. 5運(yùn)行下面程序后，循環(huán)體執(zhí)行了_次。 i = 0: n = 1 Do While i < 32 i = (i + 1) * (i + 1) n = n + 1

25、 Loop Print n 執(zhí)行下列程序段后，變量t 的值是_。 t = 0 For x = 2 To 3 n = 1 Do While n<=x t = t + n n = n + 1A.8B.9C.10 BD.11 Loop Next x 執(zhí)行下列程序段后，顯示的結(jié)果是_16_ s = 0 For m = 1 To 4 Step 2 n = 1 Do While n<=m s = s + n n = n + 1 Loop Next m Print s + m + n2、列表框：List屬性：字 符型數(shù)組, 存放列表框的表項(xiàng) 數(shù)組的下標(biāo)從0開始 例如，List1.List(0)的

26、值為“教授”，List1.List(1)的值為“副教授” ListCount屬性：表項(xiàng)數(shù)目 Text屬性：當(dāng)前選定表項(xiàng)的文本內(nèi)容 (從0開始) ListIndex屬性：返回已選定表項(xiàng)的順序號(hào)(索引)。若未選定任何項(xiàng)，則ListIndex的值為-1 Selected屬性：邏輯型數(shù)組，表示列表框中對(duì)應(yīng)表項(xiàng)是否被選中假設(shè)列表框List1中有四個(gè)表項(xiàng)，并已選定第2項(xiàng)，則有： List1.ListIndex 為1 List1.Text的值為”副教授” List1.Selected(1)為True (1)利用AddItem賦值 (2) 利用List屬性賦值 List1.AddItem “教授” List1

27、.List(0)= “教授” List1.AddItem “副教授” List1.List(1)= “副教授” List1.AddItem “講師” List1.List(2)= “講師” List1.AddItem “助教” List1.List(3)= “助教”習(xí)題：1下面程序段運(yùn)行的結(jié)果是_b_。 s = 2 For k = 8 To 18 Step 4 s = s + 2 Next k Print s A. 6 B. 8 C. 10 D. 362. 下列程序段的運(yùn)行結(jié)果(即 s 的值)是 b s = 0 For k = 5 To 25 Step 7 s = s + k Next k P

28、rint s A. 26 B. 36 C. 37 D. 613. 執(zhí)行下列程序段時(shí)，內(nèi)循環(huán)的總循環(huán)次數(shù)為_(1)_3_；執(zhí)行該程序段后，變量s的值是_(2)_4_，變量t的值是_(3)_1_ s = 0 For m = 2 To 1 Step -1 t = m For n = 1 To m s = s + n Next n Next m 4. 以下程序用于計(jì)算 S = 1 + (1 + 3) + (1 + 3 + 5) + + (1 + 3 + 5 + + 49) 將下列程序代碼補(bǔ)充完整。 t = 0: n = 1: s = 0 Do While _n<=49(1)_ t = _t+n(

29、2)_ s = _(3)s+t_ n = n + 2 Loop Print "s=" s第六章 數(shù)組 1、使用數(shù)組之前，一般需要定義數(shù)組，以便讓系統(tǒng)分配相應(yīng)的存儲(chǔ)單元。格式為： Dim 數(shù)組名(下界1 to上界1,下界2 to上界2) As 數(shù)據(jù)類型 舉例：Dim Sum(10) As Long 下標(biāo)號(hào)從010，共11個(gè)元素Dim Ary(1 to 20) As Integer 下標(biāo)號(hào)從120，共20個(gè)元素Dim d(1 to 5,1 to 10) As Double 定義二維數(shù)組還可以使用Public、Static、Private等語(yǔ)句來(lái)聲明數(shù)組 2、設(shè)定下界的方法 Op

30、tion Base 1 設(shè)定下界為1 必須在模塊級(jí)聲明段中聲明 Dim Data(10) As Single 下標(biāo)號(hào)從1103、Array函數(shù)：使用Array函數(shù)可以為數(shù)組元素賦值示例 Dim D As Variant 定義數(shù)組名(變體類型) D = Array(1, 2, 3, 4) 執(zhí)行結(jié)果：1D(0)，2D(1), 3D(2), 4D(3)4、習(xí)題:. 執(zhí)行下列程序段后，輸出的結(jié)果是_111 222 333_。 Dim a(1 To 3, 1 To 3) For j = 1 To 3 For k = 1 To 3 a(j, k) = j Print a(j, k)； Next k Print Next j 執(zhí)行下列程序段后，輸出的結(jié)果是_0123 1012 2101_。 Dim a(1 To 4, 1 To 4) For j = 1 To 4 For k = 1 To 4 a(j, k) = A