【文章內(nèi)容簡介】 個(gè)字符 a? a1,ab,… 可匹配單個(gè)數(shù)字 123 1234,1238,… [list] 可匹配列表中的單個(gè)字符 [ae] a,b,c,d,e [!list] 可匹配列表以外的單個(gè)字符 [!ae] G,h,f,… 運(yùn)算符和表達(dá)式 3. 連接運(yùn)算符和表達(dá)式 連接運(yùn)算符是用來合并字符串的運(yùn)算符，包括 amp。和 +。連接表達(dá)式是用連接運(yùn)算符將兩個(gè)運(yùn)算數(shù)連接起來。 例如，以下都是連接表達(dá)式： Hello amp。 World 結(jié)果為 Hello World 2 amp。 4 結(jié)果為 24 2 +4 結(jié)果為 24 2 amp。 4 結(jié)果為 24 2 +4 結(jié)果為 6 說明：“ amp?！边\(yùn)算符與運(yùn)算數(shù)之間應(yīng)加一個(gè)空格。“ amp。”運(yùn)算符會(huì)自動(dòng)將非字符串類型的數(shù)據(jù)轉(zhuǎn)換成字符串后再進(jìn)行連接，而“ +”運(yùn)算符則不行 。 運(yùn)算符和表達(dá)式 4. 邏輯運(yùn)算符和表達(dá)式 邏輯表達(dá)式是用邏輯運(yùn)算符將邏輯變量連接起來。 邏輯運(yùn)算符包括 And（與）、 Or（或）、 Not（非）、Eqv（等價(jià)）、 Imp（包含）和 Xor（異或）。如表 a和 b進(jìn)行邏輯運(yùn)算的結(jié)果。 a b Not a （非） a And b （與） a Or b （或） a Eqv b （等價(jià)） a Imp b （包含） a Xor b （異或） False False True False False True True False False True True False True False True True True False False False True False False True True True False True True True True False 各種運(yùn)算的優(yōu)先順序 當(dāng)在表達(dá)式中運(yùn)算符不止一種時(shí)，系統(tǒng)會(huì)按預(yù)先確定的順序進(jìn)行計(jì)算，這個(gè)順序稱為運(yùn)算符的優(yōu)先順序。 各種運(yùn)算符的優(yōu)先順序有以下原則： （ 1）表達(dá)式的括號最優(yōu)先，相同優(yōu)先級的運(yùn)算按從左到右順序進(jìn)行； （ 2）各種類型運(yùn)算符的優(yōu)先順序（從高到低）如下： 算術(shù)運(yùn)算符 → 字符串連接運(yùn)算符 （ amp。） → 關(guān)系運(yùn)算符 → 邏輯運(yùn)算符 （ 3）同一類運(yùn)算符的優(yōu)先順序也不同 算術(shù)運(yùn)算符的優(yōu)先順序（從高到低）如下： ^ → －（負(fù)號） → *、 / → \（整數(shù)除法） → Mod → +、 – 各種運(yùn)算的優(yōu)先順序 【 例 21】 判別某年是否是閏年，閏年的條件符合下面二者之一： (1)能被 4整除，但不能被 100整除。 (2)能被 4整除又能被 400整除。 要求：單擊按鈕 Command1計(jì)算出 2022年是否是閏年，并在窗體的標(biāo)簽 Lable2中顯示結(jié)果。 各種運(yùn)算的優(yōu)先順序 界面設(shè)計(jì)： 窗體界面中放置了兩個(gè)標(biāo)簽 Lable1和 Lable2， 以及一個(gè)按鈕 Command1。分別設(shè)置其 Caption屬性 屬性 Form1 Lable1 Lable2 Command1 Caption 判斷閏年 2022年是否是閏年？ 空 判斷 單擊 Command1時(shí)判斷 2022年是否是閏年，程序代碼如下： Private Sub Command1_Click() 39。單擊按鈕計(jì)算閏年 Dim x As Integer Dim y As Boolean x = 2022 y = (((x Mod 4) = 0) And ((x Mod 100) 0)) Or (((x Mod 4) = 0) And ((x Mod 400) = 0)) = y End Sub 算術(shù)函數(shù) 算術(shù)函數(shù)是系統(tǒng)給用戶提供進(jìn)行算術(shù)運(yùn)算的函數(shù)。 算術(shù)函數(shù)有幾點(diǎn)說明： （ 1）函數(shù)具有返回值，應(yīng)注意函數(shù)返回值的數(shù)據(jù)類型。 （ 2）三角函數(shù)的運(yùn)算都使用弧度。 （ 3） Fix(x)和 Int(x)函數(shù)都是對數(shù)值型變量取整，但對于正數(shù)和負(fù)數(shù)結(jié)果不同。 Fix()=10 Int()=10 Fix()=10 Int()=11 （ 4）用 Rnd(x)函數(shù)用于產(chǎn)生隨機(jī)數(shù)，當(dāng) x=0時(shí)產(chǎn)生與前一次相同的隨機(jī)數(shù)。如果不斷地重復(fù) Rnd函數(shù)，會(huì)反復(fù)出現(xiàn)同一序列的隨機(jī)數(shù)，可以用 Randomize語句消除這種情況。 語法： Randomize[(x)] 算術(shù)函數(shù) 【 例 22】 根據(jù)直角三角形的兩條直角邊，計(jì)算其斜邊的長度。計(jì)算斜邊根據(jù)公式： 界面設(shè)計(jì)： 在窗體上放置三個(gè)文本框（ Text TextText3）、三個(gè)標(biāo)簽 （ Label Label Label3） 和一個(gè)按鈕Command1， Text1和 Text2用來輸入兩條直角邊的長度，計(jì)算的斜邊顯示在文本框 Text3中，單擊按鈕 Command1計(jì)算斜邊 對象 控件名 屬性名 屬性值 Form Form1 Caption 計(jì)算三角形斜邊 Label Label1 Caption a= Label2 Caption b= Label3 Caption c= Text Text1 Text 空 Text2 Text 空 Text3 Text 空 Command Command1 Caption 計(jì)算 每年字符函數(shù) 界面設(shè)計(jì)： 界面包含 5個(gè)標(biāo)簽（ Label1～ Label5），四個(gè)文本框（ Text1～ Text4）和一個(gè)按鈕 （ Command1），四個(gè)文本框分別用于輸入字符串和從第幾個(gè)位置開始取幾個(gè)字符，單擊按鈕 Command1進(jìn)行取字符運(yùn)算。 字符函數(shù) 程序代碼如下： Private Sub Command1_Click() 39。單擊按鈕取字符 Dim s1 As String, s2 As String Dim a As Integer, b As Integer s1 = 39。輸入字符串 a = Val() 39。輸入起始個(gè)數(shù) b = Val() 39。輸入字符個(gè)數(shù) s2 = Mid(s1, a, b) 39。取字符 = s2 End Sub 程序分析： 使用 Mid函數(shù)取字符串的任意位置字符。 日期與時(shí)間函數(shù) 函數(shù)名 返回類型 功能 例子 運(yùn)算結(jié)果 Day(日期 ) Integer 返回日期 ， 1～ 31的整數(shù) Day(2022/3/15) 15 Month(日期 ) Integer 返回月份 ， 1～ 12 的整數(shù) Month(2022/3/15 ) 3 Year(日期 ) Integer 返回年份 Year(2022/3/15 ) 2022 Weekday(日期 ) Integer 返回星期幾 Weekday(2022/3/15) 2 Time Date 返回當(dāng)前系統(tǒng)時(shí)間 Time 系統(tǒng)當(dāng)前時(shí)間 Date Date 返回系統(tǒng)日期 Date 系統(tǒng)當(dāng)前日期 Now Date 返回系統(tǒng)日期和時(shí)間 Now 系統(tǒng)當(dāng)前日期與時(shí)間 Hour(時(shí)間 ) Integer 返回鐘點(diǎn) ， 0 ～ 23的整數(shù) Hour(4:35:17 PM ) 16 Minute(時(shí)間 ) Integer 返回分鐘 ， 0～ 59的整數(shù) Minute(4:35:17 PM) 35 Second(時(shí)間 ) Integer 返回秒鐘 ， 0 ～ 59的整數(shù) Second(4:35:17 PM) 17 日期時(shí)間函數(shù)提供日期和時(shí)間有關(guān)的函數(shù)。 日期與時(shí)間函數(shù) 【 例 24】 使用日期和時(shí)間函數(shù)在窗體上顯示系統(tǒng)當(dāng)前的日期和時(shí)間。 界面設(shè)計(jì)： 界面包含 5個(gè)（ Label1～ Label5）標(biāo)簽，四個(gè)文本框（ Text1～ Text4）和一個(gè)按鈕（ Command1），四個(gè)文本框分別用于顯示年份、月份、日期和時(shí)間，單擊按鈕 Command1在四個(gè)文本框中顯示時(shí)間。 程序代碼如下： Private Sub Command1_Click() 39。單擊按鈕顯示時(shí)間 = Year(Date) 39。顯示年份 = Month(Date) 39。顯示月份 = Day(Date) 39。顯示日期 39。顯示時(shí)間 = Hour(Now) amp。 : amp。 Minute(Now) amp。 : amp。 Second(Now) End Sub 類型轉(zhuǎn)換函數(shù)和判斷函數(shù) 1. 類型轉(zhuǎn)換函數(shù) 轉(zhuǎn)換函數(shù)是用來將數(shù)據(jù)強(qiáng)制轉(zhuǎn)換成某種特定的數(shù)據(jù)類 型，如表所示為轉(zhuǎn)換函數(shù)的功能、例子以及轉(zhuǎn)換結(jié)果。 轉(zhuǎn)換函數(shù) 轉(zhuǎn)換結(jié)果類型 例子 轉(zhuǎn)換結(jié)果 CBool(x) Boolean CBool(0) False CByte(x) Byte CByte() 126 CCur(x) Currency CCur() CDate(x) Date cdate(5) 190014 CDbl(x) Double CDbl() CInt(x) Integer CInt() 123 CLng(x) Long CLng() 25427 CSng(x) Single CSng() CStr(x) String CStr() CVar(x) Variant CVar(4534amp。 000) 4534000 CVErr(x) Error CVErr(2022) 自定義錯(cuò)誤碼 Str(x) Variant String Str(459) 459 類型轉(zhuǎn)換函數(shù)和判斷函數(shù) 2. 判斷函數(shù) VB還提供了一些判斷函數(shù)用來判斷數(shù)據(jù)的類型，如表所示 為判斷函數(shù)的功能、例子以及轉(zhuǎn)換結(jié)果。 轉(zhuǎn)換函數(shù) 轉(zhuǎn)換結(jié)果類型 功能 例子 轉(zhuǎn)換結(jié)果 TypeName String 返回變量的類型 TypeName(2) Integer IsNumeric(x) Boolean 判斷是否是數(shù)值型 IsNumberic(123.4) True IsDate Boolean 判斷是否是日期型 isdate(5) False IsObject Boolean 判斷是否是對象 IsObject(5) False IsNull Boolean 判斷是否是不包含任何有效數(shù)據(jù) IsNull(5) False IsEmpty Boolean 判斷變量是否已被初始化 IsEmpty(a) 是否被初始化 2 . InputBox函數(shù) InputBox函數(shù)用于接受用戶鍵盤輸入的數(shù)據(jù)，也稱為輸入框。 語法： 變量 =InputBox(對話框字符串 [,標(biāo)題 ] [,文本框字符串 ] [,橫坐標(biāo)值 ] [,縱坐標(biāo)值 ] [,幫助文件 , 幫助主題號 ]) 說明： 對話框字符串：在輸入對話框中顯示的字符串，最大長度是1024個(gè)字符。 標(biāo)題：指對話框標(biāo)題欄的字符串，如果省略，則標(biāo)題欄中為當(dāng)前工程名。 文本框字符串：指文本框中顯示的字符串，如果省略則文本框?yàn)榭铡? 橫、縱坐標(biāo)值：指對話框在屏幕上的位置，橫、縱坐標(biāo)值為輸入框左上角的坐標(biāo)。 2 . InputBox函數(shù) 程序分析： InputBox函數(shù)出現(xiàn)的對話框中自動(dòng)生成一個(gè)文本框和“確定”、“取消”兩個(gè)按鈕。 對話框中顯示“請輸入學(xué)號”，標(biāo)題為“輸入學(xué)號”，文本框中顯示的默認(rèn)值為“ 2022022123”。 對話框等待用戶在文本框輸入內(nèi)容，可以在文本框中輸入也可以使用默認(rèn)值。 InputBox函數(shù)返回值給變量 Number，如果用戶單擊“確定”按鈕或按“ ENTER”鍵。 例如，使用 InputBox函數(shù)輸入學(xué)號，所顯示的輸入框 Number = InputBox(請輸入學(xué)號 , 輸入學(xué)號 , 2022022123) MsgBox函數(shù) MsgBox函數(shù)用于向用戶發(fā)布提示信息，要求用戶做出必要的響應(yīng)，也稱為消息框。 語法： 變量 =MsgBox(消息文本 [,顯示按鈕和圖標(biāo) ] [,標(biāo)題 ] [,幫助文件 , 幫助主題號 ]) 說明： 消息文本：在對話框中作為消息顯示的字符串，用于提示信息。如果消息的內(nèi)容超過一行時(shí)，可以在每行之間插入回車符 Chr(13)或換行符 Chr(10)進(jìn)行換行。 標(biāo)題：在對話框標(biāo)題欄中顯示的標(biāo)題，省略時(shí)為空白。 顯示按鈕和圖標(biāo)：是 c1+c2+c3+c4的總和，用來指定顯示按鈕的數(shù)目、形式、使用的圖標(biāo)樣式。 MsgBox函數(shù) 例如，使用消息框顯示出錯(cuò)提示信息，消息框如圖所示： Response = MsgBox(對不起 ,你的學(xué)號不正確 !, vbOKOnly + vbExclamation, 出錯(cuò) ) 程序分析： 顯示的消息框中消息文本為“對不