【正文】 End Select 數(shù)值型或字符串表達式 例 變量 strC中存放了一個字符，判斷該字符類型。 例 根據(jù)邊長判斷 三角形類型 例 已知百分制成績 mark，顯示對應(yīng)的五級制成績 哪些正確，哪些錯誤？ 方法一 I f m a r k = 90 T he n P r i nt 優(yōu) E l s e I f m a r k = 80 T he n P r i nt 良 E l s e I f m a r k = 70 T he n P r i nt 中 E l s e I f m a r k = 60 T he n P r i nt 及格 E l s e P r i nt 不及格 E nd I f 方法二 I f m a r k 60 T he n P r i nt 不及格 E l s e I f m a r k 70 T he n P r i nt 及格 E l s e I f m a r k 80 T he n P r i nt 中 E l s e I f m a r k 90 T he n P r i nt 良 E l s e P r i nt 優(yōu) E nd I f 方法三 I f m a r k = 60 T he n P r i nt 及格 E l s e I f m a r k = 70 T he n P r i nt 中 E l s e I f m a r k = 80 T he n P r i nt 良 E l s e I f m a r k = 90 T he n P r i nt 優(yōu) E l s e P r i nt 不及格 E nd I f 返回 72 4． If語句的嵌套 If語句的嵌套是指 If或 Else后面的語句塊中又包含 If語句。 用多分支結(jié)構(gòu)實現(xiàn) : If Ucase(strC) =A And Ucase (strC) =Z Then Print strC + 是字母字符 ElseIf strC =0 And strC =9 Then Print strC + 是數(shù)字字符 Else Print strC + 其他字符 End If 不管有幾個分支，依次判斷，當(dāng)某條件滿足，執(zhí)行相應(yīng)的語句，其余分支不再執(zhí)行；若條件都不滿足，且有 Else子句，則執(zhí)行該語句塊，否則什么也不執(zhí)行。 分析： 帳號 6位， MaxLength為 6， LostFocus判斷 數(shù)字 IsNumeric函數(shù) 密碼 PassWordChar為“ *”， MsgBox函數(shù)設(shè)置密碼錯對話框。 要求： 帳號不超過 6位數(shù)字，有錯，清除原內(nèi)容再輸入。 例要在屏幕上顯示圖示的對話框： 相應(yīng)的語句如下： Dim strName As String * 40 strName= InputBox(請輸入你的姓名 + vbCrLf + 然后單擊確定 , 輸入框 ) 也可以使用如下語句： Dim strName As String * 40， strS1 As String * 40 strS1 = 請輸入你的姓名 + Chr(13) + Chr(10) + 然后單擊確定 strName= InputBox(strS1， 輸入框 ， ， 100， 100) 當(dāng)鍵盤輸入“王曉明” 后，變量 strName獲得鍵盤輸入的值。 例： sRate!= ＝ 歡迎使用 Visual Basic 當(dāng)表達式的類型與變量的類型不一致時，強制轉(zhuǎn)換成左邊的精度，如 iA% = 10 / 3 iA中的結(jié)果為 3 注意： 雖然賦值號與關(guān)系運算符等于號都用“ =”表示， VB系統(tǒng)會根據(jù)所處的位置自動判斷是何種意義的符號。 2. 同時給多個變量賦值，在 VB沒有造成語法錯而形成邏輯錯 例如： Dim x%， y%， z% x=y=z=1 3. 標(biāo)準(zhǔn)函數(shù)名寫錯 4. 變量名寫錯 檢查方法： 在通用聲明段加 Option Explicit 5. 語句書寫位置錯 在通用聲明段只能有 Dim語句，不能有賦值等其他語句 第四章 基本的控制結(jié)構(gòu) （ 8學(xué)時） 順序結(jié)構(gòu) 選擇結(jié)構(gòu) 循環(huán)結(jié)構(gòu) 其他輔助控制語句 常用算法（一） 常見錯誤 （ 順序 、 條件 、 循環(huán) ） 順 序 結(jié) 構(gòu) 一、賦值語句 形式： [LET]變量名＝表達式 作用： 將表達式的值賦值給變量名。 ) 常 見 錯 誤 1. 邏輯表達式書寫錯，在 VB沒有造成語法錯而形成邏輯錯 例如，數(shù)學(xué)表達式 3≤x＜ 10 VB表達式寫為 3=x10。 i = Shell(c:\windows\) j = Shell(c:\, 1) 提示： 如果不知道應(yīng)用程序的路徑名，可用 Start命令啟動程序 i = Shell(start amp。 End Sub 6. Shell函數(shù) Shell函數(shù)負責(zé)執(zhí)行一個可執(zhí)行文件 ， 返回一個 Variant， 如果成功 ， 代表這個程序的進程 ID， 若不成功 ， 則會返回 0。 Format(Date, dddd,mmmm,dd,yyyy) Print Tab(2)。 Format(MyTime, hms AM/PM) Print Tab(2)。 Format(MyDate, m/d/yy) Print Tab(2)。 (2)字符串函數(shù) Mid$(ABCDEFG,2,3) BCD InStr(2, ABCDEFG, EF) 5 S=Split(123,56,ab,) Join(S,) 123 56 ab Replace(ABCDABCD,CD,123) “AB123AB123” S(0)=123”,S(1)=56”,S(2)=ab 5. 格式輸出函數(shù) 例 利用 Format函數(shù)顯示有關(guān)的日期和時間。 Len(“中國 good ”)為 6； LenB(“中國 good ”)為 12。 每次運行時，要產(chǎn)生不同序列的隨機數(shù)，執(zhí)行 Randomize 語句。 3. 不同數(shù)據(jù)類型的轉(zhuǎn)換 運算結(jié)果的數(shù)據(jù)類型向精度高的數(shù)據(jù)類型靠。 (3) 括號必須成對出現(xiàn)，均使用圓括號。 (2) 乘號不能省略。 (1) 運算符不能相鄰。 例： ABCDE ABRA 結(jié)果為 False 男字 女字 按漢字的拼音字母比較 4. 邏輯運算符 將操作數(shù)進行邏輯運算，結(jié)果是邏輯值： 條件表達式 1 And 條件表達式 2 條件表達式均為 T， 結(jié)果為 T； 條件表達式 1 Or 條件表達式 2 條件表達式有一個為 T 結(jié)果為 T。 結(jié)果為 122 True轉(zhuǎn)換為數(shù)值 1， False轉(zhuǎn)換為數(shù)值 0 3．關(guān)系運算符 將兩個操作數(shù)進行大小比較，結(jié)果為邏輯量。 結(jié)果為 123456 “123” + 456 39。 出錯 123 amp。 12345 39。 456 結(jié)果 123456 區(qū)別： + 兩邊必須是字符串， amp。 例 Const MAX=100 2. 系統(tǒng)提供的常量 系統(tǒng)定義常量位于對象庫中，可通過“對象瀏覽器”查看。 三、常量 1. 用戶聲明常量 形式： Const 常量名 [AS 類型 ] = 表達式 省略 [AS 類型 ] ，常量的類型由表達式值的類型決定。 建議不使用。 命名規(guī)則 ： 1. 以字母或漢字開頭，后可跟漢字、字母、數(shù)字或下劃線組成，長度小于等于 255個字符； 2. 不要使用 VB中的關(guān)鍵字； 3. VB中不區(qū)分變量名的大小寫； 4. 為了增加程序的可讀性，可在變量名前加一個縮寫的前綴來表明該變量的數(shù)據(jù)類型 。 4. 保留行號與標(biāo)號 數(shù) 據(jù) 類 型 標(biāo)準(zhǔn)數(shù)據(jù)類型 變量與常量 一、變量和常量的命名規(guī)則 變量：在程序運行中其存儲的值可以改變。 2. 語句書寫自由 一行可書寫幾句語句 ,之間用冒號分隔； 一句語句可分若干行書寫，用續(xù)行符 _連接一行 =255個字符。 6. 打開工程時找不到對應(yīng)的文件 保存文件時先保存窗體 .frm文件、再保存 .vbp文件，注意路徑。正確的系統(tǒng)按規(guī)定的大小寫表示。 2. 字母和數(shù)字形狀相似 小寫字母“ l”和數(shù)字“ 1”形式相同、小寫字母“ o”與數(shù)字“ 0”。 設(shè)置或刪除斷點的步驟： 中斷模式下 ， 直接查看某個變量的值 ， 只要把鼠標(biāo)指向所關(guān)心的變量處 ， 稍停一下 ， 就在鼠標(biāo)下方顯示該變量的值 ?？蓡螕粢晥D菜單中的對應(yīng)命令打開這些窗口?？梢圆榭创a、修改代碼、檢查數(shù)據(jù)。 ? 運行模式 [運行 ] 執(zhí)行“運行 /啟動”命令，可以查看程序代碼，但不能修改。 通常 ， 邏輯錯誤不會產(chǎn)生錯誤提示信息 ， 故錯誤較難排除 ， 需要程序員仔細地閱讀分析程序以及調(diào)試 。 這類錯誤往往是程序存在邏輯上的缺陷所引起 。例如類型不匹配、試圖打開一個不存在的文件等。 （ 3） 運行錯誤 運行時錯誤指 VB在編譯通過后，運行代碼時發(fā)生的錯誤。 此類錯誤由于用戶未定義變量 、 遺漏關(guān)鍵字等原因產(chǎn)生 。 這時 ， 用戶必須單擊 “ 確定 ” 按鈕 ， 關(guān)閉出錯提示窗 ， 然后對出錯行進行修改 。 程 序 調(diào) 試 一、錯誤類型 （ 1）編輯錯誤 在編輯代碼時 ， VB會對鍵入的代碼直接進行語法檢查 。 ? “展開”：再把這些打包的文件展開到用戶可以攜帶的安裝介質(zhì)軟盤、光盤等。 2. 制作安裝盤 ? 在向?qū)У闹笇?dǎo)下運行 V “ Package amp。 窗體文件名 窗體名 生成可執(zhí)行文件和制作安裝盤 以工程文件例 。 4. 對窗體文件改名方法 1) 打開工程 “另存為 ?Form” 實現(xiàn)文件的復(fù)制 —— 保存工程文件。 3. 在工程中刪除窗體時，僅將此窗體從工程里刪除掉，但是窗體文件仍存在于磁盤上。 2. 在工程中添加現(xiàn)存的窗體時，只是對該窗體文件的引用納入工程。 ? 資源文件 (.res)。 ? 標(biāo)準(zhǔn)模塊文件 (.bas)。 工程的管理及環(huán)境的設(shè)置 一、工程的組成 工程文件包含了一個應(yīng)用程序的所有文件 : ? 窗體文件 (.frm)：控件及屬性、事件過程和自定義過程 。 窗體 1：列表框選擇數(shù)據(jù)、標(biāo)簽顯示數(shù)據(jù)、文本框輸入數(shù)據(jù)； 窗體 2：圖形框顯示房屋的平面圖。 七、應(yīng)用舉例 例 211 編一計算月支付貸款的程序。 3. Move方法 形式： [對象 .]Move 左邊距離 [，上邊距離 [，寬度 [，高度 ]]] 作用：移動窗體或控件，并可改變其大小。 考慮： 若把 Spc(6)換成 Tab(6)，效果如何？ 2. Cls方法 形式： [對象 .]Cls 作用：清除運行時在窗體或圖形框中顯示的文本或圖形。 Spc(6)。 例 顯示圖形 Private Sub Form_Click() For i = 1 To 5 Print Tab(i)。 開始打印的位置是由對象的 CurrentX和 CurrentX屬性決定， 缺省為打印對象的左上角 0， 0。 ， (逗號 )：光標(biāo)定