【正文】 System 由 操作系統(tǒng)決定外觀形式 本章目錄 本書目錄 57 命令按鈕 (3) BackGroundImage (4) TextAlign、 ImageAlign 設(shè)置文本 、 圖形在按鈕上的對(duì)齊方式 2. 事件 命令按鈕一般接收 Click事件 本章目錄 本書目錄 58 InputBox函數(shù) 打開一個(gè)對(duì)話框 ， 等待用戶輸入 ， 返回字符串類型的輸入值 。 本章目錄 本書目錄 69 算術(shù)運(yùn)算符 (P55) 例： 5+10 mod 10 \ 9 / 3+2 ^2 結(jié)果 ? 注意 ：對(duì)算術(shù)運(yùn)算符兩邊的操作數(shù)應(yīng)是數(shù)值型，若是數(shù)字字符或邏輯型，則自動(dòng)轉(zhuǎn)換成數(shù)值類型后再運(yùn)算。 本章目錄 運(yùn)算符 例 結(jié)果 = ABCDE = ABR False ABCDE ABR False = bc = abcde True 233 False = 23 = 3 True abc abcde True 本書目錄 72 “1”“2”…“A”“B”…“a”“b”… 字符串 1的第 n位 (最高位 )的 ASCII碼值 等于 字符串 2的第 n位的ASCII碼值 ，則 繼續(xù)比較下一位 字符串 1的第 n位的 ASCII碼值 大于 字符串 2的第 n位的 ASCII碼值 ，則 輸出結(jié)果 :1,表示字符串 1 字符串 2。使用前在模塊的開頭用語句 Imports 4 3 Int() Int() 取小于或等于 N的最大整數(shù) Int(N) Log(10) 自然對(duì)數(shù) Log(N) 3 3 Fix() Fix() 取整 Fix(N) Exp(3) ex Exp(N) 1 Cos(0) 余弦函數(shù) Cos(N) Abs() 取絕對(duì)值 Abs(N) 結(jié)果 實(shí)例 含義 函數(shù)名 本章目錄 本書目錄 80 數(shù)學(xué)函數(shù) 0 Tan(0) 正切函數(shù) Tan(N) 3 Sqrt(9) 平方根 Sqrt(N) 1 Sgn() 符號(hào)函數(shù) Sgn(N) 0 Sin(0) 正弦函數(shù) Sin(N) 4 4 Round() Round() 四舍五入取整 Round(N) [0,1)之間的數(shù) Rnd 產(chǎn)生隨機(jī)數(shù) Rnd[(N)] 結(jié)果 實(shí)例 含義 函數(shù)名 Rnd函數(shù)返回 0和 1（包括 0但不包括 1）之間的雙精度隨機(jī)數(shù) . 每次運(yùn)行時(shí)，要產(chǎn)生不同序列的隨機(jī)數(shù)，先執(zhí)行 Randomize 語句。 (2) 語句書寫自由 一行上可書寫多句語句 (用冒號(hào)分隔 )， 一行最多 255個(gè)字符 。 sngRate= 39。 賦值號(hào)左邊的變量只能是 變量 或 對(duì)象 .屬性 ，不能是常量、常數(shù)符號(hào)、表達(dá)式。 If xy Then t=x x=y y=t End If 或 If xy Then t=x: x=y: y=t 簡(jiǎn)單 If形式無 End If時(shí)，只能是一句語句或語句間用冒號(hào)分隔，而且必須在一行上書寫。 ElseIf不能寫成 Else If 多分支結(jié)構(gòu)例 本章目錄 注意問題 本書目錄 103 If語句的嵌套是指 If或 Else后面的語句塊中又包含 If語 If 表達(dá)式 1 Then If 表達(dá)式 2 Then … End If … End If If xy Then t=x: x=y: y=t If yz Then t=y: y=z: z=t If xy Then t=x: x=y: y=t End If End If If語句的嵌套 例 已知 x， y， z三個(gè)數(shù)，使得 xyz 用一個(gè) IF語句和一個(gè)嵌套的 IF語句實(shí)現(xiàn) 本章目錄 本書目錄 104 Select Case語句 Select Case 變量或表達(dá)式 Case 表達(dá)式列表 1 語句塊 1 Case 表達(dá)式列表 2 語句塊 2 … [Case Else 語句塊 n+1] End Select 表達(dá)式列表 與 變量或表達(dá)式 的類型必須相同，是下面 4種形式之一 ： ?表達(dá)式 例 : A ?一組用逗號(hào)分隔的枚舉 值 2,4,6,8 ?表達(dá)式 1 To 表達(dá)式 2 60 To 100 ?Is 關(guān)系運(yùn)算符表達(dá)式 Is 60 本章目錄 本書目錄 105 Select Case語句例 將例 改用 Select Case 語句實(shí)現(xiàn)： Select Case ch Case a To z， A To Z MsgBox( ch + 是字母字符 ) Case 0 To 9 MsgBox (ch +是數(shù)字字符 ) 。 該語句的作用是當(dāng)表達(dá)式的值為 True，執(zhí)行 Then后面的語句塊，否則不做任何操作。 vbCrLf amp。 本章目錄 本書目錄 89 本章小節(jié) 變量：在程序運(yùn)行中其存儲(chǔ)的值可以改變 值類型變量 、 引用類型變量 變量聲明 Dim 變量名 [As 類型 ][=初始值 ] ?運(yùn)算符 算術(shù)運(yùn)算符 、 字符串運(yùn)算符 、 關(guān)系運(yùn)算符和邏輯運(yùn)算符 名稱空間導(dǎo)入 Imports 名稱空間 數(shù)學(xué)函數(shù)使用 Imports Shell函數(shù) 調(diào)用各種應(yīng)用程序 本章目錄 本書目錄 90 第四章 基本的控制結(jié)構(gòu) 順序結(jié)構(gòu) 選擇結(jié)構(gòu) 循環(huán)結(jié)構(gòu) 其它輔助控制語句 綜合應(yīng)用 程序調(diào)試 本章目錄 本書目錄 91 順序結(jié)構(gòu) 順序結(jié)構(gòu) 選擇結(jié)構(gòu) 循環(huán)結(jié)構(gòu) 它們是程序設(shè)計(jì)的基礎(chǔ) 。 函數(shù)調(diào)用成功返回一個(gè)任務(wù)標(biāo)識(shí) ID， 不成功 ， 則返回 0。 本章目錄 本書目錄 77 名稱空間和類 (2) 基礎(chǔ)類庫中的名稱空間和類 類別 名稱空間 說 明 基本數(shù)據(jù)類型 System 基本的和經(jīng)常使用的數(shù)據(jù)類型、事件和事件處理程序、接口、屬性和異常處理等 編程基礎(chǔ) 對(duì)象集合 文件管理及其輸入 /輸出 圖形 GDI+ Windows的應(yīng)用程序的豐富用戶 數(shù)據(jù)庫 本章目錄 本書目錄 78 名稱空間的使用 引用名稱空間的方法： 項(xiàng)目引用 新建一個(gè)項(xiàng)目時(shí)， 建項(xiàng)目類型，自動(dòng)導(dǎo)入部分名稱空間的引用 直接引用 給出名稱空間的全名，就可訪問其中的任一個(gè)類及其各項(xiàng)內(nèi)容 例 使用 Math類開方函數(shù) sqrt： = (100) Imports語句導(dǎo)入 在代碼中就可直接使用名稱空間的類或成員 。 True 12True 12 + True 11 注意： 在變量后使用運(yùn)算符＆時(shí)，變量與＆間應(yīng)加一個(gè)空格 本章目錄 本書目錄 71 關(guān)系運(yùn)算符 關(guān)系運(yùn)算符是雙目運(yùn)算符，作用是對(duì)兩個(gè)操作數(shù)進(jìn)行大小比較，若關(guān)系成立，則返回 True，否則返回 False。 例如： Dim m， n， j As Integer， x， y As Single， k k為 Object類型 本章目錄 本書目錄 67 常量 常量是在程序運(yùn)行中不變的量， 種常量： 直接常量 其常數(shù)值直接反映了其類型 符號(hào)常量 用戶聲明， 便于程序閱讀或修改 Const 符號(hào)常量名 [As 類型 ] = 表達(dá)式 系統(tǒng)常量 系統(tǒng)提供許多內(nèi)部常量和枚舉 例如： vbCrLf 回車 /換行組合符 枚舉 如控件的顏色 、 邊框線型等 本章目錄 本書目錄 68 運(yùn)算符和表達(dá)式 運(yùn)算符是表示實(shí)現(xiàn)某種運(yùn)算的符號(hào)。 (4) GotFocus事件 GotFocus事件與 LostFocus事件相反 ， 當(dāng)一個(gè)對(duì)象獲得焦點(diǎn)時(shí)發(fā)生 本章目錄 本書目錄 55 文本框 方法 文本框最有用的方法是 Focus， 把光標(biāo)移到指定的文本框中 。 默認(rèn)值為 32767， 表示可以輸入任意長(zhǎng)字符串 。 例 編寫三個(gè)事件過程，要求如下： ?啟動(dòng)窗體 ， 在標(biāo)題欄顯示 “ 裝入窗體 ” ， 并將 背景圖平鋪窗體 、 窗體邊框?yàn)?Fixed3D； ?單擊窗體 ， 標(biāo)題欄顯示對(duì)應(yīng)的文字 、 裝入 小為 264 256,要求圖片正好充滿窗體 。 建立一個(gè)應(yīng)用程序分為以下幾步進(jìn)行： (1) 建立用戶界面的對(duì)象 (2) 對(duì)象屬性的設(shè)置 (3) 對(duì)象事件過程及編程 (4) 保存和運(yùn)行程序 本章目錄 代碼說明 本書目錄 34 對(duì)象事件過程及編程 代碼窗口的 對(duì)象列表框 可顯示窗體所有對(duì)象 過程列表框 列出所選中對(duì)象的所有事件 例如 ， 在按鈕 Button2的 Click事件加入代碼： Sub Button2_Click(ByVal sender As , _ ByVal e As ) Handles = Val() * Val() End Sub Val( )函數(shù) 將數(shù)字字符轉(zhuǎn)換成數(shù)