【文章內(nèi)容簡(jiǎn)介】 語(yǔ)句之間必須用冒號(hào)隔開(kāi)。 ? 例如： a = 3 : b = 4 : c = 5 賦值語(yǔ)句 ? 其一般格式為： 目標(biāo)操作符 ＝ 源操作符 例如： Total = 99 39。 把數(shù)值常量 99賦給數(shù)值變量 Total （ 39。 是注釋符） ReadOut = Good Morning! 39。 把字符串常量賦給字符串變量 Try1 = Val() 39。 把對(duì)象 TextBox1的 Text屬性轉(zhuǎn)換為 39。 數(shù)值賦給數(shù)值變量 = Str(Total) 39。 把數(shù)值變量 Total轉(zhuǎn)換為字符串賦給帶有 ‘ Text屬性的對(duì)象 = 39。 把帶有 Text屬性的對(duì)象 TextBox2賦給帶有 39。 Text屬性的對(duì)象 TextBox1 注釋語(yǔ)句 ? 一般格式為： REM 注釋內(nèi)容 或 39。 注釋內(nèi)容 例如： 39。 This is a test stantement REM 這是一個(gè)子程序 暫停語(yǔ)句（ Stop） ? 格式： Stop ? Stop語(yǔ)句的主要作用是把編譯程序置為中斷（ Break）模式，以便對(duì)程序進(jìn)行檢查和調(diào)試。 ? 程序調(diào)試結(jié)束后，生成可執(zhí)行文件之前，應(yīng)刪去代碼中的所有 Stop語(yǔ)句。 結(jié)束語(yǔ)句（ End） ? 格式： End End語(yǔ)句通常用來(lái)結(jié)束一個(gè)程序的執(zhí)行?？梢园阉旁谑录^(guò)程中，例如： Private Sub Button1_Click(ByVal sender As , _ ByVal e As ) Handles End End Sub 該過(guò)程用來(lái)結(jié)束程序，即當(dāng)單擊按鈕時(shí)，立即結(jié)束程序的運(yùn)行。 End語(yǔ)句除用來(lái)結(jié)束程序外，在不同的環(huán)境下還有其他一些用途，包括： End Sub 結(jié)束一個(gè) Sub過(guò)程 End Function 結(jié)束一個(gè) Function過(guò)程 End If 結(jié)束一個(gè) If語(yǔ)句塊 End Structure 結(jié)束結(jié)構(gòu)類型的定義 End Select 結(jié)束情況語(yǔ)句 End Enum 結(jié)束枚舉枚舉的定義 當(dāng)在程序中執(zhí)行 End語(yǔ)句時(shí)，將終止當(dāng)前程序，重置所有變量，并關(guān)閉所有數(shù)據(jù)文件。 編寫(xiě)簡(jiǎn)單的 ? 用傳統(tǒng)的面向?qū)ο蟮恼Z(yǔ)言進(jìn)行程序設(shè)計(jì)時(shí)，主要的工作就是編寫(xiě)程序代碼，遵循 編程 ─調(diào)試─改錯(cuò) ─運(yùn)行 這樣一種模式。在用 Visual ，完全打破了這種模式，使程序的開(kāi)發(fā)大為簡(jiǎn)化，而且更容易掌握。 用 Visual 一般步驟 Visual 最大特點(diǎn)，就是以最快的速度和效率開(kāi)發(fā)具有良好用戶界面的應(yīng)用程序。如前所述， Visual 已被抽象為窗體和控件，因而大大簡(jiǎn)化了程序設(shè)計(jì)。一般來(lái)說(shuō)，在用Visual Windows應(yīng)用程序時(shí)，需要以下三步： ? 建立可視用戶界面 ? 設(shè)置可視界面特性 ? 編寫(xiě)事件驅(qū)動(dòng)代碼 建立用戶界面 ? 用戶界面由對(duì)象，即窗體和控件組成，控件放在窗體上，程序中的所有信息都要通過(guò)窗體顯示出來(lái)，它是應(yīng)用程序的最終用戶界面。在應(yīng)用程序中要用到哪些控件，就在窗體上建立相應(yīng)的控件。程序運(yùn)行后，將在屏幕上顯示由窗體和控件組成的用戶界面。 ? 在 Visual “ Windows應(yīng)用程序”項(xiàng)目后，屏幕上將顯示一個(gè)窗體，默認(rèn)名稱為 Form1，可以在這個(gè)窗體上設(shè)置用戶界面。如果要建立新的窗體，可以通過(guò)“項(xiàng)目”菜單中的“添加Windows窗體”命令來(lái)實(shí)現(xiàn)。 設(shè)置窗體和控件的屬性 ? 建立界面后，就可以設(shè)置窗體和每個(gè)控件的屬性。在實(shí)際的應(yīng)用程序設(shè)計(jì)中，建立界面和設(shè)置屬性可以同時(shí)進(jìn)行，即每畫(huà)完一個(gè)控件，接著就設(shè)置該控件的屬性。當(dāng)然，也可以在所有的對(duì)象建立完之后再回過(guò)頭來(lái)設(shè)置每個(gè)對(duì)象的屬性。究竟用哪種方法，可以根據(jù)自己的習(xí)慣選定，不必拘泥?？梢酝ㄟ^(guò)不同的方式設(shè)置窗體或控件的屬性。 編寫(xiě)代碼 ? Visual 編程機(jī)制，因此大部分程序都是針對(duì)窗體中各個(gè)控件所能支持的方法或事件編寫(xiě)的，這樣的程序稱為事件過(guò)程。例如，按鈕可以接收鼠標(biāo)單擊事件，如果單擊該按鈕，鼠標(biāo)單擊事件就調(diào)用相應(yīng)的事件過(guò)程來(lái)作出響應(yīng)。 ? 在多數(shù)情況下，特別是小型應(yīng)用程序，所編寫(xiě)的程序通常由事件過(guò)程組成，即針對(duì)控件或窗體的事件編寫(xiě)代碼。 ? 可以用以下四種方法進(jìn)入事件過(guò)程（即打開(kāi)“代碼窗口”）： ? （ 1）雙擊已建立好的控件。 ? （ 2）執(zhí)行“視圖”菜單中的“代碼”命令。 ? （ 3）按 F7鍵。 ? （ 4）在“解決方案資源管理器”窗口中選擇窗體文件（ ），然后單擊“查看代碼”按鈕。 編寫(xiě) Visual ? 程序要求：在屏幕上開(kāi)辟一個(gè)窗口，窗口的下部有三個(gè)按鈕，其中左邊按鈕中標(biāo)有“顯示”，中間按鈕中標(biāo)有“清除”，右邊按鈕中標(biāo)有“結(jié)束”。當(dāng)用鼠標(biāo)單擊左邊按鈕時(shí)，屏幕上部的文本框中顯示“歡迎使用 Visual ”；如果單擊中間按鈕，則清除文本框中顯示的內(nèi)容；而如果單擊右邊的按鈕，則結(jié)束程序。 ? 步驟： ? 建立可視用戶界面 ? 設(shè)置可視界面特性 ? 編寫(xiě)事件驅(qū)動(dòng)代碼 建立用戶界面 ? 為了建立應(yīng)用程序，首先應(yīng)建立一個(gè)新的項(xiàng)目，這可以通過(guò)“文件”菜單“新建”子菜單中的“項(xiàng)目”命令來(lái)實(shí)現(xiàn)。執(zhí)行該命令后，將打開(kāi)“新建項(xiàng)目”對(duì)話框，在該對(duì)話框的“名稱”欄中輸入 test1，在“位置”欄內(nèi)輸入 d:\test，選擇“關(guān)閉解決方案”單選按鈕，然后單擊“確定”按鈕，即可建立一個(gè)新的項(xiàng)目。如果剛啟動(dòng) Visual ，則可通過(guò)單擊“起始頁(yè)”中的“新建項(xiàng)目”按鈕打開(kāi)“新建項(xiàng)目”對(duì)話框。 ? 一個(gè)項(xiàng)目包含兩部分內(nèi)容，即對(duì)象和代碼（ Code），其中對(duì)象通常指的是窗體（ Form）和控件（ Control）。窗體是程序運(yùn)行時(shí)的背景窗口和對(duì)話框，控件是放置在窗體中的具體的對(duì)象，而代碼則是控制運(yùn)行的程序。在一般情況下，每個(gè)可以執(zhí)行的項(xiàng)目至少包括一個(gè)窗體，可以根據(jù)應(yīng)用程序的設(shè)計(jì)要求來(lái)改變其位置和大小。 ? 用戶界面由對(duì)象組成，建立用戶界面實(shí)際上就是在窗體上畫(huà)出代表各個(gè)對(duì)象的控件。由題意可知，需要建立的界面包括 5個(gè)對(duì)象，即 1個(gè)窗體和 4個(gè)控件，其中 3個(gè)控件是按鈕， 1個(gè)是文本框， ? 可以按下面的步驟建立用戶界面： ? （ 1）單擊工具箱中的命令按鈕圖標(biāo)，在窗體的適當(dāng)位置畫(huà)一個(gè)按鈕（按鈕 1），畫(huà)完后，按鈕內(nèi)自動(dòng)標(biāo)有“ Button1”。 ? （ 2）重復(fù)步驟 1，分別畫(huà)出第二個(gè)按鈕和第三個(gè)按鈕，兩個(gè)按鈕內(nèi)分別自動(dòng)標(biāo)有“ Button2”和“ Button3”。 ? （ 3）單擊工具箱中的文本框圖標(biāo)，然后在窗體的適當(dāng)位置畫(huà)出文本框控件，文本框內(nèi)自動(dòng)標(biāo)有“ TextBox1”。 ? （ 4）上述 4個(gè)控件畫(huà)完后，根據(jù)具體情況，對(duì)每個(gè)控件的大小和位置進(jìn)行適當(dāng)調(diào)整。 設(shè)置屬性 ? 前面畫(huà)出的 4個(gè)控件構(gòu)成了用戶界面，這 4個(gè)控件就是 4個(gè)對(duì)象。實(shí)際上，除 4個(gè)控件外，還有一個(gè)對(duì)象，這就是窗體，其當(dāng)前名稱（ Name屬性）和標(biāo)題（ Text屬性）為“ Form1”。在建立用戶界面后，每個(gè)對(duì)象都有一個(gè)默認(rèn)標(biāo)題（ Text屬性），分別為Button Button Button TextBox1和 Form1。 Text是對(duì)象的一種屬性，為了使對(duì)象的標(biāo)題符合設(shè)計(jì)要求，應(yīng)當(dāng)對(duì)每個(gè)對(duì)象的 Text屬性進(jìn)行修改。 屬性設(shè)置列表（格式 1） ? 控件放在窗體中，窗體及其控件構(gòu)成了用戶界面。程序運(yùn)行后，如果對(duì)界面不滿意，可以結(jié)束運(yùn)行，然后進(jìn)行調(diào)整。 表 對(duì)象屬性設(shè)置（格式 1） ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 對(duì) 象 名稱（ Name） 標(biāo)題（ Text） ────────────────────────────── 窗體 Form1 Visual 應(yīng)用程序設(shè)計(jì)示例 左按鈕 Button1 顯示 中按鈕 Button2 清屏 右按鈕 Button3 結(jié)束 文本框 TextBox1 空白 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 屬性設(shè)置列表（格式 2） 表 對(duì)象屬性設(shè)置（格式 2） ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 對(duì) 象 屬性 設(shè)置值 ──────────────────────────────── 窗體 Name Form1 Text Visual 應(yīng)用程序設(shè)計(jì)示例 左按鈕 Name Button1 Text 顯示 中按鈕 Name Button2 Text 清屏 右按鈕 Name Button3 Text 結(jié)束 文本框 Name TextBox1 Text 空白 字體 宋體 字形 粗斜體 大小 16 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 編寫(xiě)代碼 ? Visual 事件編寫(xiě)的，每個(gè)事件對(duì)應(yīng)一個(gè)事件過(guò)程。 ? 用鼠標(biāo)單擊（ Click）一個(gè)對(duì)象是經(jīng)常用到的事件，可以針對(duì)這樣的事件編寫(xiě)事件過(guò)程。 （ 1）程序代碼窗口 ? ① 主窗口選項(xiàng)卡。 ? ② “類名”欄。 ? ③“方法名稱”欄。 ? ④ Form1類定義開(kāi)始。 ? ⑤指定繼承。 ? ⑥ Visual Form1生成的程序代碼。 ? ⑦ Form1類定義結(jié)束。 ? ⑧以大綱方式顯示源代碼。 ? ⑨拆分欄。 （ 2）編寫(xiě)過(guò)程代碼 ? 過(guò)程代碼是針對(duì)某個(gè)對(duì)象事件編寫(xiě)的。為了指明某個(gè)對(duì)象的操作，必須在方法或?qū)傩郧凹由蠈?duì)象名，中間用句點(diǎn)（ .）隔開(kāi)。 例如： = 歡迎使用 Visual 這里的 TextBox1是控件（對(duì)象）名， Text是文本框的屬性。執(zhí)行上面的語(yǔ)句后，將在 TextBox1文本框中顯示“歡迎使用 Visual ”。 如果不指出對(duì)象名，則方法或?qū)傩允轻槍?duì)當(dāng)前窗體的。注意，與控件的屬性設(shè)置不同，當(dāng)通過(guò)代碼設(shè)置窗體的標(biāo)題（ Text屬性）時(shí)，不能用窗體名稱（如Form1）作為對(duì)象名。 例如： = 程序設(shè)計(jì) 是錯(cuò)誤的，必須寫(xiě)作 = “程序設(shè)計(jì)“ 或 Text = 程序設(shè)計(jì) 本例中的 3個(gè)事件 Private Sub Button1_Click(ByVal sender As Object, _ ByVal e As ) Handles = 歡迎使用 Visual End Sub Private Sub Button2_Click(ByVal sender As Object, _ ByVal e As ) Handles = End Sub Private Sub Button3_Click(ByVal s