2.6 Visual Basic的輸入機制

　　程序的基本操作就是數據的輸入，數據處理和數據的輸出。Visual Basic可中用于輸入的控件主要有：文本框Text Box、復選框Check Box、選項按鈕Option Button、列表框List Box、組合框Combo Box、滾動條Scroll Bar、通用對話框控件。還有一個函數叫InputBox函數，也可用于數據的輸入。

　　1. 通過文本框輸入數據

　　只要取得文本框的Text屬性就可以對其進行操作了。下面的代碼可將Text1文本框的正文變成大寫輸出至Text2文本框。

　　Private Sub Form_Click ()

　　Text2.Text = UCase(Text1.Text)

　　End Sub

　　2. 通過復選框和選項按鈕輸入數據

　　只要檢測到Check Box和Radio Button的Value屬性值就可以知道它們是否被選上了。

　　3. 通過列表框和組合框輸入數據

　　(1) 列表框List Box和組合框Combo Box的不同

　　它們在Windows的Open，Save As對話框里最為常見。組合框又包括三種類型，這三種類型要在它的Style屬性里設置。列表框僅僅把可以選擇的項目列出來，而組合框里有的類型可以允許用戶輸入數據。

　　(2) 列表項目的增減

　　使用AddItem，RemoveItem語句可以增減列表項目。通常將項目增減的語句放入Form_Load事件里。

　　ListBoxName. AddItem item

　　ComboBoxName. AddItem item

　　item是新項目名稱，必須是字符串類型，非字符串類型可通過Str函數或Format函數來轉換。轉列表框，組合框的每一項目都有一個Index值，第一個項目的Index值是0，第二個是1，依此類推。刪除項目可通過刪除其Index值來實現。

　　ListBoxName. RemoveItem item

　　ComboBoxName. RemoveItem item

　　如：ListBoxName. RemoveItem 0則刪除了第一項，這時原來的第二項就變成了第一項。

　　可以在設計階段設定列表項目, 方法是：

　　在屬性窗口選擇List屬性，將出現一個下拉列表，在列表中輸入第一項，按Ctrl+Enter，輸入第二項……，最后用Enter結束。

　　(3) 取得列表框/組合框的數據

　　可以通過取得Text屬性或通過取得ListIndex屬性來判斷哪一項被選擇了。ListIndex屬性的值也同樣是第一個為0，第二個為1……如：

　　If List1.Text = “Visual Basic” Then Instructions

　　If List1.ListIndex = 1 Then Instructions

　　組合框有時允許用戶自己輸入數據，這時所輸入數據的ListIndex值為-1。

　　4. 通過滾動條Scroll Bar取得數據

　　在Visual Basic的工具箱里有兩種滾動條：一種是垂直的，一種是水平的，它們的差異無非是擺放的方向不一樣。

　　(1) 滾動條的主要屬性及事件

　　1)Min，Max屬性

　　Min屬性決定滾動條最左端或最頂端所代表的值。Max屬性決定滾動條最右端或最下端所代表的值。

　　2)LargeChange,SmallChange屬性

　　SmallChange決定在滾動條兩端的箭頭鈕上單擊時改變的值。LargeChange決定在滑塊上方或下方區域單擊時改變的值。

　　3)Value屬性

　　Value屬性代表當前滑塊所處位置的值，這個值由滑塊的相對位置決定。

　　4)Change事件

　　當滑塊位置發生變化時就引發了Change事件。

　　(2) 取得滾動條的數據

　　滾動條并不是一個數據輸入的好控件，因為無法從滾動條上直接看出輸入的數據，但它的優點是可以表示一定范圍里的相對位置。為了得到數據，只要取得滾動條的Value屬性就可以了。

　　5. InputBox函數

　　InputBox函數提供一個簡單的對話框供用戶輸入信息。在把其它版本的BASIC程序移植到Visual Basic時，InputBox函數通常用來代替INPUT語句。這個對話框的樣子基本上是上面的樣子。

　　它的完整語法是：x = InputBox (prompt, title, default, xpos, ypos, helpfile, context)

　　其中，prompt是提示的字符串，這個參數是必須的。title是對話框的標題，是可選的。default是文本框里的缺省值，也是可選的。xpos，ypos決定輸入框的位置。helpfile，context用于顯示與該框相關的幫助屏幕。返回值 x 將是用戶在文本框里輸入的數據，x是一個字符串類型的值。如果用戶按了Cancel鈕，則 x 將為空字符串。