列表框控件的 Sorted 属性设置为.T., MoverBars 属性设置为.T.。向表单中添加一个命令按钮控件,其 Caption 属性设置为“排序” ,Click 事件的事件 处理代码如下: Thisform.List2.Sorted=.T. Thisform.Refresh 保存并运行表单。 (十一)新建一个表单,表单的标题设置为“列表
项的多项选择” 。向表单中添加两个列表框控件和 一个命令按钮组控件,将 NAME 属性分别设置为 LIST1,LIST2 和 CMDG。将命令按钮组中的两个 命令按钮 NAME 属性分别设置为 CMD1 和 CMD2。且将列表框控件的 mutiselected 属性设置 为.T.,sorted 属性设置为.T.,RowSourseType 属性值设置为“1-值” ,RowSourse 属性值设置为 “0,1,2,3,4,5,6,7,8,9” ,并为该控件的 interactivechange 事件设置如下的事件代码: Thisform.cmdg.cmd1.visible=.T. Thisform.cmdg.cmd2.visible=.F. 将列表框控件 LIST2 的 mutiselected 属性设置为.T., sorted 属性设置为.T., 为该控件的 interactivechange 事件设置如下的事件代码: Thisform.cmdg.cmd1.visible=.T. Thisform.cmdg.cmd2.visible=.F.
将命令按钮组的两个命令按钮的 visible 属性设置为.F.,并将 caption 属性分别设置为“右移”和“左 移” 。为命令按钮组的 click 事件设置事件处理代码。
将表单以 bd-lb1 为文件名保存,并运行表单 (十二)新建一个表单,并将表单的标题设置为“多列列表框示例” 。向表单的“数据环境”中添加 xs 表。 “表单控件” 利用 工具栏上 “列表框” 控件按钮向表单中添加列表框控件, 并将该控件的 NAME 属性设置为 “LIST3”ColumnCount 属性设置为 3, , RowSourseType 属性值设置为 “6-字段”RowSourse , 属性值设置为 xs 表中的三个字段“xh,xm,siming”。将表单以 bd-lb2 为文件名保存后并运行表单。
(十三)新建一个表单,并将表单的标题设置成“组合框示例” 。向表单的“数据环境”窗口中添加 kc 表。利用“表单控件”工具栏上的“组合框”控件按钮向表单中添加两个组合框控件,并将控件 的 NAME 属性分别设置为“COMB1”和”COMB2”。将两个组合框控件的 RowSourseType 属性值均 设置为“6-字段” ,RowSourse 属性值设置为 kc 表中的字段“kcm” 。将组合框控件 COMB1 的 Style 属性设置为“0-下拉组合框” 。将组合框控件 COMB2 的 Style 属性设置为“2-下拉列表框” 。将表单 以 bd-zh 为文件名保存后运行表单。