【正文】 3:30 :00 Month(C) 返回月份代號(hào)（ 112） Month(02,03,19) 3 Year(C) 返回年代號(hào)（ 17522078） Year(020319) 2020 Day(C) 返回日期代號(hào)（ 131） Day(02,03,19) 19 WeekDay() 返回星期代號(hào)（ 17） ， 星期 日為 1 WeekDay(02,03,17) 1 增減日期函數(shù)： DateAdd（要增減日期形式，增減量，要增減的日期變量） 例： 計(jì)算期末考試日期： DateAdd(ww,15,2020/3/19) 求日期之差函數(shù)： DateDiff（要間隔日期形式，日期一，日期二） 例： 計(jì)算距畢業(yè)天數(shù)： DateDiff(d, Now, 2020/6/30) 日期形式 日期形式 yyyy q m y d w ww h n s 意義 年 季 月 一年的天數(shù) 日 一周的天數(shù) 星期 時(shí) 分 秒 4. 轉(zhuǎn)換函數(shù) 函數(shù)名 功能 示例 結(jié)果 Str (x) 將數(shù)值數(shù)據(jù) x 轉(zhuǎn)換成 字符 串 Str () Val(x) 將字符串 x 中的數(shù)字 轉(zhuǎn)換 成 數(shù)值 Val(23ab) 23 Chr(x) 返回以 x 為 ASCII 碼的字 符 Chr(65) A Asc(x) 給出字符 x 的 ASCII 碼值 ， 十進(jìn) 制 數(shù) Asc(a) 97 Cint(x) 將數(shù)值型數(shù)據(jù) x 的小 數(shù)部 分 四舍 五 入取整 Cint() 4 Int(x) 取小于等于 x 的最大 整數(shù) Int() Int() 4 3 Fix(x) 將數(shù)值型數(shù)據(jù) x 的小 數(shù)部 分 舍去 Fix() 3 CBool(x) 將任何有效的數(shù)字字符串或數(shù)值轉(zhuǎn)換成邏輯型 CBool(2) CBool(0) True False CByte(x) 將 0255 之間的數(shù)值 轉(zhuǎn)換 成 字節(jié) 型 CByte(6) 6 CDate(x) 將有效的日期字符串轉(zhuǎn)換成日期 CDate(1990,2,23) 1990223 CCur(x) 將數(shù)值數(shù)據(jù) x 轉(zhuǎn)換 成 貨幣 型 CCur() Round(x， N) 在保留 N 位小數(shù)的情 況下 四 舍五 入 取整 Round(， 1) CStr(x) 將 x 轉(zhuǎn)換成字符串型 CStr(12) 12 CVar(x) 將數(shù)值型數(shù)據(jù) x 轉(zhuǎn)換 成變 體 型 CVar(23)+A 23A CSng(x) 將數(shù)值數(shù)據(jù) x 轉(zhuǎn)換成 單精 度 型 CSng() CDbl(x) 將數(shù)值數(shù)據(jù) x 轉(zhuǎn)換成 雙精 度 型 CDbl() 5. 格式輸出 Format 函數(shù) Format 函數(shù)用于制定字符串或數(shù)字的輸出格式。 （ 4）輸入性：指一個(gè)算法可以有 0 或多個(gè)輸入數(shù)據(jù)。 InputBox 的使用形式： (P60) v=InputBox(prompt[,title][,default][,x,y][,helpfile,context]) 其中： v ：可為 變體變量、字符串變量、數(shù)值變量。 Private Sub Form_click() Dim x As Integer x = InputBox(請輸入一個(gè)數(shù) ) If x 0 Then Print x End Sub ② ifthenelseend if 結(jié)構(gòu)：（可實(shí)現(xiàn)兩分支） 一般格式： if e then A 語句組 Else B 語句組 End if 功能：執(zhí)行本語句時(shí)，先判斷 e 的值： e 為 true : 執(zhí)行 A 語句組后轉(zhuǎn) end if 下一條語句繼續(xù)執(zhí)行。 ◆ 滿足某個(gè)判決條件： Is 關(guān)系表達(dá)式 常量 例如： Is20 Is=”p” 其中 Is 代表 e (測試表達(dá)式 )的值。 ◆循環(huán)中執(zhí)行到 exit for 語句時(shí)，結(jié)束本循環(huán)語句，轉(zhuǎn)本 next 的下一條語句去執(zhí)行。 若 x 是數(shù)字串，其值為 True ，若不是數(shù)字串，其值為 False 4． 4． 1 doloop 循環(huán)結(jié)構(gòu)： P68 一般格式： 4 種 P68 do while e do …… …… [exit do] [exit do] …… …… loop loop while e 格式一： （ 1）先判斷 e 的值，為 true ，執(zhí)行循環(huán)體 A，為 false , 循環(huán)結(jié)束，轉(zhuǎn) loop 的下面一條語句去執(zhí)行。 程序舉例： P68 例 43 第五章 第五章 數(shù)組 5． 5． 1 數(shù)組的概念 數(shù)組：是同類變量的一個(gè)有序的集合。 二維數(shù)組：有兩個(gè)下標(biāo)的數(shù)組稱為二維數(shù)組。利用二重循環(huán)給二維數(shù)組賦值并輸出 For j = 1 To 2 B(i, j) = i * 10 + j Print B(i, j)。 A(2)。 A(4)。 數(shù)組的基本操作 P92 5． 2． 1 數(shù)組元素的賦值 1． 用賦值語句給數(shù)組元素賦值 例： P92 Dim Score(3) As Integer Dim Two(1,1 to 2)As Integer Score(0)=80 Score(1)=75 Score(2)=91 Score(3)=68 Two(0,1)= Score(0) Print Two(0, 1) 2 2 通過循環(huán)逐一給數(shù)組元素賦值 例： Private Sub Form_Click() Dim A(6) As Integer, i As Integer Dim B(1 To 2, 1 To 2) As Integer, j As Integer For i = 0 To 6 39。表示該元素在數(shù)組中排列的位置。 流程圖 P68 圖 413 （ a） 特別說明 ：無論哪種格式，記住循環(huán)體執(zhí)行的條件： （ 1） while 后的條件值為 true 時(shí)，執(zhí)行循環(huán)體，為 false 時(shí)，循環(huán)結(jié)束。 Rnd(0) End Sub 產(chǎn)生 [a,b]范圍內(nèi)隨機(jī)整數(shù)的公式： P73 int((ba+1)*rnd+a) 例：生成 5 個(gè) 3 位隨機(jī)整數(shù)。 功能：（執(zhí)行過程）： P70 使用說明：◆ 超過終值的情況：當(dāng) e3 0 時(shí)，指 ve2, 當(dāng) e30 時(shí)，指 ve2 。 c1,c2,… ：測試項(xiàng)。 功能 ：執(zhí)行本語句時(shí)，判斷 e 的值，若為 true ,則執(zhí)行 then 后的語句（語句組），若為 false ，則執(zhí)行本 if 語句（或 end if ）下面的語句。 使用說明：■ “ =”左邊的變量和右邊的表達(dá)式的值的類型要一致。 （ 2）可行性：指算法的每個(gè)步驟必須是計(jì)算機(jī)能夠有效執(zhí)行、可以實(shí)現(xiàn)的，并可得到確定的結(jié)果。 VB 的公共函數(shù) T F T Xor F T Xor T 操作數(shù)相反時(shí)，結(jié)果才為真 異或 Xor T F T Or F F Or F 操作數(shù)中有一個(gè)為真時(shí)，結(jié)果為真 或 Or F T T And F T And T 操作數(shù)均為真時(shí)，結(jié)果才為真 與 And T Not F 操作數(shù)為假，結(jié)果為真，操作數(shù)為真，結(jié)果為假 取反 Not 結(jié)果 例 說明 說明 運(yùn)算符 1. 數(shù)學(xué)函數(shù) VB 中常用的數(shù)學(xué)函數(shù) 函數(shù)名 功能 示例 結(jié)果 Sqr（ x） 求平方根 Sqr（ 9） 3 Log（ x） 求自然對數(shù)， x0 Log（ 10） Exp（ x） 求以 e 為底的冪值 ,即求 ex Exp（ 3） Abs（ x） 求 x 的絕對值 Abs（ ） Hex[$]（ x） 求 x 的十六進(jìn)制數(shù)，返回的是字符型值 Hex[$]（ 28） 1C Oct[$]（ x） 求 x 的八進(jìn)制數(shù)，返回的是字符型值 Oct[$]（ 10） 12 Sgn(x) 求 x 的符號(hào) , 當(dāng) x0, 返回 1 ； x=0, 返回 0； x0, 返回 1 Sgn(15) 1 Rnd(x) 產(chǎn)生一個(gè)在（ 0， 1）區(qū)間均勻分布的隨機(jī)數(shù)，每次的值都不同；若 x=0，則給出的是上一次本函數(shù)產(chǎn)生的隨機(jī)數(shù) Rnd(x) 01 之間的數(shù) Sin(x) 求 x 的正弦值， x 的單位是弧度 Sin(0) 0 Cos(x) 求 x 的余弦值， x 的單位是弧度 Cos(1) Tan(x) 求 x 的正切值， x 的單位是弧度 Tan(1) Atn(x) 求 x 的反正切值， x 的單位是弧度，函數(shù)返回的 是弧度值 Atn(1) 2. 字符函數(shù) （ 1）字符串編碼 在 Windows 采用的 DBCS（ Double Byte Character Set）編碼方案中，一個(gè)漢字在計(jì)算機(jī)內(nèi)存中占 2 個(gè)字節(jié)，一個(gè)西文字符（ ASCII 碼）占 1個(gè)字節(jié)，但在 VB 中采用的是 Unicode（ ISO 字符標(biāo)準(zhǔn)）來存儲(chǔ)字符的，所有字符都占 2 個(gè)字節(jié)。例如： a=2**r And （ x5 Or Not b） x2 Or =”Microsoft” 表達(dá)式的書寫： （ 1）運(yùn)算符不能相鄰。 關(guān)系運(yùn)算符與關(guān)系表達(dá)式 關(guān)系運(yùn)算符都是雙目運(yùn)算，是用來比較兩個(gè)運(yùn)算量之間的關(guān)系，關(guān)系表達(dá)式的運(yùn)算結(jié)果為邏輯量。 A^B 表示以 A 為底的 B 次方。＋：加法運(yùn)算，也適合于字符串的之間的合并運(yùn)算。39。、 、 、123D3 分別表示整型、長整型、單精度浮點(diǎn)型（小數(shù)形式）、單精度浮點(diǎn)型（指數(shù)形式）、雙精度浮點(diǎn)型。如果沒有 As 類型 ，則默認(rèn)為變體類型。 5 為中午 12 點(diǎn)，負(fù)數(shù)表示是 1899 年 12月 31日前的日期和時(shí)間）。根據(jù)執(zhí)行方式，可把 “過程 ”分為 “事件過程 ”和 “通用過程 ”兩類。 要將控件畫在框架之中，不能雙擊控件，因?yàn)槟菢訉⑹箍丶丿B在框架的上面，必須單擊工具圖標(biāo)，然后在框架內(nèi)拖動(dòng)后釋放，這樣的所畫的控件在框架之中。 說明：一個(gè)窗體或一個(gè)框架內(nèi)的選項(xiàng)按鈕只能有一個(gè)被選中，（不同框架內(nèi)的選項(xiàng)按鈕互不干擾）若用戶不設(shè)定哪一個(gè)選項(xiàng)按鈕的值為 true ，則系統(tǒng)指定第一個(gè)選項(xiàng)按鈕的 value 值為 true 。 2： 灰色，表示用戶不能修改這個(gè)設(shè)定值，只能看到它目前狀態(tài)。（命令按鈕呈灰色） 事件： click : 單擊事件 方法： SetFocus : 命令按鈕經(jīng)過 SetFocus 方法后，將取得焦點(diǎn)。） Caption ： 標(biāo)題 。 FontName ：字體名稱。 標(biāo)簽在工具箱中的圖標(biāo) P25；在窗體中的形式 屬性： 名稱：標(biāo)簽名稱。 其它屬性類似窗體。 取值： 0：（默認(rèn)值）靠左對齊。 取值：０：（默認(rèn)值）。 2．在屬性窗口中設(shè)定其 interval 屬性。 方法： Move : 用以移動(dòng)滾動(dòng)條。默認(rèn)值為 1。 （ 如 word 中字體、段落對話框中） 滾動(dòng)條在工具箱中的圖標(biāo) P25；在窗體中的形式 屬性：（實(shí)驗(yàn)指導(dǎo)書 P18） 名稱：（通常以“ Hsb”、“ Vsb”作為前綴。 picture : 設(shè)定圖像框中代表的圖片名稱。 方法： 同列表框。 Text：文本屬性。 稱為組合式的組合框。（與列表框相比，組合框一次只能選取一個(gè)列表項(xiàng)） 工具箱中的圖標(biāo) P25；在窗體中的形式 屬性： 同 Listbox 有： List, ListCount,ListIndex,Text,Sorted 等等。 RemoveItem：刪除列表項(xiàng)。 Ｆ alse：不被選取。此時(shí)列表框內(nèi)一次可顯示的列數(shù)（ Column）即為 n 值。 ListIndex：用戶最后單擊的列表項(xiàng)在 List() 數(shù)組中的編號(hào)順序。 12． 立即、本地和監(jiān)視窗口 這些附加窗口是為調(diào)試應(yīng)用程序提供的，它們只在 IDE 之中運(yùn)行應(yīng)用程序時(shí)才有效。6． 彈出