2011年度计算机等级考试二级VB基础教程(10)
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。
