【例2】命令按钮组、选项组、复选框、编辑框应用示例，按下图设计一个表单，要求：

　　用户单击确定按钮时，在编辑框中显示用户对选项组和复选框的选择。并将表单保存为

　　FORM3

　　编写事件代码

　　选择命令按钮组，在属性窗口中双击“CLICK EVENT”属性，系统会打开代码编写器，在代码编写器窗口为“CLICK EVENT”事件输入如下代码：

　　if thisform.commandgroup1.value=2

　　thisform.release

　　else

　　cstr="你所在城市";

　　+thisform.optiongroup1.buttons[thisform.optiongroup1.value].caption

　　cstr=cstr+"你的爱好"

　　if thisform.check1.value=1

　　cstr=cstr+thisform.check1.caption

　　endif

　　if thisform.check2.value=1

　　cstr=cstr+thisform.check2.caption

　　endif

　　if thisform.check3.value=1

　　cstr=cstr+thisform.check3.caption

　　endif

　　thisform.edit1.value=cstr

　　endif

　　(9)列表框(ListBox)控件

　　1).列表框的功能

　　列表框提供一组条目(数据项)，用户可以从中选择一个或多个条目，一般情况下，列表框显示其中的若干条目，用户可以通过滚动条浏览其他条目。

　　2).选项组常用属性

　　列表可以一列，也可以多列，但只能有一列的数据和Value 属性的值捆绑。

　　.... RowSourceType 属性与RowSource 属性：RowSourceType 属性指明列表框数据源的类型，

　　RowSource 属性指定列表框的数据源 ,两者常用的搭配如下表：

　　RowSourceType 属性值 RowSource 属性

　　0-无

　　在程序运行时，通过AddItem 方法添

　　加列表框条目，通过RemoveItem 方

　　法移去列表框条目

　　无

　　1-值

　　列出在RowSource 属性中指定所有数

　　据项

　　可以是用逗号隔开的若干数据项的集合，例

　　如，在设计时，在本属性框中输入：北京、

　　上海、长沙、武汉

　　.... List 属性：用以存取列表框中数据条目的字符串数组。例如，LIST[1]代表列表框中的第一行(第一个数据项)。

　　.... ListCount 属性：列表框中数据条目的数目

　　.... ColumnCount 属性：指定列表框的列数

　　.... Value 属性：返回列表框中被选中的条目

　　.... ControlSource 属性：该属性在列表框中的用法与在其他控件中的用法有所不同，在这里，用户可以通过该属性指定一个字段或变量用以保存用户从列表框中选择的结果

　　.... Selected 属性：该属性是一个逻辑型数组，第N个数组元素代表第N 个数据项是否为选定状态

　　.... MultiSelect 属性：指定用户能否在列表框控件内进行多重选定

　　3). 列表框的事件过程

　　常用过程有 Click Event，Dbclick Event, AddItem,RemoveItem

　　4). 列表框生成器

　　在四个选项页中分别选定列表项、样式、布局和与Value 绑定的列及选定值保存到何处。

　　【例】列表框的应用：按下图设计一个表单。要求表单运行时，LIST1 列表框显示STUD 表的所有字段，单击左箭头按钮时，LIST1 中选择的字段加入到LIST2 中。

　　操作步骤：

　　① 按图所示在表单中加入二个列表框、二个标签、二个命令按钮。

　　② 在表单的INIT事件中加入如下代码：

　　thisform.list1.value=0

　　thisform.list2.value=0

　　open database student

　　use stud

　　for i=1 to fcount()

　　thisform.list1.additem(fields(i))

　　next

　　close database