VB學(xué)習(xí)
一．基本語句
1. 變量和常量
2. 條件語句
3. 循環(huán)語句
4. 其他語句
二．函數(shù)和過程
1． 基本函數(shù)
2． 自定義函數(shù)
3． 基本過程
4． 自定義過程
變量和常量
1.定義變量
格式： Dim 變量名 As 變量類型
說明： 常用的變量類型有： Integer 整型
Long 長整型
Single 單精度小數(shù)
Double 雙精度小數(shù)
String 字符串
Boolean 布爾型（只有真“True”或假“False”兩個值）
2．定義常量
格式： Const 常量名=值
說明：
3．定義變量數(shù)組
格式： Dim 變量名（下標）As 變量類型
說明： 即定義一組具有相同變量名和不同下標的變量。
示例： Dim a ( 9 ) As Integer
這一句定義了a (0),a (1),a (2),a (3)……a (9) 共10個變量。
注意：下標必須是一個大于0的整數(shù)且下標不能為變量。
基本過程
1． 關(guān)于VB標準過程
基本格式： Sub 對象名_動作名（參數(shù)1，參數(shù)2，……，參數(shù)n）
一段程序
End Sub
說明： 對象名即被操作的對象的名字。動作名即操作的類型。
示例： 假設(shè)我創(chuàng)建了一個文本框?qū)ο?，名字叫做Text1。我希望在單擊它時執(zhí)行一段程序。那么只要輸入：
Sub Text1_Click () ‘這里的Click代表單擊
一段程序
End Sub
當(dāng)然，我也可以直接在程序中用鼠標選擇它。
2． 關(guān)于動作名
由于各個控件的可執(zhí)行動作各不相同，所以在這里我只列出常用的。
（1） Click（）單擊對象時執(zhí)行，無參數(shù)。
（2） DblClick() 雙擊對象時執(zhí)行，無參數(shù)。
（3） KeyDown(KeyCode As Integer, Shift As Integer) 按下某個鍵時執(zhí)行，其中變量KeyCode代表所按下的按鍵的號碼，變量Shift代表是否按下Shift鍵，如果是則Shift=1，否則Shift=0。
（4） KeyPress(KeyAscii As Integer)按下并松開某個鍵時執(zhí)行，變量KeyAscii代表按鍵號碼。
（5） KeyUp(KeyCode As Integer, Shift As Integer) 松開某個鍵時執(zhí)行，其中變量KeyCode代表所按下的按鍵的號碼，變量Shift代表是否按下Shift鍵，如果是則Shift=1，否則Shift=0。
（6） MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)按下鼠標按鍵時執(zhí)行，其中Button是指按下鼠標的哪個鍵（1是左鍵，2是右鍵，4是滾輪），Shift代表是否按下Shift鍵，如果是則Shift=1，否則Shift=0，X代表鼠標在對象上的橫坐標位置，Y代表鼠標在對象上的縱坐標位置。
（7） MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)松開鼠標按鍵時執(zhí)行，其中各參數(shù)的意義同上。
（8） MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)鼠標移動時執(zhí)行，其中各參數(shù)的意義同上。
（9） Load() 當(dāng)打開窗體時執(zhí)行，無參數(shù)。
（10） Unload(Cancel As Integer)當(dāng)關(guān)閉窗體時執(zhí)行，參數(shù)Cancel代表是否關(guān)閉窗體，當(dāng)Cancel=1時不關(guān)閉。
（11） Resize()當(dāng)對象大小改變時執(zhí)行。
（12） Change()當(dāng)顯示內(nèi)容改變時執(zhí)行。
（13） Timer()定時執(zhí)行。
基本函數(shù)
一． 數(shù)值型函數(shù)
1． Abs（表達式）返回表達式的絕對值
2． Atn(表達式) 返回表達式的反正切值
3． CDbl（表達式）將表達式轉(zhuǎn)化為雙精度小數(shù)
4． CInt（表達式）將表達式轉(zhuǎn)化為整型（即四舍五入）
5． CLng（表達式）將表達式轉(zhuǎn)化為長整型（即四舍五入）
6． Cos（表達式）返回表達式的余弦值
7． CSng（表達式）將表達式轉(zhuǎn)化為單精度小數(shù)
8． Exp（表達式）返回e的平方
9． Int（表達式）返回表達式的整數(shù)部分
10． Log（表達式）返回表達式的自然對數(shù)值
11． Randomize（n）初始化第n組隨機數(shù)
12． Rnd（n）返回0到1之間的一個隨機數(shù)
13． Sin（表達式）返回表達式的正弦值
14． Sqr（表達式）返回表達式的平方根
15． Tan（表達式）返回表達式的正切值
16． Val（字符串）返回字符串中包含的數(shù)值
17． Asc（字符串）返回字符串中第1個字符的ASCII碼
二． 字符串型函數(shù)
1． Chr（n）返回第n個ASCII字符（n在0到255之間）
2． CStr（表達式）將表達式轉(zhuǎn)化為字符串型
3． LCase（字符串）將字符串轉(zhuǎn)化為小寫
4． Left（字符串，n）返回字符串中從左邊起第n個字符
5． Len（變量）返回變量大小
三． 系統(tǒng)函數(shù)
1． Beep使揚聲器發(fā)出一個聲音
2． ChDir（路徑）修改指定驅(qū)動器上的當(dāng)前目錄
3． ChDrive（驅(qū)動器名）改變當(dāng)前驅(qū)動器
4． CurDir（驅(qū)動器名）返回當(dāng)前路徑
5． Dir（路徑，？）
6． EOF（文件序號）返回一個值是否到達文件結(jié)束
7． Err（）返回發(fā)生錯誤的錯誤號
8． Error（錯誤號）返回指定錯誤號的錯誤信息
9． FileCopy（源文件，目標文件）復(fù)制文件
10． FileDateTime（文件路徑）返回文件的時間和日期
11． FileLen（文件路徑）返回文件大小（以字節(jié)為單位）
12． FreeFile（）返回open語句可使用的下一個文件序號
13． GetAttr（文件路徑）返回一個文件的屬性，目錄和文件夾
14． Kill（文件路徑）刪除指定文件
四． 布爾函數(shù)
1． CBool（表達式）將表達式轉(zhuǎn)化為布爾型
2． IsArray（變量名）判斷變量是否數(shù)組
3． IsEmpty（變量名）判斷變量是否已被賦值
4． IsError（表達式）判斷表達式是否有錯
5． IsNumeric（字符串）判斷字符串是否數(shù)據(jù)
其他語句
1． 中途跳出
格式：Exit Sub
說明：用于中途跳出一段程序。
2． 結(jié)束程序
格式：End
說明：中斷整個程序的運行。
3． 顯示窗體
格式：窗體名.show
說明：顯示一個窗體。
4． 加載窗體
格式：Load 窗體名
說明：將窗體加載到內(nèi)存中。
5． 關(guān)閉窗體
格式：Unload 窗體名
說明：將窗體從內(nèi)存中釋放。
6． 隱藏窗體
格式：窗體名.Hide
說明：把窗體隱藏起來（但還占用內(nèi)存）。
7． 彈出對話框
格式：MsgBox(內(nèi)容，按鍵，標題，幫助文件路徑，……)
說明：除內(nèi)容必須輸入外其他的參數(shù)均為可選。
條件語句
1．格式：If 條件1 Then 語句1
說明：如果 條件1 成立則執(zhí)行語句1，否則執(zhí)行下一句。
2．格式：If 條件1 Then 語句1 Else 語句2
說明：如果 條件1 成立則執(zhí)行語句1，否則執(zhí)行語句2。
3．格式：If 條件1 Then
語句組1
End If
說明：如果 條件1 成立則執(zhí)行語句組1，否則跳過這一句組。
4．格式：If 條件1 Then
語句組1
Else
語句組2
End If
說明：如果 條件1 成立則執(zhí)行語句組1，否則執(zhí)行語句組2
5．格式：If 條件1 Then
語句組1
Else If 條件2 Then
語句組2
Else If 條件3 Then
語句組3
……
Else If 條件n Then
語句組n
Else
語句組n+1
End If
說明：如果條件1成立則執(zhí)行語句組1，如果條件1不成立但條件2成立則執(zhí)行語句組2，如果條件1和條件2都不成立但條件3成立則執(zhí)行語句組3……如果條件n之前的條件都不成立但條件n成立則執(zhí)行語句組n，如果所有條件都不成立則執(zhí)行語句組n+1。
6．格式：Select Case 變量1
Case 表達式1
語句組1
Case 表達式2
語句組2
……
Case 表達式n
語句組n
Case Else
語句組n+1
End Select
說明：如果變量1等于表達式1則執(zhí)行語句組1，如果變量2等于表達式2則執(zhí)行語句組2，……，如果變量n等于表達式n則執(zhí)行語句組n，如果變量1不等于任何一個表達式則執(zhí)行語句組n+1。
循環(huán)語句
1． 定量循環(huán)
格式：For 變量a=起始值 To 結(jié)束值 Step 差量
語句組
Next 變量a
說明：反復(fù)執(zhí)行語句組，直到變量a的值由起始值變?yōu)榻K值。其中每執(zhí)行一次語句組變量a都增加一個差量。
示例：Dim a As Integer
Dim i As Integer
a=0
For i=1 To 5 Step 1
a=a + i
Next i
這段程序的執(zhí)行過程是：a=0 , i=1 , a=a+i=0+1=1 , i=i+差量=1+1=2 , a=a+i=1+2=3 , i=i+差量=2+1=3 , a=a+i=3+3=6 , i=i+差量=3+1=4 , a=a+i=6+4=10, i=i+差量=4+1=5 , a=a+i=10+5=15.最后a=15。
2． 條件循環(huán)
（1） 格式：Do
語句組
Loop Until 條件
說明：執(zhí)行語句組直到條件成立為止。
（2） 格式：Do Until 條件
語句組
Loop
說明：執(zhí)行語句組直到條件成立為止。（與前一種格式的不同之處在于前一種格式中，語句至少要被執(zhí)行一次。而這一種格式中，如果一開始條件成立，則語句組一次都不執(zhí)行。）
（3） 格式：Do
語句組
Loop While 條件
說明：執(zhí)行語句組直到條件不成立為止。
（4） 格式：Do while 條件
語句組
Loop
說明：執(zhí)行語句組直到條件不成立為止。（與前一種格式的不同之處在于前一種格式中，語句至少要被執(zhí)行一次。而這一種格式中，如果一開始條件不成立，則語句組一次都不執(zhí)行。）
自定義過程
定義過程：
Sub 過程名（參數(shù)1 As 變量類型，參數(shù)2 As 變量類型，……，參數(shù)n As 變量類型）
程序內(nèi)容
End Sub
說明：
輸入“過程名（參數(shù)1，參數(shù)2 ，……，參數(shù)n ）”時即可運行程序內(nèi)容。
自定義函數(shù)
1． 格式：
Function 函數(shù)名(變量1 As 變量類型，變量2 As 變量類型，……，變量n As 變量類型) As 變量類型
語句組
End Function
2． 說明：
定義一個自定義函數(shù)，調(diào)用方法為： 函數(shù)名（參數(shù)1，參數(shù)2，……，參數(shù)n）
3． 示例：
Function 是否偶數(shù)( a As Integer ) As Boolean ‘定義一個叫做是否偶數(shù)的布爾型函數(shù),這個函數(shù)有一個整型參數(shù)a
Dim b As Single ‘定義一個整型變量b
B = Cint(a /2) ‘B等于a除以2后進行四舍五入得到的值
If b = a / 2 Then
是否函數(shù)=True
Else
是否偶數(shù)=False
End If ‘如果b等于a除以2那么函數(shù)值為真，否則函數(shù)值為假
End Function ‘結(jié)束函數(shù)過程
在程序中輸入以上代碼后，我們要判斷變量x是否偶數(shù)，并有一個布爾變量y，我們只要輸入：y=是否偶數(shù)(x)
如果x是偶數(shù)，則y的值為真；否則為假。
