2.6 Visual Basic的輸入機(jī)制

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

　　1. 通過文本框輸入數(shù)據(jù)

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

　　Private Sub Form_Click ()

　　Text2.Text = UCase(Text1.Text)

　　End Sub

　　2. 通過復(fù)選框和選項(xiàng)按鈕輸入數(shù)據(jù)

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

　　3. 通過列表框和組合框輸入數(shù)據(jù)

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

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

　　(2) 列表項(xiàng)目的增減

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

　　ListBoxName. AddItem item

　　ComboBoxName. AddItem item

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

　　ListBoxName. RemoveItem item

　　ComboBoxName. RemoveItem item

　　如：ListBoxName. RemoveItem 0則刪除了第一項(xiàng)，這時(shí)原來的第二項(xiàng)就變成了第一項(xiàng)。

　　可以在設(shè)計(jì)階段設(shè)定列表項(xiàng)目, 方法是：

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

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

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

　　If List1.Text = “Visual Basic” Then Instructions

　　If List1.ListIndex = 1 Then Instructions

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

　　4. 通過滾動條Scroll Bar取得數(shù)據(jù)

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

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

　　1)Min，Max屬性

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

　　2)LargeChange,SmallChange屬性

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

　　3)Value屬性

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

　　4)Change事件

　　當(dāng)滑塊位置發(fā)生變化時(shí)就引發(fā)了Change事件。

　　(2) 取得滾動條的數(shù)據(jù)

　　滾動條并不是一個數(shù)據(jù)輸入的好控件，因?yàn)闊o法從滾動條上直接看出輸入的數(shù)據(jù)，但它的優(yōu)點(diǎn)是可以表示一定范圍里的相對位置。為了得到數(shù)據(jù)，只要取得滾動條的Value屬性就可以了。

　　5. InputBox函數(shù)

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

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

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