|
VB學習
一．基本語句 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． 關于VB標準過程 基本格式： Sub 對象名_動作名（參數(shù)1，參數(shù)2，……，參數(shù)n） 一段程序 End Sub 說明： 對象名即被操作的對象的名字。動作名即操作的類型。 示例： 假設我創(chuàng)建了一個文本框?qū)ο?，名字叫做Text1。我希望在單擊它時執(zhí)行一段程序。那么只要輸入： Sub Text1_Click () ‘這里的Click代表單擊 一段程序 End Sub 當然，我也可以直接在程序中用鼠標選擇它。 2． 關于動作名 由于各個控件的可執(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() 當打開窗體時執(zhí)行，無參數(shù)。 （10） Unload(Cancel As Integer)當關閉窗體時執(zhí)行，參數(shù)Cancel代表是否關閉窗體，當Cancel=1時不關閉。 （11） Resize()當對象大小改變時執(zhí)行。 （12） Change()當顯示內(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ū)動器上的當前目錄 3． ChDrive（驅(qū)動器名）改變當前驅(qū)動器 4． CurDir（驅(qū)動器名）返回當前路徑 5． Dir（路徑，？） 6． EOF（文件序號）返回一個值是否到達文件結(jié)束 7． Err（）返回發(fā)生錯誤的錯誤號 8． Error（錯誤號）返回指定錯誤號的錯誤信息 9． FileCopy（源文件，目標文件）復制文件 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． 關閉窗體 格式：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 說明：反復執(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的值為真；否則為假。 |
|
|
