vb學習筆記vb語言

第一篇：vb學習筆記vb語言

如何入門學習VB語言

一.VB是啥?

VB 是Visual Basic編程言語

編寫計算機程序需求運用計算機編程言語。計算機編程言語是人和計算機“對話”的橋梁。就像人類的言語相同，計算機編程言語也有許多。其時較為廣泛運用的言語有“C++”、“Pascal”、“Basic”等。在許多的計算機編程言語中，以BASIC言語最為易學易用。

BASIC是英文Beginner’s All purpose Symbolic Instruction Code的縮寫，意思為初學者通用符號指令代碼，一向都是程序設計入門的首選言語。

二.學VB有啥用?

VB能做許多東西，只需你想去做。

運用程序。數據庫程序。只需能想得到的根柢上都能夠?？墒窍癫僮飨到y等大型雜亂的編程如今通常都用C來編的。用VB很難做得到。要做程序員，單單只會VB還不可。最許多學點其他的。比方ASP數據庫 。NET。這樣才做出十分好的東西來

三.如何學好VB

VB是一種很簡略上手的言語,歸于典型的入門簡略,知曉很難。

在如今,VB仍然是世界上運用最廣泛的言語.對比適合的范疇是C/S架構的MIS,衍生言語VBScript又是一種十分適合B/S架構MIS等的言語,他的簡略和易修改十分適合處理系統需求多變的狀況.對數據庫的支撐也極好,有MS在后面支撐,你還憂慮啥,不過任何言語都在進化,VB也不破例,LZ能夠以如今的根底學習.net架構,習氣打開的需求.

若是你是一巧不通的話，我能夠介紹一個學習的辦法：

1.先看看書,大致的了解了一些根柢的東西,不至于"盲人摸象"

2.從小東西學起(全部在于實習)，例如:VB 的三角函數啊.時鐘啊.我想在書中是會有的.也能夠看看網上的教程...

3.一個很重要的主張:等你現已有所收效了,最佳去上個VB的高檔補習班.打個比方:時辰練的最佳,也得有自個來幫你打通經脈啊...

第二篇：VB各章節復習重點筆記總結

VB程序設計的初步知識

1.VB的概述

VB是一種可視化、面向對象和采用事件驅動方式的結構化高級程序設計語言。

特點：▲ 可視化編程

▲ 面向對象程序設計 ▲ 結構化的程序設計語言

▲ 事件驅動編程機制 ▲ 訪問數據庫

2.VB的程序開發環境

(1)窗口設計器窗口。簡稱，窗體

(2)工程資源管理器窗口

▲ 工程文件和工程文件組

工程文件的擴展名是vbp，每個工程對應一個工程文件。

▲ 窗體文件

擴展名是frm，每一個窗體對應一個窗體文件，一個應用程序可以有多個窗體。

▲ 標準模塊文件

擴展名bas，不屬于任何一個窗體。

▲ 類模塊文件

(3)屬性窗口和工具箱窗口

3.VB常用對象及操作

(1)對象事件的名稱Name是由VB預定的，不可以由編程者設定。

可以在運行期間改變窗體的Name屬性的值。(?)

(2)控件

4.VB應用程序通常有3類模塊組成，即窗體模塊、標準模塊和類模塊。

VB應用程序以解釋和編譯方式執行。

5.VB中的變量和常量

(1)常量

▲ 文字常量：字符串和數值常量

▲ 符號常量

格式：Const 變量名=表達式

(2)變量

▲ 命名規則：名字只能由字母、數字和下劃線組成。

第一個字符必須是英文字母，最后一個字符可以是類型說明符。

▲變量的類型和定義

①類型說明符放在變量名的尾部。 A#b(錯)

%：整型 &：長整型 !：單精度型 #：雙精度型 $:字符串型

②在定義變量時指定類型。

格式：Declare 變量名 as 類型

Declare 可以是 Dim、Static、Public或Private

(3)變量的作用域

變量分為:局部變量、模塊變量和全局變量

① 局部變量

在事件過程或通用過程內定義的變量叫局部變量。

② 模塊變量

窗體變量可用于窗體內的所有過程. 當同一個窗體內的不同過程使用相同的變量時，必須定義窗體層變量，在使用窗體層變量前，必須先聲明。

③ 全局變量

全局變量只能在標準模塊中聲明，不能在過程或窗體模塊中聲明。用Public 聲明。

6. VB常用內部函數

⑴ 轉換函數

★ 取整函數Int和fix ★ 數值轉換函數 ★ 類型轉換函數

★ 格式轉換函數

⑵數學函數

★ 三角函數

★ 絕對值函數(Abs)

★ 符號函數(Sgn) ★ 平方根函數(Sqr)

★ 指數和對數函數(Exp和Log)

⑶隨機數函數

★ 隨機數函數(Rnd) ★ Randomize語句

⑷ 時間函數

7. VB字符串處理

★左、中、右部截取 Left(字符串，n)Mid(字符串，n)Right(字符串，n)

★字符串長度測量函數 Len(字符串)

★Strings函數 Strings(n,ASCII碼) Strings(n,字符串)

★查找某個字符串函數 InStr(首字符位置，字符串1，字符串2[，n]

★字母大小轉換函數 Ucase(字符串) Lcase(字符串)

★插入字符串語句 Mid(字符串，位置)=字符串

★SetFocus語句

8.VB運算符與表達式

(1)算術運算符

★求模運算 Mod求余.

★算術運算符優先級 ^>>&

如：7^2 Mod 5^23=1

(1) 關系運算符和邏輯運算符

(2) 表達式的執行順序

◆ 關系運算(=,>,<,<>,≦,≧)

◆ 最后進行邏輯運算,順序為: Not→And→Or→Xor→Eqv

如：表達式： Not a<=c Or 4*c=b^2 And b<>a+c的值是(Flase)a=2,b=3,c=4

9.VB常用標準控件

(1).標簽

●Alignment 確認標簽中標題放置的位置，可設置0、

1、2，作用分別為標題設置在左、右、中。

●AutoSize 標題自動調整標簽的大小，可設置為True和False.

●Borderstyle 設置標簽的邊框，可設置為0和1，0表示為無邊框。

●Enabled 用于確定一個窗體或控件能否對用戶產生的事件作出反應。

●BackStyle 設置標簽是否覆蓋背景，0表示為透明，1表示標簽覆蓋背景。

●WordWrap 決定標簽的標題文本能否自動換行。

●其他：Height、Left、Top、Visible、Width等等。

(2) 文本框

屬性：

●MaxLength 設置文本框中輸入的最大字符數。

●MultiLine 設置是否允許多行顯示。

●Passwordchar 用于口令輸入。

●Scrollbars 用來設置文本框中的滾動條。

事件：

◎ Change 事件 當用戶輸入新信息或把Text屬性設置為新值從而改變文本框的屬性時，將可觸發此事件。

◎ GotFocus事件 當文本框有輸入焦點時，鍵盤上輸入的字符都將在文本框中顯示出來，只有當一個文本框被激活并且可見性為TRUE是才能收到焦點。

◎ Setfocus 事件 該方法可以把輸入的光標(焦點)移到指定的文本框中。

格式： [對象.] Setfocus

(3) 圖形控件

圖片框和圖像框：

▲ CurrentX和CurrentY屬性 ▲ Picture屬性

▲ Stretch屬性 用于自動調整圖像框中圖形內容的大小。

▲ 區別:① 圖片框是“容器”控件，可作為父控件，而圖像框不能。

③ 圖片框可接受文本和圖片，圖像框不能。

④ 圖像框占用內存少，顯示速度快。

⑤ 圖片框更靈活，且適用于動態環境。

▲ 運行期間裝入圖片

格式：[對象.] Picture=LoadPicture(”文件名”)

直線和形狀：

△ BorderColor屬性

△ Borderstyle

1—實線 2—虛線 3—點線 4—點劃線

△ BackStyle 設置標簽是否覆蓋背景，0表示為透明，1表示標簽覆蓋背景。

△ Shape 屬性

0—矩形 1—正方形 2—橢圓形 3—圓形 4—四角圓化的矩形

△ BorderWidth 指定線寬或界寬

(3) 復選框和單選按鈕

Enabled、FontBold、FontItalic、FontName、FontSize、FontUnderline

Value、Alignment、Height、Left、Top、Visible、Width

單選按鈕：Value=True，表示選擇了該單選按鈕.

Value=False, 表示沒有選擇該單選按鈕.

復選框：Value=0，表示沒有選擇該復選框。

Value=1，表示選擇該復選框。

Value=2，表示該復選框被禁用。

(6) 列表框和組合框

列表框方法：AddItem 添加文本內容到列表框中。

Clear 清除列表框中所有內容。

RemoveItem 刪除列表框中指定的項目。

組合框(ComboBox)：AddItem、Clear、RemoveItem同樣適用。

Style是組合框的一個重要屬性，其值可取0、

1、2，決定組合框的3個類型。

注意： 屬性ListIndex和 ListCout的區別

108(7) 滾動條

屬性：

除Enabled、FontBold、FontItalic、FontName、FontSize、FontUnderline

Value、Alignment、Height、Left、Top、Visible、Width外，還有以下屬性：

◆ Max和Min

◆ LargeChange和SmallChange

◆ Value 表示滾動框在滾動條的位置。

事件：主要有Scroll和Change.當在滾動條內拖動滾動框時會觸發Scroll事件，而改變滾動框的位置時會觸發Change事件。

(8) 計時器

可以用Enabled和Name屬性，其最重要的是Interval屬性，取值范圍0～65535.

(9) 框架

(10) 焦點與Tab順序

★設置焦點

格式： [對象.] Setfocus

★ Tab順序

Tab順序是在按Tab鍵時焦點在控件間移動的順序。影響Tab順序的屬性是TabIndex。 1.數據的輸出方法:

⑴ print方法

與print方法有關的函數：tab(n)函數 【print tab(24); 800】

spc(n)函數 【print “china”; spc(4); ”中國” 】用于跳出n個空格輸出

tab函數從第一列開始計數，n是絕對偏移量。spc(n)函數則是從前面的輸出內容開始計數，n是相對偏移量。

⑵ 格式輸出( )

#：表示數字，不補零

0：表示數字，在數字的前或后補零

.：指定小數點的位置

，：指定千分分隔符的位置 如：print format$ (12345.6,”####,#.##”)12,345.(3)msgbox函數 信息框→ 返回值→標題

2.數據輸出方法

(1)inputbox方法

Inputbox函數的返回值默認為字符串。如：a=inputbox(“Enter an integer”)

b= inputbox(“Enter an integer”) text1.text=b+a 如果在輸入對話框中輸入8和10，則文本框中顯示的內容為108

VB的控制結構

循環控制結構

(1)For循環控制結構

使用Exit for 語句，可以在循環變量到達終值前就退出循環。

Do ……loop While

(2)當循環結構

(4)多分支控制結構

While 條件

測試表達式=????→Select case 測

[語句塊]

Wend

試表達式

(5)IIf函數

A=IIf(條件，true部分，false部分)

數組與過程

1.默認數組

默認數組就是數據類型為Variant的數組。 Static A(4)即為定義了四個默認數組。

2.動態數組

◆ 用變量作為下標定位的數組時動態數組

◆ 用數值常量或符號常量作為下標定維的數組是靜態數組。

動態數組定義分兩步：首先在窗體層、標準模塊或過程中用DIM或Public聲明一個沒有下標的數組，然后再過程中在用ReDimd定義。

3. 數組的清除和重定義

Erase 數組名

(3)Do循環結構

Do While……Loop

Erase用于動態數組中，將刪除整個數組結構并釋放數組所占用的內存，即動態數組以后就不復存在。用于靜態數組中只是內容清空，數組依然存在。

4. 數組元素的輸入及輸出

輸入：一般通過For循環和Inputbox函數輸出

如: Option base 1

Dim s() as string

Sub Form_Click()

Redim s(4) as string

For i= 1 to 4

Temp$=Inputbox(“Enter Name”)

S(i)= Temp$

Next i

5.控件數組

控件數組是一組相同類型的控件組成，這些控件有一個相同的控件名稱，具有相同的屬性設置，所有元素的Name屬性相同，但Index屬性不同。

6.Sub過程

● 通用過程：多個事件過程需要使用同一個程序代碼，他可以單獨建立，供事件過程或其他過程調用。

● 事件過程：當發生某個事件時，對事件作出響應的程序段。

函數過程的返回值只能有一個。

調用Sub過程：① Call語句調用過程。 如：Call Tryout(a,b)

② 把過程名作為一個語句使用。 如：Try out a,b 去掉call關鍵字，去掉“實際參數”括號。

End Sub

輸出：用Print方法結合For循環實現

Option base 1

Dim s(4,4) as Integer

For i= 1 to 4

For j= 1 to 4

Print s(i,j); “ ” ;

Next j

Next i

7.通用sub過程和事件過程 ★重點★難點★

事件過程是一種特殊的sub過程，他附加在窗體和控件上。窗體的事件過程不能由用戶任意定義，而是由系統指定。通常是在事件過程中調用通用過程，同時事件過程也可以被其他過程調用。

通用過程可以放在標準模塊中，也可以放在窗體模塊中，而事件過程只能放在窗體模塊中，不同模塊中的過程可以互相調用。

8.Function過程 ★重點★難點★

Sub過程不直接返回值，可以作為單獨的基本語句使用，而Function過程要返回一個值，通常出現在表達式中。

鍵盤與鼠標事件

1.鍵盤事件

⑴KeyPress事件

當壓下鍵盤上的某個鍵時，將發生KeyPress事件。該事件可以用于各控件。比如用在文本框上的格式：Private Sub Text- KeyPress(KeyAscii as integer)

KeyPress事件帶有一個參數，參數有兩種形式，第一種形式：Index As Integer,只用在控件數組。第二種形式是：KeyAscii As integer,用于單個控件。

KeyPress事件用于識別按鍵的Ascii碼，捕捉擊鍵動作，KeyAscii參數不能省略。

控件的鍵盤事件優先于窗體的鍵盤事件

⑵KeyDown和KeyUP事件

KeyDown和KeyUP事件返回的是鍵盤的直接狀態。 KeyPress事件返回的是Ascii碼。當按鍵“A”時，KeyDown事件所得到的Keycode碼與鍵“a”的相同。

2.鼠標事件 第10章 鍵盤與鼠標事件

本章主要考查鍵盤事件與鼠標事件，包括KeyPress事件、KeyDown和KeyUp事件、鼠標事件、鼠標光標的形狀與拖放等知識點。通過對歷年試卷內容的分析，本章考核內容約占6%，屬于一般考查對象。

10.1 鍵盤事件

使用鍵盤事件過程，可以處理當按下或釋放鍵盤上某個鍵時所執行的操作。

10.1.1 考點1：KeyPress事件

當壓下鍵盤上的某個鍵時，將發生KeyPress事件。該事件可用于窗體、復選框、組合框、命令按鈕、列表框、圖片框、文本框、滾動條及與文件有關的控件。嚴格地說，當按下某個鍵時，所觸發的是擁有輸入焦點(Focus)的那個控件的KeyPress事件。在某一時刻，輸入焦點只能位于某一個控件上，如果窗體上沒有活動的或可見的控件，則輸入焦點位于窗體上。當一個控件或窗體擁有輸入焦點時，該控件或窗體將接收從鍵盤上輸入的信息。例如，假定一個文本框擁有輸入焦點，則從鍵盤上輸入的任何字符都將在該文本框中回顯。

在窗體上畫一個控件(指前面所講的可以發生KeyPress事件的控件)，比如文本框，并雙擊該控件，進入程序代碼窗口后，從“過程”框中選取KeyPress，即可定義KeyPress事件過程。一般格式如下：

Private Sub Text1 _ KeyPress(KeyAscii As Integer)

……

End Sub

KeyPress事件帶有一個參數，這個參數有兩種形式，第一種形式是Index As Integer，只用于控件數組;第二種形式是KeyAscii As Integer，用于單個控件。上面列出的是第二種形式。KeyPress事件用來識別按鍵的ASCII碼。參數KeyAscii是一個預定義的變量，執行KeyPress事件過程時，KeyAscii是所按鍵的ASCII碼。

說明：

利用KeyPress事件可以對輸入的值進行限制;

利用KeyPress事件可以捕捉擊鍵動作;

在KeyPress過程中可以修改KeyAscii變量的值。如果進行了修改，Visual Basic控件中輸入修改后的字符，而不是用戶輸入的字符。

例10.1.1 以下關于KeyPress事件過程參數KeyAscii的敘述中，正確的是( )。[2005年9月 填空第29題]

A.KeyAscii參數是所按鍵的ASCII碼

B.KeyAscii參數的數據類型為字符串

C.KeyAscii參數可以省略 D.KeyAscii參數是所按鍵上標注的字符

解析：KeyPress事件帶有一個參數，這個參數有兩種形式。第一種形式是Index As Integer，只用于控件數組;第二種形式是KeyAscii As Integer，用于單個控件。參數KeyAscii是一個預定義的變量，執行KeyPress事件過程時，KeyAscii是所按鍵的ASCII碼，并且該參數不能省略。

答案：A

小技巧：在默認情況下，控件的鍵盤事件優先于窗體的鍵盤事件。因此在發生鍵盤事件時，總是先激活控件的鍵盤事件。如果希望窗體先接收鍵盤事件，則必須把窗體的KeyPreview屬性設置為True，否則不能激活窗體的鍵盤事件。

10.1.2 考點2：KeyDown和KeyUp事件

與KeyPress事件不同，KeyPress并不反映鍵盤的直接狀態，而KeyDown和KeyUp事件返回的是鍵盤的直接狀態。換言之，KeyDown和KeyUp事件返回的是“鍵”，而KeyPress事件返回的是“字符”的ASCII碼。例如，當按字母鍵“A”時，KeyDown所得到的KeyCode碼(KeyDown事件的參數)與字母鍵“a”是相同的，而對KeyPress來說，所得到的ASCII碼不一樣。

KeyDown和KeyUp事件的參數也有兩種形式，其中Index As Integer只用于控件數組，而KeyCode As Integer，Shift As Integer用于單個控件。

說明：

參數KeyCode是按鍵實際的ASCII碼。該碼以“鍵”為準，而不是以“字符”為準。也就是說，大寫字母與小寫字母使用同一個鍵，它們的KeyCode相同(使用大寫字母的ASCII碼);

轉換鍵，指的是三個轉換鍵的狀態，包括Shift、Ctrl和Alt，這三個鍵分別以二進制形式表示，每個鍵有三位，Shift鍵為001，Ctrl鍵為010，Alt鍵為100;

KeyDown是當一個鍵被按下時所產生的事件，而KeyUp是松開被壓下的鍵時所產生的事件。

例10.1.2 在窗體上畫1個文本框，其名稱為Text1，然后編寫如下過程：

Private Sub Text1_KeyDown (KeyCode As Integer ,Shift As Integer)

Print Chr(KeyCode)

End Sub

Private Sub Text1_KeyUp(KeyCode As Integer,Shift As Integer)

Print Chr(KeyCode+2)

End Sub

程序運行后，把焦點移到文本框中，此時如果敲擊“A”鍵，則輸出結果為( )。[2006年4月 選擇第29題]

A.A B.A C.A D.A

A B C D

解析：敲擊“A”鍵的動作，首先是按下該鍵觸發Text1_KeyDown事件，通過Print Chr(KeyCode)輸出“A”;然后是松開被按下的“A”鍵，此時觸發Text1_KeyUp事件，通過Print Chr(KeyCode+2)輸出“C”。

答案：C

警鐘長鳴：在鍵盤上按下一個鍵總是會觸發KeyDown事件、KeyUp事件和KeyPress事件。

例10.1.3 在窗體上畫1個命令按鈕和1個文本框，其名稱分別為Command1和Text1，然后編寫如下代碼：

Dim SaveAll As String

Private Sub Command1_Click()

SaveAll = SaveAll +Chr(KeyAscii)

Text1.Text=Left(UCase(SaveAll),4)

End Sub

End Sub

程序運行后，在文本框中輸入abcdefg，單擊命令按鈕，則文本框中顯示的內容是____。[2006年4月 填空第9題]

解析：Text1_KeyPress過程將用戶在文本框中所輸入的內容保存到變量SaveAll中，本例輸入“abcdefg”，則SaveAll=“abcdefg”;Left(UCase(SaveAll),4)函數即為對“abcdefg”轉換為大寫后取前四個字母，即“ABCD”。

答案：ABCD

小技巧：利用邏輯運算符And可以判斷是否按下了某個轉換鍵，可以在事件過程中通過判斷是否按下了某個或某幾個鍵來執行指定的操作。

Private Sub Text1_KeyPress(KeyAscii As Integer)

可視化程序設計

1.當窗體為活動窗體時，可以使用“工具”菜單中的“菜單編輯器”打開菜單編輯器。

2.彈出式菜單：建立彈出式菜單首先用菜單編輯器建立菜單，然后用PopupMenu方法彈出顯示。

各級菜單中的所有菜單項的名稱必須唯一。

3.通用對話框： 對話框的類型可以通過Action屬性設置，也可以用相應的方法設置?？梢酝ㄟ^DialogTitle屬性設置有實際意義的標題。

通用對話框，Action=1 打開文件; =2 保存文件

方法：showopen;showsave

4.文件對話框：

格式：【窗體】對話框名，Fliter=描述符1|過濾器1| 描述符2|過濾器2|…

FliterIndex 用來指定默認的過濾器。

5.多重窗體程序設計

Show方法：用來將指定的窗體裝入內存并顯示該窗體。

6.VB工程中，可以作為啟動對象的程序是Sub main 過程或任何窗體。

一個工程中可以包括多個窗體文件。

數據文件

1基本文件操作語句與函數

⑴ 打開文件 ★重點★難點★

格式：Open文件名【for 方式】 as #文件號

如果省略【for 方式】，則打開文件的存取方式是隨機存取方式。

方式指文件的輸出方式，可以是Output(順序輸出)以寫的方式打開、 input(順序輸入)、append(添加)。

使用open語句打開文件時，如果為輸入input打開的文件不存在，則產生“文件未找到”的錯誤;如果為Output(順序輸出) 、append(添加)訪問方式打開的文件不存在，則建立相應的文件。

(2)關閉文件

(3)EOF函數

用來測試文件的結束狀態。利用EOF函數，可以避免在文件輸入時出現“輸入超出尾”錯誤。 DO While Not EOF

2.順序文件與隨機文件

⑴ 順序文件寫操作

Print #文件號，表達式

Write #文件號, 表達式

(3)隨機文件的打開與讀寫操作

隨機文件的記錄是定長記錄。在用open語言打開文件時必須指定記錄的長度。

打開隨機文件： Open”文件名” for random As #文件號 對文件的操作既可以讀也可以寫。

第12章 數 據 文 件

本章主要考查Visual Basic中的數據文件操作，包括Visual Basic文件概述、基本文件操作語句與函數、順序文件與隨機文件和文件系統控件。通過對歷年試卷內容的分析，本章考核內容約占8%，屬于一般考查對象。

12.1 Visual Basic文件概述

12.1.1 考點1：文件概述

1.文件概念

所謂“文件”，是指記錄在外部介質上的數據的集合。

2.在程序設計中使用文件的原因

文件是使一個程序可以對不同的輸入數據進行加工處理、產生相應輸出結果的常用手段。

(2)順序文件讀操作

Input #文件號，變量表

使用文件可以方便用戶，提高上機效率;

使用文件可以不受內存大小的限制。

3.文件結構

為了有效地存取數據，數據必須以某種特定的方式存放，這種特定的方式稱為文件結構。Visual Basic文件由記錄組成，記錄由字段組成，字段由字符組成。

(1)字符

字符是構成文件的最基本單位。字符可以是數字、字母、特殊符號或單一字節。Visual Basic支持雙字節字符，當計算字符串長度時，一個西文字符和一個漢字都可作為一個字符計算，但它們所占的空間是不一樣的。例如：字符串“系統分析員協會顧問團CSAI”的長度為14個字符，而所占的存儲空間為24個字節。

(2)字段

字段也稱為域。字段由若干個字符組成，用來表示一項數據。

(3)記錄

記錄由一組相關的字段組成。

(4)文件

文件由記錄構成，一個文件含有一個以上的記錄。

4.文件種類

根據不同的分類標準，文件可分為不同的類型。

(1)根據數據性質劃分

程序文件：存放的是可以由計算機執行的程序，包括源文件和可執行文件。

數據文件：存放普通的數據，這類數據必須通過程序來存取和管理。

(2)根據數據的存取方式和結構劃分

順序文件：文件中的記錄一個接一個地存放。順序文件的組織比較簡單，但維護困難。主要優點是占空間少，容易使用。

隨機存取文件：又稱直接存取文件，每個記錄的長度是固定的，根據記錄號進行讀寫操作。優點是數據的存取靈活、方便，速度較快，容易修改。缺點是占空間較大，數據組織較復雜。

(3)根據數據的編碼方式劃分

ASCII文件：又稱文本文件，它以ASCII方式保存文件?？梢杂米痔幚碥浖⒑托薷?。

二進制文件：以二進制方式保存的文件。不能用普通的字處理軟件編輯，占空間較小。

例12.1.1 以下文件擴展名中，不屬于程序文件的是( )。

A..exe B..frm C..mdb D..vbp

解析：.exe文件為可執行文件;.frm文件為Visual Basic的窗體文件;.mdb文件為Access數據庫文件;.vbp文件為Visual Basic的工程文件。

答案：C

第二章 數據的輸出與輸入

1.Print方法的對象

2.MsgBox函數和InputBox函數中各參數的含義

格式：InputBox(prompt,title,default)

格式：MsgBox(msg,type,title)

9章 數組與過程

本章主要考查Visual Basic中的數組與過程，主要包括：數組基本概念、數組基本操作、控件數組、Sub過程、Function過程、過程中的參數、局部內存分配和Shell函數。通過對歷年試卷內容的解析，本章考核內容約占18%，屬于重點考查對象,但將保持下降趨勢。

9.1 數組基本概念

9.1.1 考點1：數組的定義

數組是有序的數據的集合。在Visual Basic中，一個數組中的元素可以是相同類型的數據，也可以是不同類型的數據。在Visual Basic中，可以有兩種格式定義數組：

1.第一種格式

(1)一維數組

一維數組的定義一般格式如下：

Dim 數組名(下標上界) As 類型名稱

例如：Dim score (10) As Integer

該語句定義了一個一維數組，名字為score，類型為Integer，共6個元素。

(2)二維數組

二維數組的定義一般格式如下：

Dim 數組名(第一維下標上界，第二維下標上界) As 類型名稱

例如：Dim stuScore (10,2) As Integer

該語句定義了一個二維數組，名字為stuScore，類型為Integer，共11X3=33個元素。

2.第二種格式

(1)定義數組

在定義數組時，指定數組下標的上界和下界。語句一般格式如下：

Dim 數組名([下界 To] 上界[，[下界 To] 上界]……) As 類型名稱

例如：Dim score(1 To 5)

該語句定義了一個一維數組，下界為1，上界為5，共5個元素。

第二種格式實際上包含了第一種格式，只要省略“下界To”，即變為第一種格式。

(2)語句說明

“數組名”與簡單變量相同，可以是任何合法的Visual Basic變量名，在同一過程中，數組名不能與變量名同名;

數組必須先定義后使用，并且每一維的元素個數必須是常數，不能是變量或表達式;

使用Dim語句定義數組時，數值數組中的全部元素初始化為0，字符串數組中的全部元素初始化為空字符串;

一般情況下，下標的下界默認為0，可以使用Option Base n(n只能為或1)改變下標的默認為1;使用LBound和UBound函數可以獲得數組的上、下界值;

如果下標值從0開始，則數組元素的個數為最大下標值加1，如果下標值從1開始，則數組元素的個數與最大下標值相等。

3.定義數組的保留字

在Visual Basic中，定義數組時可使用4個保留字，以定義不同范圍內的數組：

Dim：定義窗體模式或標準模塊數組，也可用在過程中;

ReDim：用在過程中;

Static：用在過程中;

Public：用在標準模塊中，定義全局數組。

例9.1.1 在窗體上畫1個命令按鈕，其名稱為Command1，然后編寫如下事件過程：[2006年4月 填空第7-8題]

Private Sub Command1_Click()

Dim arr (1 To 100) As Integer

For I = 1 To 100

arr(i)=Int(Rnd *1000)

Next i

Max = arr(1)

Min = arr(1)

For i= 1 To 100

If 【7】 Then

Max = arr(i)

End If

If 【8】 Then

Min =arr(i)

End If

Next i

Print "Max =";Max, "Min=";Min

End Sub

程序運行后，單擊命令按鈕，將產生100個1000以內的隨機整數，放入數組arr中，然后查找并輸出這100個數中的最大值Max和最小值Min，請填空。

解析：由條件判斷可以得知，在【7】處的意思是將最大值Max中的數與arr(i)中的數相比較，【8】處的意思是將最小值Min中的數與arr(i)中的數相比較。

答案：【7】Maxarr(i)

9.1.2 考點2：默認數組

所謂默認數組，就是數據類型為Variant(默認)的數組。在一般情況下，定義數組應指明其類型。

例如：

Static Elec(1 To 100)As Integer

該語句定義了一個數組Elec，該數組的類型為整型，它有100個元素，每個元素都是一個整數。但如果使用語句：

Static Elec(1 To 100)

則定義的數組是默認數組，沒有指定類型，則類型默認為Variant，該語句等價于：

Static Elec(1 To 100) As Variant

對于默認數組來說，同一個數組中可以存放各種不同的數據。因此，默認數組可以說是一種“混合數組”，這也就是默認數組的意義所在。

例9.1.2 閱讀下面程序并填空。

Sub Form_Click()

【1】

Defau(1)=100

Defau(2)=234.56

Defau(3)= "CSAI"

Defau(4)= "20" & Now

第11章 可視化程序設計

本章主要考查可視化程序設計，包括菜單程序設計、對話框程序設計、多重窗體程序設計、Visual Basic工程結構與執行控制等知識點。通過對歷年試卷內容的分析，本章考核內容約占6%，屬于一般考查對象，下次考試將保持上升趨勢。

11.1 菜單程序設計

For i=1 To 4

Print "Defau(";I; ")="; Defau(i)

Next i

End Sub

答案：【1】Static Defau(4)

菜單的基本作用有兩個，一是提供人機對話的界面，以便讓使用者選擇應用系統的各種功能;二是管理應用系統，控制各種功能模塊的運行。

在實際應用中，菜單可分為兩種基本類型，即下拉式菜單和彈出式菜單。

11.1.1 考點1：下拉式菜單

下拉式菜單是一種典型的窗口式菜單。在下拉式菜單系統中，一般有一個主菜單，其中包括若干選擇項，主菜單的每一項都可以“下拉”出下一級菜單供用戶選擇或輸入信息。操作完畢后菜單從屏幕上消失，并恢復原來的屏幕狀態。

1.菜單編輯器

Visual Basic中的菜單通過菜單編輯器，即菜單設計窗口建立?？梢酝ㄟ^以下4種方式進入菜單編輯器：

執行“工具”菜單中的“菜單編輯器”命令;

使用熱鍵Ctrl+E;

單擊工具欄中的“菜單編輯器”按鈕;

在要建立菜單的窗體上單擊鼠標右鍵，將彈出一個菜單，然后單擊“菜單編輯器”命令。

菜單編輯器窗口分為三個部分：即數據區、編輯區和菜單項顯示區。

(1)數據區

數據區用來輸入或修改菜單項、設置屬性。在數據區中，必須提供菜單項的“標題”和“名稱”屬性，“有效”屬性和“可見”屬性一般默認為True，只有在必要時才設置其他屬性。在設置“標題”屬性時，如果輸入一個減號(—)，則可在菜單中加入一條分隔線;如果在菜單“標題”中包含“&”，則可將該符號后的字母作為訪問鍵(通過ALT加該鍵打開該菜單)。

(2)編輯區

編輯區用來對輸入的菜單項進行簡單的編輯。

(3)菜單項顯示區

菜單項顯示區用來顯示所輸入的菜單項。菜單在數據區輸入，在編輯區進行位置調整，在菜單項顯示區顯示。

2.菜單項的控制

(1)有效性控制

菜單中的某些菜單項應能根據執行條件的不同進行動態變化，即當條件滿足時可以執行，否則不能執行。

菜單項的“有效”屬性，菜單項的有效性就是通過該屬性來控制的。實際上，只要把一個菜單項的“有效”屬性設置為False，就可以使其失效，運行后該菜單項變為灰色;為了使一個失效的菜單項變為有效，只要把它的“有效”屬性重新設置為True即可實現。

(2)菜單項標記

所謂菜單項標記，就是在菜單項前加上一個“√”。它有兩個作用：一是可以明顯地表示當前某個(或某些)命令狀態是“On”或“Off”二是可以表示當前選擇的是哪個菜單項。菜單項標記通過菜單設計窗口中的“復選”屬性設置，當該屬性為True時，相應的菜單項前有“√”標記;如果該屬性為False，則相應的菜單項前沒有“√”標記。

(3)鍵盤選擇

用鍵盤選取菜單通常有兩種方法，即熱鍵和訪問鍵(Access Key)。

3.菜單項的增減

菜單項的增減通過控件數組來實現。一個控件數組含有若干個控件，這些控件的名稱相同，所使用的事件過程相同，但其中的每個元素可以有自己的屬性?？丶到M和普通數組一樣，可通過下標(Index)訪問控件數組中的元素?？丶到M可以在設計階段建立，也可以在運行時建立。

例11.1.1 假定有一個菜單項，名為MenuItem，為了在運行時該菜單項失效(變灰)，應使用的語句是( )

A.MenuItem.Enabled= False

B.MenuItem.Enabled= True

C.MenuItem.Visible= True

D.MenuItem.Visible= False

解析：Enabled屬性設置菜單是否可用;Visible屬性設置菜單是否可見。菜單項標記通常是動態地加上或取消的，因此應在程序代碼中根據執行情況動態設置。

答案：A

重要提示：只有當某個窗體為活動窗體時，才能用上面介紹的四種方法打開菜單編輯器窗口。

11.1.2 考點2：彈出式菜單

建立彈出式菜單通常分兩步進行：首先用菜單編輯器建立菜單，然后用PopupMenu方法彈出顯示。第一步的操作與前面介紹的基本相同，惟一的區別是必須把菜單名(即主菜單項)的“可見”屬性設置為False(子菜單項不要設置為False)。PopupMenu方法用來顯示彈出式菜單，其一般格式如下：

對象.PopupMenu菜單名，Flags，X，Y，BoldCommand

說明：

當省略“對象”時，彈出式菜單只能在當前窗體中顯示。如果需要彈出式菜單在其他窗體中顯示，則必須加上窗體名;

Flags的兩組參數可以單獨使用，也可以聯合使用。當聯合使用時，每組中取一個值，二者相加;如果使用符號常量，則兩個值用Or連接;

彈出式菜單的位置由X、Y和Flags參數共同指定。

例11.1.2 在菜單編輯器中建立一個名稱為Menu( )的菜單項，將其“可見”屬性設置為False，并建立其若干子菜單，然后編寫如下過程：

Private Sub Form_MouseDown (Button As Integer ,Shift As Integer ,X As Single, Y As Single)

If Button = 1 Then

PopupMenu Menu()

End If

End Sub

則以下敘述中錯誤的是( )[2006年4月 選擇第32題]

A.該過程的作用是彈出一個菜單

B.單擊鼠標右鍵時彈出菜單

C.Menu()是在菜單編輯器中定義的彈出菜單的名稱

D.參數X、Y指明鼠標當前位置的坐標

解析：通常把PopupMenu方法放在MouseDown事件中，該事件響應所有的鼠標單擊操作，用Button參數控制左右鍵選擇。Button=1為單擊鼠標左鍵時彈出菜單，Button=2為單擊鼠標右鍵時彈出菜單。

答案：B

第九章.常用控件

認清事件觸發的對象名

列表框

List屬性——是一個字符數組，存放列表框的項。 ListIndex屬性——選中的列表項序號。

ListCount屬性——列表框中項目的數量。 Text屬性——被選中列表項的文本內容。

Selected屬性——是一個邏輯數組，表示對應的項在程序運行期間是否被選中。

第三章 VB程序設計語句

1. For循環

For <循環變量>=<初值> to <終值>[step 步長]

<循環體>

[Exit For]

Next <循環變量>

1) 多重循環

Do循環

格式一：Do While <條件> <語句塊> Loop

格式二：Do Until <條件> <語句塊> Loop

格式三：Do <語句塊> Loop While <條件>

格式四：Do <語句塊> Loop Until <條件>

2) 二重循環

1.典型案例：求100以內的素數。2.取矩陣對角線上的元素。3.打印“*”型圖。

3) 程序范例：

Const n=5,m=4

Dim a(m,n)

Private Sub Command1_Click()

K=1

For i=1 To m

For j=1 To n

a(i,j)=k

k=k+1

Next j

Next i

End Sub

Private Sub Command2_Click()

End If

Summ=0

Next j

For i=1 To m

Next i

For j=1 To n

Print summ

If i=1 Or i=m Then

End Sub

Summ=summ+a(i,j)

Else

If j=I Or j=n Then

Summ=summ+a(i,j)

End If

過程Command1_Click()的作用是二維數組a 中存放1個 m行n列的矩陣;過程Command2_Click()的作用是

A) 計算矩陣外圍一圈元素的累加和

B) 計算矩陣除外一圈以外的所有元素的累加和

C) 計算矩陣第1列和最后一列元素的累加和

D) 計算矩陣第1行和最后一行元素的累加和

VB中狀態欄(StatusBar)和工具欄(ToolBar)經典實例分析

1. 狀態欄的作用與組成

StatusBar 控件由 Panel(窗格) 對象組成，最多能被分成 16 個 Panel 對象，每一個 Panel 對象能包含文本和/或圖片?？刂苽€別窗格的外觀屬性包括 Width、Alignment(文本和圖片的)和 Bevel(斜面)。此外，能使用 Style 屬性七個值中的一個自動地顯示公共數據，諸如日期、時間和鍵盤狀態等。

2. 創建狀態欄

先在窗體上畫出一個StatusBar對象，再右擊該對象，從快捷菜單中選擇“屬性”，進入屬性頁設置窗口，進行下面的設置：

(1) 選擇窗格形狀

在屬性窗口里選擇通用標簽，在樣式列表框里選擇多窗格(缺省形式)或單窗格簡單文本形式。

(2) 添加或刪除狀態欄窗格

在屬性窗口里選擇窗格標簽，單擊插入窗格按鈕添加一個窗格，或單擊刪除窗格按鈕刪除一個窗格。

(3) 在單窗格里顯示文本

在屬性窗口里選擇通用標簽，在簡單文本框里輸入想顯示在狀態欄窗格里的文本。用代碼顯示的方式是：

StatusBar1.SimpleText = "要顯示的內容"

(4) 在多窗格里顯示文本或圖形

1). 在屬性窗口里選擇窗格標簽，用索引旁的按鈕選擇窗格序號。

2). 在文本框里輸入想顯示在狀態欄窗格里的文本。用代碼顯示的方式是：

StatusBar1.Panels(x).Text = "要顯示的內容"

3). 如果想加入圖形，單擊瀏覽按鈕打開一個圖形選擇對話框，選擇想加入的圖形，然后單擊打開按鈕。

(5) 編寫代碼

如果是一個單窗格狀態欄，當用戶單擊狀態欄時，只需用下面的事件過程來響應：

Private Sub StatusBar1_Click()

<要執行的代碼>

End Sub

如果是一個多窗格狀態欄，就需要鑒別用戶單擊的是哪一個窗格，可用下面的事件過程來識別用戶所單擊的窗格：

Private Sub StatusBar1_PanelClick(ByVal Panel As Panel)

Select Case Panel.Index

Case 1

<要執行的代碼>

Case 2

<要執行的代碼>

……

End Select

End Sub

3.創建工具欄

(1).建立工具欄

1) 在工具箱里單擊工具欄圖標，拖到窗體的任何位置，Visual Basic自動將ToolBar移到頂部。再右擊該對象，從快捷菜單中選擇“屬性”，進入屬性頁設置窗口;

2) 選擇按鈕標簽，單擊插入按鈕，Visual Basic就會在工具欄上顯示一個空按鈕，重復此步插入多個按鈕;

3) 單擊確定按鈕。如果想把按鈕分組，首先插入一個分隔的按鈕，再在對話框里將這個按鈕的樣式屬性改為3-Separator。

(2) 為工具欄增加圖畫

1). 在Visual Basic工具箱里單擊ImageList圖標，并將它拖到窗體的任何位置(位置不重要，因為它總是不可見的)，再右擊該對象，從快捷菜單中選擇“屬性”，進入屬性頁設置窗口;

2). 選擇圖象標簽，單擊插入圖片，在選定圖形對話框里選擇想使用的位圖或圖標，然后單擊打開按鈕。為每個想添加圖形的工具欄按鈕重復此步。

3). 單擊確定按鈕。

4). 進入ToolBar屬性對話框，選擇通用標簽，在圖象列表框里選擇剛才添加的ImageList控件。

5). 選擇按鈕標簽，單擊緊挨Index框的向左或向右箭頭以選擇一個按鈕序號。出現在工具欄最左邊的按鈕序號為1。

6). 在Image框里輸入一個數，輸入為1，則顯示剛才ImageList控件里的第一個圖形，輸入為2，則顯示剛才ImageList控件里的第二個圖形。

7). 為每個按鈕重復第6步， 單擊確定按鈕，現在Visual Basic就會在工具欄上顯示精美的圖形了。

(3)為工具欄添加文本信息

在ToolBar屬性對話框中選擇按鈕標簽，在標題框里輸入想顯示在按鈕上的文本。

(4)添加ToolTips

ToolTips是一種當點到工具按鈕時彈出的小標簽。ToolTips很方便，可以告訴那些新手每個按鈕是干什么用的。在ToolBar屬性對話框中選擇按鈕標簽，在工具提示文本框里輸入想作為ToolTip的文本。

(5)編寫代碼

雙擊工具欄，以下面的格式輸入代碼就可以了： Private Sub Toolbar1_ButtonClick(ByVal Button As Button)

Select Case Button.Index

Case 1

<要執行的代碼>

Case 2

<要執行的代碼>

……

End Select

End Sub VB進程條(ProgressBar)和滑塊(Slider)基礎教程

1. 進程條

作用：進程條控件用于監視操作完成的進度。

創建：在窗體上畫出進程條控件，右擊，選擇屬性，然后進行所需的外觀設置。

主要屬性：ProgressBar 控件有一個行程和一個當前位置。行程代表該操作的整個持續時間。當前位置則代表應用程序在完成該操作過程時的進度。Max 和 Min 屬性設置了行程的界限。Value 屬性則指明了在行程范圍內的當前位置。

(1) Min屬性代表進程條全空時的值，缺省時為0。

(2) Max屬性代表進程條全空時的值，缺省時為100。

(3) Value屬性代表進程條當前的值(但不出現在屬性窗口中)，它大于Min屬性，小于Max屬性。改變Value屬性的值將改變進程條的進度顯示。

示例：

Private Sub Command1_Click()

If ProgressBar1.Value < ProgressBar1.Max Then

ProgressBar1.Value = ProgressBar1.Value + 5

Else

ProgressBar1.Visible = False „當進程條滿了的時候讓進程條消失

End If

End Sub 2.滑塊

Slider 控件是包含滑塊和可選擇性刻度標記的窗口，在窗體上畫出滑塊控件，右擊，選擇屬性，然后進行下列設置：

(1)選擇滑塊的外觀

1)方向屬性決定滑塊的方位，可以是垂直的或水平的滑塊。

2)滑塊樣式屬性決定滑塊標記的樣子。

3)滑塊頻率屬性規定了沿著滑塊的標記的間隔大小，缺省的狀態是1，表明每個可能值都出現標記，如果把值設置為3，則每三個可能值出現一個標記。

(2)滑塊的主要屬性及事件

1)Min，Max屬性

Min屬性決定滑塊最左端或最頂端所代表的值。Max屬性決定滑塊最右端或最下端所代表的值。

2)LargeChange,SmallChange屬性

SmallChange決定在滑塊兩端的箭頭鈕上單擊時改變的值。LargeChange決定在滑塊上方或下方區域單擊時改變的值。

3)Value屬性

Value屬性代表當前滑塊所處位置的值，這個值由滑塊的相對位置決定。

4)Change事件

當滑塊位置發生變化時就引發了Change事件。 圖象列表(ImageList)和 圖象組合框(ImageCombo)實例講

解

1.圖象列表

ImageList 控件是包含 ListImage 對象的集合，該集合中的每個對象都可以通過其索引或關鍵字被引用。ImageList 控件不能獨立使用，只是作為一個便于向其它控件提供圖象的資料中心。

ImageList 控件的作用象圖像的儲藏室，同時，它需要第二個控件顯示所儲存的圖像。第二個控件可以是任何能顯示圖像 Picture 對象的控件，也可以是特別設計的、用于綁定 ImageList 控件的 Windows 通用控件之一。這些控件包括ListView、ToolBar、TabStrip、Header、ImageCombo、和 TreeView 控件。為了與這些控件一同使用 ImageList，必須通過一個適當的屬性將特定的 ImageList控件綁定到第二個控件。對于 ListView 控件，必須設置其 Icons 和 SmallIcons 屬性為 ImageList 控件。對于 TreeView、TabStrip、ImageCombo、和 Toolbar 控件，必須設置 ImageList 屬性為 ImageList 控件。

一旦 ImageList 與某個 Windows 通用控件相關聯，就可以在過程中用 Index 屬性或 Key 屬性的值來引用 ListImage 對象。

當與 Windows 通用控件一起使用 ImageList 控件時，在將它綁定到第二個控件之前，按照希望的順序將全部需要的圖像插入到 ImageList。一旦 ImageList 被綁定到第二個控件 ，就不能再刪除圖像了，并且也不能將圖像插入到 ListImages 集合中間。但是可以在集合的末尾添加圖像。

2.圖象組合框

ImageCombo 控件是標準 Windows 組合框的允許繪圖版本?？丶斜聿糠种械拿恳豁椂伎梢杂幸环付ǖ膱D片。它可以顯示一個包含圖片的項目列表，每一項可以有自己的圖片，也可以對多個列表項使用相同的圖片。

除了支持圖片之外， ImageCombo 還提供了一個對象和基于集合的列表控件?？丶斜聿糠值拿恳豁検且粋€不同的 ComboItem 對象，而且列表中的所有項組合起來構成 ComboItems 集合。這就使它容易一項一項地指定諸如標記文本、ToolTip文本、關鍵字值以及縮進等級等屬性。

第三篇：VB語言程序設計-在線作業_C 答案

VB語言程序設計-在線作業_C 用戶名：W310201132227最終成績：100.0 一 單項選擇題

1. 當一個工程含有多個窗體時，其中的啟動窗體是(

)。

窗體

最后一個添加的窗體 第一個添加的窗體

啟動Visual Basic時建立的窗體

本題分值： 5.0 用戶得分： 5.0 用戶解答： 在“工程屬性”對話框中指定的窗體 知識點：

2. 在窗體上面畫一個名稱為Text1的文本框，然后編寫如下的事件過程： Private Sub Text1_KeyPress(KeyAscii As Integer)

...... End Sub

若焦點位于文本框中，則能夠觸發KeyPress事件的操作是(

)。

按下鍵盤上的某個鍵 雙擊文本框 鼠標滑過文本框 單擊鼠標

本題分值： 5.0 用戶得分： 5.0

在“工程屬性”對話框中指定的用戶解答： 按下鍵盤上的某個鍵 知識點：

3. 為了裝入一個VB應用程序，應當(

)。

只裝入窗體文件(.frm) 只裝入工程文件(.vbp) 分別裝入工程文件、窗體文件和標準模塊文件 分別裝入工程文件和標準模塊文件(.bas)

本題分值： 5.0 用戶得分： 5.0 用戶解答： 只裝入工程文件(.vbp) 知識點：

4. 為了在按下Esc鍵時執行某個命令按鈕的事件過程，需要把該按鈕的哪個屬性設為True(

)。

Default Value Cancel Enabled

本題分值： 5.0 用戶得分： 5.0 用戶解答： Cancel 知識點：

5. 用菜單編輯器創建菜單時，如果要在菜單中添加一條分隔線，正確的操作是(

)。

在標題輸入框中輸入“-”(減號) 在名稱輸入框中輸入“-”(減號) 在名稱輸入框中輸入“_”(下劃線) 在標題輸入框中輸入“_”(下劃線)

本題分值： 5.0 用戶得分： 5.0 用戶解答： 在標題輸入框中輸入“-”(減號) 知識點：

6. 在顯示菜單時，菜單的哪個屬性為True時將用灰色顯示該菜單項標題(

)。

Visible Checked Caption Enabled

本題分值： 5.0 用戶得分： 5.0 用戶解答： Enabled 知識點：

7. 為了使標簽框控件覆蓋背景，應把BackStyle屬性設置為(

)。

False True 1 0

本題分值： 5.0 用戶得分： 5.0 用戶解答： 1 知識點：

8. 使文本框獲得焦點的方法是(

)。

SetFocus GotFocus LostFocus Change

本題分值： 5.0 用戶得分： 5.0 用戶解答： SetFocus 知識點：

9. 在窗體上畫兩個文本框(Name屬性分別為Text1和Text2)和一個命令按鈕(Name屬性為Command1)，然后編寫如下兩個事件過程：

Private Sub Command1_Click()

a = Text1.Text+Text2.Text Print a

End Sub

Private Sub Form_Load() Text1.Text = "" Text2.Text = ""

End Sub

程序運行后，在Text1和Text2中分別輸入123和321，然后單擊命令按鈕，則輸出結果為(

)。

444 321123 123321 132231

本題分值： 5.0 用戶得分： 5.0 用戶解答： 123321 知識點：

10. 當拖動滾動條中的滾動塊時，將觸發滾動條的事件是(

)。

Scroll SetFocus Change Move

本題分值： 5.0 用戶得分： 5.0 用戶解答： Scroll 知識點：

11. 下面不是VB的數據類型的是(

)。

Currency Object Bool Single

本題分值： 5.0 用戶得分： 5.0 用戶解答： Bool 知識點：

12. 下面的數2.65358979335278E-06寫成普通的十進制數是(

)。

0.000000265358979335278 0.0000265358979335278 0.00000265358979335278 0.000265358979335278

本題分值： 5.0 用戶得分： 5.0 用戶解答： 0.00000265358979335278 知識點：

13. 下面的數1.21576654590569E+19寫成普通的十進制數是(

)。

12157665459056900000 1215766545905690000 12157665459056900 121576654590569000

本題分值： 5.0 用戶得分： 5.0 用戶解答： 12157665459056900000 知識點：

14. 下列可作為VB的變量名的是(

)。

Abs AB∏

3*Delta PrintChar

本題分值： 5.0 用戶得分： 5.0 用戶解答： PrintChar 知識點：

15. 設a = 2，b = 3，c = 4，d = 5，下列表達式Not a <= c Or 4 * c = b ^ 2 And b <> a + c的值是(

)。

True 1 False -1

本題分值： 5.0 用戶得分： 5.0 用戶解答： False 知識點：

16. 語句Print 5 * 5 5 / 5的輸出結果是(

)。

1 25 5 0

本題分值： 5.0 用戶得分： 5.0 用戶解答： 25 知識點：

17. 表達式4 + 5 6 * 7 / 8 Mod 9的值是(

)。

5 7 6 4

本題分值： 5.0 用戶得分： 5.0 用戶解答： 5 知識點：

18. 以下語句Print 3 + 4 5 * 6 / 7 Mod 8的輸出結果是(

)。

6 4 3 5

本題分值： 5.0 用戶得分： 5.0 用戶解答： 4 知識點：

19. 語句Print Sgn(-6 ^ 2) + Int(-6 ^ 2) + Int(6 ^ 2)的輸出結果是(

)。

-1 1 -72 -36

本題分值： 5.0 用戶得分： 5.0 用戶解答： -1 知識點：

20. 以下語句的輸出結果是(

)。

a = Sqr(3)

Print Format(a, "$$####.###")

$1732 $$0001.732 $1.732 $$1.732

本題分值： 5.0 用戶得分： 5.0 用戶解答： $$1.732 知識點：

第四篇：VB指導學習

2005-7-24

VB指導學習

1、if語句的另一種寫法：

if num=10 then print num

當then后面(同一行)有執行語句時，if語句不能加end if

如有end if，則then后(同一行)不能有語句

2、兩條語句放在同一行時用“：”分割

如：print num:print num+1

3、語句分多行寫用“ _”連接，注意“空格&下劃線”

如：print num _

+1

4、除法：a/ba

C++：“/”是除法，a、b都是int，則結果是int，如果其中一個是float，則結果float“”是轉義字符。

VB：“/”是除法，有小數。“”取整(小數點后舍)

5、case語句用法：

private sub form1_click()

dim a

select case a

case 1to4,7to9,11,13<5

print a

case else

msgbox”不在范圍內”

end select

end sub

6、VB中假是”0”，真是”-1”

C++中假是“0”，真是“1”

7、private sub form_click()

for I=2to4 step-1讀完完整的一句之后，如發現問題，則跳過此句執行下一句。print I

next

print I本程序只執行此句一次

end sub

8、倒序輸出字符串

取字符函數mid(string,2,3)表示從string字符串中第二位開始，一共取三位如：mid(abcdefg,2,3)，則結果為 bcd

lift(abcd,2)=ab

right(abcd,2)=cds

例：private sub command1_click()

dim x as integer,str_len as integer

dim str as string

for x=str_len to 1 step –1

text1.text=text1.text + dim(str,x,1)

next

end sub

form1窗體里有兩個文本框和一個按鈕

9、循環for I=1to5

„„

next (I)(next后最好不要加i)

10、聲明變量：dim a,b as integer則a是變體，b是int

dim a as integer,b as integer則a,b都是int

11、webbrowser 網頁

添加部件 ms internet controls 控件

private sub form_click()

webbrowser1.navigate app.path & “a心理測試.html”app.path表示當前目錄end sub

private sub form1.resize()

wenbrowser1.height=form1.scaleheight-10“-10”可不寫

webbrower1.width=form1.scalewidth-10如不加scale，則會覆蓋一點邊

12、有退出按鈕的窗體，點擊退出時詢問，點擊窗體右上角X則不詢問，怎么辦?Private sub form_unload(canel as integer„„)

If msgbox(”是否退出?”,vbokcancel,”詢問”)=vbok=true=false

Cancel=true-?取消關閉

End if

End sub

13、”關于”窗體

添加“關于”對話框

14、使用“選項卡”省地方

添加控件“ms tabbed dialog control 6.0”

如添加控件“ms windows common control 6.0”->”tabstrip”也可以作，但不好用。

15、幫助文件 msdn是世界最大的幫助文件，CHM格式的幫助文件

html help workshop

1. 目錄 -> 節點&頁面 -> 編譯

2. new -> project -> ok -> 下一步 -> 保存路徑&名稱 -> 下一步 -> 勾中 html

files(.htm) -> 點擊Add -> 下一步 -> 完成

3. 搜索proj -> 屬性 compiler -> 勾中compiler -> ok

4. 作節點 頁面 關鍵字

project(工程) ->contents(目錄) ->index(索引) ->ok ->保存節 鑰匙增加關鍵字contents(目錄) ->是否創建 ->ok ->保存 ->點左第二個文件夾則屬性換成書圖標

16、用VB調用幫助文件

設工程屬性的“幫助文件名”后，按“f1”彈出幫助

設一個“幫助菜單”，在菜單click事件中加入sendkeys“{F1}”，模擬用戶按鍵盤還可以模擬alt + f4 , 但不可以模擬 control + alt + del (重啟),

17、MDI無子窗體時，幫助無作用，調用ADI/ATI

把目錄的成app.path ，把此文件拷貝到其它位置仍可使用

18、shell 只能調用.exe文件hh.exe是windows 自帶的幫助打開“幫助文件”的exe文件shell”hh.exe 幫助文件的路徑及文件名”

19、private sub a_click()

sendkeys”{f1}”

shell”hh.exe d:qiaosl„„.chm”,vbnormal focus

end sub

private sub form_load()

ap.help file=app.path &”„„.chm”

20、1.工程屬性設“幫助菜單名”

2.App.helpfile= „„

3.Sendkeys”{f1}”

4.shell(“hh.exe„„”)

1&2作用是：按F1出幫助，便用2好一些，3是模擬按鍵盤F1，4可完全單獨使用，3&4用在按鍵或菜單。

Api例子

下午

21、設置象素：窗體的lemode屬性1-twip->緹，pixel->象素

22、動態生成控件必須用控件組

23、缺省事件是雙擊控件時自動出現的事件

缺省屬性可省略：text1.text=”a”可寫成text1=”a”,可省略“.text”

24、cotfouse->事件

25、模式&非模式窗體：

26、參數傳遞：默認按引用傳遞，Byval是按值傳遞

subs(byval x as single,y as single) 則x按值，y按引用，VB中真為-1

27、第十章，error

語法錯誤：

運行時錯誤：一般不出錯，特定時出錯，考慮不周全，如除數為0

邏輯錯誤：不報錯，寫的不對，如循環次數不對。

錯誤處理代碼

1. 創建捕獲錯誤代碼

2. 處理此錯誤

3. 繼續執行

on error goto 1標號(數字&字母都可以)

exit sub

1:

msgbox(“除數不為0”)

text1.text=””

text1.setfouse

end sub

resume (next/line)回到出錯行，或出錯行的下一行，或指定位置

on error resume next忽略錯誤/延遲最好少用，延遲后改不了

F8是單步運行

28、對象 –> err.屬性&方法 number(錯誤編號)

29、dbpath=commondialog.filename

if dbpath=””

end

con.open

else resume

showopen

30、C++復習題：

簡單

1. 用戶接收一個數，調用一個函數，輸出該數的立方

2. 寫一個函數min(int a[])，求主程序中傳來的數組中最小值

難度適中

3. 民主投票方法選班長，候選人編號A、B、C、D每位同學只能選一人作班長，

輸入每張選票的候選人編號A~D，輸入0終止，

調用函數process()輸出每人得票數及當選人

4. 接收用戶輸入的數，直到有5個奇數，顯示此5個奇數，

調用max()函數顯示此5個奇數中最大數

高難度

5. 字符串變量A、B，B是A中的一部分，將B摳出A，再輸出

超難度

6. 賣票，車站一共15，每站上(剩下站數)個人，然后剩下每站依次下一個人，問應

設幾個座位，賣出多少張票

7. 發牌：按順序發隨機牌(使用隨機數)

第五篇：VB學習心得體會

篇一：vb學習的心得體會 vb學習的心得體會 ————劉師桐

這學期選修了vb這門學科，想從學習中對計算機有更深刻的認知，也對我大學中的2級考試奠定基礎。那么談談這學期的學習中對vb的認知和心得體會。

vb全稱為visual basic，是微軟公司推出的可視化編程工具msdn之一，是目前世界上使用最廣泛的程序開發工具。vb提供的是可視化的開發環境，我們可以象搭積木一樣構建出程序的界面，而且vb提供了豐富的控件組，省去了我們自己寫代碼實現這些效果的麻煩，這樣我們就能把更多的精力放在程序功能的實現上，所以vb學起來簡單，用起來方便。因此，我學了vb，并有了如下收獲：

1.富業余生活。業余時間到處游手好閑的身影不見了，沒事我肯定一動不動的坐在電腦面前擺弄vb。是啊，想想以前，真是一無是處，一會找人砍大山，一會找人打游戲，一會就傻傻的坐在小板登上兩眼無光，似是厭倦了紅塵?，F在生活有了寄托，是vb給了我無窮的快樂，讓我樂此不疲。

2、多了一門技術。vb是一門計算機編程語言，也算是一項知識含量較高的東西。采用的是可視化程序設計。學習的這段時間，我明白了萬事開頭難，剛剛開始，遇到些困難沒關系，慢慢來。編程是一個不斷學習，不斷積累的過程，編程的樂趣也正是存在于學習的過程中。 我們每學一點，就趕快把它用到實際的程序中去，自己多學多用多實踐，水平才能不斷提高，這就是“學以致用”。 多看多練是我獨門絕技，一般人我不告訴他：多看------別人的代碼，即使看不懂也沒關系，可以把這些代碼輸入到機子里運行，然后根據運行結果去體會程 序的思路和用途。

3、鍛煉意志。編程可不是一項輕松的活，尤其是一個人開發制作軟件時，那工作量就多了。沒有一定的坐功、細心程度及耐性那是絕對做不到的。有時，把程序做完了需要調試運行，但是就是不能達到自已設計的效果和目的，那你得戴上放大鏡找啊找啊，也許就是因為一個符號或一個字母，你就得花上個幾個小時，半天，甚至更長。越是這樣越不要灰心，應該放松心態，一點一滴的去查。只要有一顆永不退縮的心，我相信你一定能找到問題所在，最后一定能見到你開心的笑容，也一定能找到成功者的感覺。 通過這個學期的學習，對了vb這種高級語言有了初步的認知，對一些小的程序有了初步的設計方案，能根據要求設計出想要的程序，鍛煉了自己的創造性思維，是培養邏輯思維的好方法，同時我經?？赐瑢W設計好的程序代碼，包括教材上的例題程序，然后想想別人為什么這么計就能達到效果，我的設計能不能完成更多的功能，這樣優秀了自己，幫助了自己，提高了自身水平，同樣，也欣賞了別人，對別人是贊美，對自己是幫助，總而言之，這學期的vb課程讓我收獲了很多，我對下學期的計算機2級考試很有信心!!!篇二：vb學習總結也心得 學習vb兩個星期以來， (其實真正時間也不到兩個星期吧 平時有空閑就學習了下 在這里是想告訴大家 vb基本操作不難，)第一個串口調試程序通了 能夠實現更改波特率，串口號，接收數據實現字符也十六進制顯示，在發送文本框輸入數據 電機發送將在接收框內顯示 記住將rs232的2和3管腳直接接起來

下面是我測試實際過程

大家也可以和我一樣練習練習

下面是我的源代碼可以供大家參考下也希望高手指點下 (框架就沒必要給了) dim baud as string dim text2enbale, asciflag as boolean 停止顯示標志 false將不能顯示 private sub check2_click() end sub end select end sub case 300 baud = 300 case 600 baud = 600 case 1200 baud = 1200 case 2400 baud = 2400 case 4800 baud = 4800 case 9600 baud = 9600 case 19200 baud = 19200 case 38400 baud = 38400 end select else case 300 baud = 300 case 600 baud = 600 case 1200 baud = 1200 case 2400 baud = 2400 case 4800baud = 4800 case 9600 baud = 9600 case 19200 baud = 19200 case 38400 baud = 38400 end select end if end sub dim s as string dim a() as byte msgbox 串口未打開，請打開串口, 48, 警告 end if redim a(3) a(0) = &hf a(1) = &hfe a(2) = &hdd a(3) = &hcc s = text3.text a = s end if call delay(20) end sub dim idata as variant dim arr() as byte redim arr(intinputlen) 和上面一樣 if asciflag = true then for i = 0 to ubound(arr) text2.text = text2.text + chr$(arr(i)) next ielse for i = 0 to ubound(arr) text2.text = text2.text + & arr(i) next i end if end select end sub private sub option1_click() if option1.value = true then asciflag = true end if end sub private sub option2_click() if option2.value = true then asciflag = false end if end sub private sub timer1_timer() label11.caption = time end sub private sub uart_open_click() shape2.backcolor = &hff& uart_open.caption = 關閉串口 else shape2.backcolor = &he0e0e0 uart_open.caption = 打開串口 end if end sub private sub text2_clr_click() text2.text = end sub private sub text2_en_click()text2enable = not text2enbale end sub end end sub private sub form_load() show 沒有show后面的設置焦點將失敗 錯誤 text2enbale = true option2.value = true 默認顯示是以16進制顯示 text3.text = text3.setfocus end sub 至此 一個簡單的小工程就完成了，因為我是電子信息工程專業對高級編程還是很菜鳥的，其實這個功能也是我一直想能夠自己實現的，因為之前一直以為學習vb 會花好多時間，就像之前一直在學習arm一樣半天模不著頭腦。所以遲遲不敢接觸。估計也好多人和我一樣，其實學習開始了 也會發現并不是想象中那樣。 2012-7-30 青檐鈴風篇三：vb學習心得體會 vb學習心得體會

這學期選修了vb這門學科，想從學習中對計算機有更深刻的認知，也對我大學中的2級考試奠定基礎。那么談談這學期的學習中對vb的認知和心體會。

通過學習vb我基本學會了編輯一些小程序，掌握了一些基本的知識，得到了以下一些收獲： 1.富業余生活。曾經業余時間到處游手好閑的身影不見

了，以前沒事我肯定一動不動的坐在電腦面前擺弄電腦。是啊，想想以前，真是一無是處，一會找人砍大山，一會找人打游戲，一會就傻傻的坐在小板登上兩眼無光，似是厭倦了紅塵?，F在有了vb，它給了我無窮的快樂，讓我樂此不疲。

2、多了一門技術。vb是一門計算機編程語言，也算是一 項知識含量較高的東西。采用的是可視化程序設計。學習的這段時間，我明白了萬事開頭難，剛剛開始，遇到些困難沒關系，慢慢來。 我們每學一點，就趕快把它用到實際的程序中去，自己多學多用多實踐，水平才能不斷提高，這就是“學以致用”。 只有這樣我才呢學有所成

3、鍛煉意志。編程可不是一項輕松的活，尤其是一個人

開發制作軟件時，那工作量就多了。沒有一定的坐功、細心程度及耐性那是絕對做不到的。有時，把程序做完了需要調試運行，但是就是不能達到自已設計的效果和目的，那你得戴上放大鏡找啊找啊，也許就是因為一個符號或一個字母，你就得花上個幾個小時，半天，甚至更長。只要有一顆永不退縮的心，我相信你一定能找到問題所在，最后一定能見到你開心的笑容，也一定能找到成功者的感覺。

通過這個學期的學習，對了vb這種高級語言有了初

步的認知，對一些小的程序有了初步的設計方案，能根據要求設計出想要的程序，鍛煉了自己的創造性思維，是培養邏輯思維的好方法，同時我經?？赐瑢W設計好的程序代碼，然后想想別人為什么這么計就能達到效果，我的設計能不能完成更多的功能，這樣優秀了自己，幫助了自己，提高了自身水平，同樣，也欣賞了別人，對別人是贊美，對自己是幫助，總而言之，這學期的vb課程讓我收了很多。