【正文】 ll_password () Dim x1 as integer Dim y1 as integer x1=12 y1=100 Call password(x1,y1) ‘調(diào)用過程方式： 過程名(參數(shù)1, 參數(shù)2…)。2. 過程名 參數(shù)1, 參數(shù)2… x1,y1 ‘結(jié)果是1112，y1按地址傳遞改變了值，而x1按值傳遞，未改變原值End sub二．Function函數(shù)函數(shù)實際是實現(xiàn)一種映射，它通過一定的映射規(guī)則，完成運(yùn)算并返回結(jié)果。參數(shù)傳遞也兩種：按值傳遞(ByVal)和按地址傳遞(ByRef)。如下例：Function password(ByVal x as integer, byref y as integer) as boolean If y=100 then y=x+y else y=xy x=x+100 if y=150 then password=true else password=falseEnd FunctionSub call_password () Dim x1 as integer Dim y1 as integer x1=12 y1=100 if password then‘調(diào)用函數(shù)：1. 作為一個表達(dá)式放在=右端 。 2. 作為參數(shù)使用 x1 end ifEnd sub三．Property屬性過程和Event事件過程這是VB在對象功能上添加的兩個過程，與對象特征密切相關(guān)，也是VBA比較重要組成，技術(shù)比較復(fù)雜，可以參考相關(guān)書籍。第十二節(jié)內(nèi)部函數(shù)在VBA程序語言中有許多內(nèi)置函數(shù)，可以幫助程序代碼設(shè)計和減少代碼的編寫工作。一．測試函數(shù)IsNumeric(x) ‘是否為數(shù)字, 返回Boolean結(jié)果，True or False IsDate(x) ‘是否是日期, 返回Boolean結(jié)果，True or FalseIsEmpty（x） ‘是否為Empty, 返回Boolean結(jié)果，True or FalseIsArray(x) ‘指出變量是否為一個數(shù)組。IsError(expression) ‘指出表達(dá)式是否為一個錯誤值IsNull(expression) ‘指出表達(dá)式是否不包含任何有效數(shù)據(jù) (Null)。IsObject(identifier) ‘指出標(biāo)識符是否表示對象變量二．?dāng)?shù)學(xué)函數(shù)Sin(X)、Cos(X)、Tan(X)、Atan(x) 三角函數(shù)，單位為弧度Log(x) 返回x的自然對數(shù)Exp(x)返回Abs(x) 返回絕對值Int(number)、Fix(number) 都返回參數(shù)的整數(shù)部分，區(qū)別：Int 將 轉(zhuǎn)換成 9，而 Fix 轉(zhuǎn)換成 8Sgn(number) 返回一個 Variant (Integer)，指出參數(shù)的正負(fù)號Sqr(number) 返回一個 Double，指定參數(shù)的平方根VarType(varname) 返回一個 Integer，指出變量的子類型Rnd（x）返回01之間的單精度數(shù)據(jù)，x為隨機(jī)種子三．字符串函數(shù)Trim(string) 去掉string左右兩端空白Ltrim(string) 去掉string左端空白Rtrim(string) 去掉string右端空白Len(string) 計算string長度Left(string, x) 取string左段x個字符組成的字符串Right(string, x) 取string右段x個字符組成的字符串Mid(string, start,x) 取string從start位開始的x個字符組成的字符串Ucase(string) 轉(zhuǎn)換為大寫Lcase(string) 轉(zhuǎn)換為小寫Space(x) 返回x個空白的字符串Asc(string) 返回一個 integer，代表字符串中首字母的字符代碼Chr(charcode) 返回 string,其中包含有與指定的字符代碼相關(guān)的字符四．轉(zhuǎn)換函數(shù)CBool(expression) 轉(zhuǎn)換為Boolean型CByte(expression) 轉(zhuǎn)換為Byte型CCur(expression) 轉(zhuǎn)換為Currency型CDate(expression) 轉(zhuǎn)換為Date型CDbl(expression) 轉(zhuǎn)換為Double型CDec(expression) 轉(zhuǎn)換為Decemal型CInt(expression) 轉(zhuǎn)換為Integer型CLng(expression) 轉(zhuǎn)換為Long型CSng(expression) 轉(zhuǎn)換為Single型CStr(expression) 轉(zhuǎn)換為String型CVar(expression) 轉(zhuǎn)換為Variant型Val(string) 轉(zhuǎn)換為數(shù)據(jù)型Str(number) 轉(zhuǎn)換為String五．時間函數(shù)Now 返回一個 Variant (Date)，根據(jù)計算機(jī)系統(tǒng)設(shè)置的日期和時間來指定日期和時間。Date 返回包含系統(tǒng)日期的 Variant (Date)。Time 返回一個指明當(dāng)前系統(tǒng)時間的 Variant (Date)。Timer 返回一個 Single，代表從午夜開始到現(xiàn)在經(jīng)過的秒數(shù)。TimeSerial(hour, minute, second) 返回一個 Variant (Date)，包含具有具體時、分、秒的時間。DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]]) 返回 Variant(Long) 的值，表示兩個指定日期間的時間間隔數(shù)目Second(time) 返回一個 Variant (Integer)，其值為 0 到 59 之間的整數(shù)，表示一分鐘之中的某個秒Minute(time) 返回一個 Variant (Integer)，其值為 0 到 59 之間的整數(shù)，表示一小時中的某分鐘Hour(time) 返回一個 Variant(Integer)，其值為 0 到 23 之間的整數(shù)，表示一天之中的某一鐘點Day(date) 返回一個 Variant(Integer)，其值為 1 到 31 之間的整數(shù)，表示一個月中的某一日Month(date) 返回一個 Variant(Integer)，其值為 1 到 12 之間的整數(shù)，表示一年中的某月Year(date) 返回 Variant (Integer)，包含表示年份的整數(shù)。Weekday(date, [firstdayofweek]) 返回一個 Variant (Integer)，包含一個整數(shù)，代表某個日期是星期幾第十三節(jié) 文件操作文件Dir[(pathname[,attributes])] ；pathname 可選參數(shù)，用來指定文件名的字符串表達(dá)式，可能包含目錄或文件夾、以及驅(qū)動器。如果沒有找到 pathname，則會返回零長度字符串 ()。attributes 可選參數(shù)。常數(shù)或數(shù)值表達(dá)式，其總和用來指定文件屬性。如果省略，則會返回匹配 pathname 但不包含屬性的文件。刪除Kill pathname 從磁盤中刪除文件, pathname 參數(shù)是用來指定一個文件名RmDir pathname 從磁盤中刪除目錄，pathname 參數(shù)是用來指定一個文件夾打開Open pathname For mode [Access access] [lock] As []filenumber [Len=reclength] 能夠?qū)ξ募斎?輸出 (I/O)。pathname 必要。字符串表達(dá)式，指定文件名，該文件名可能還包括目錄、文件夾及驅(qū)動器。mode 必要。關(guān)鍵字，指定文件方式，有 Append、Binary、Input、Output、或 Random 方式。如果未指定方式，則以 Random 訪問方式打開文件。access 可選。關(guān)鍵字，說明打開的文件可以進(jìn)行的操作，有 Read、Write、或 ReadWrite 操作。lock 可選。關(guān)鍵字，說明限定于其它進(jìn)程打開的文件的操作，有 Shared、LockRead、LockWrite、和 Lock Read Write 操作。filenumber 必要。一個有效的文件號，范圍在 1 到 511 之間。使用 FreeFile 函數(shù)可得到下一個可用的文件號。 reclength 可選。小于或等于 32，767（字節(jié)）的一個數(shù)。對于用隨機(jī)訪問方式打開的文件，該值就是記錄長度。對于順序文件，該值就是緩沖字符數(shù)。說明 對文件做任何 I/O 操作之前都必須先打開文件。Open 語句分配一個緩沖區(qū)供文件進(jìn)行I/O 之用，并決定緩沖區(qū)所使用的訪問方式。如果 pathname 指定的文件不存在，那么，在用Append、Binary、Output、或 Random 方式打開文件時，可以建立這一文件。如果文件已由其它進(jìn)程打開，而且不允許指定的訪問類型，則 Open 操作失敗，而且會有錯誤發(fā)生。如果 mode是 Binary 方式，則 Len 子句會被忽略掉。重要 在 Binary、Input 和 Random 方式下可以用不同的文件號打開同一文件，而不必先將該文件關(guān)閉。在 Append 和 Output 方式下，如果要用不同的文件號打開同一文件，則必須在打開文件之前先關(guān)閉該文件。讀入Input filenumber, varlist 從已打開的順序文件中讀出數(shù)據(jù)并將數(shù)據(jù)指定給變量Get []filenumber, [reumber], varname將一個已打開的磁盤文件讀入一個變量之中。寫入Write filenumber, [outputlist] 將數(shù)據(jù)寫入順序文件Print filenumber, [outputlist] 將格式化顯示的數(shù)據(jù)寫入順序文件中Put []filenumber, [reumber], varname 將一個變量的數(shù)據(jù)寫入磁盤文件中。關(guān)閉Close [filenumberlist] 關(guān)閉 Open 語句所打開的輸入/輸出 (I/O) 文件注意