其它控件介绍表单管理 多表单应用程序 类 建立工具栏

1、1其它控件介绍其它控件介绍表单管理表单管理 多表单应用程序多表单应用程序 类类 建立工具栏建立工具栏 2表单设计的基本步骤为：表单设计的基本步骤为： 打开表单设计器打开表单设计器向表单添加控件向表单添加控件设置表单及控件的属性设置表单及控件的属性添加表单及控件的事件代码添加表单及控件的事件代码保存表单保存表单运行及调试表单。运行及调试表单。3其它控件介绍其它控件介绍 控件的通用属性控件的通用属性 命令按钮组控件命令按钮组控件 编辑框编辑框 复选框和单选框复选框和单选框 列表框和组合框列表框和组合框 微调控件微调控件 表格和页框表格和页框 超级连接超级连接 ActiveX控件和控件和Active

2、X绑定控件绑定控件 4控件的通用属性控件的通用属性 Enabled属性属性 Visible属性属性 以以Font打头的一组属性打头的一组属性 为多个对象设置共同属性为多个对象设置共同属性 这一属性是除这一属性是除“超级连接超级连接”和和“计时器计时器”之外的之外的所有运行时可见的控件及表单都有的属性，其值所有运行时可见的控件及表单都有的属性，其值可设置为：可设置为：.T.-真或真或.F.-假，指定运行时对象是可假，指定运行时对象是可见还是隐藏。见还是隐藏。 FontSize：定义字的大小；：定义字的大小；FontName：定义文本的字体；：定义文本的字体；FontColor：定义字的颜色；：定

3、义字的颜色；Fontbold：定义文字是否粗体；：定义文字是否粗体；FontItalic：定义文字是否斜体；：定义文字是否斜体；这组属性是许多可有文字的对象都有的属性，如：表这组属性是许多可有文字的对象都有的属性，如：表单、标签控件、命令按钮控件、文本框控件、表格控单、标签控件、命令按钮控件、文本框控件、表格控件、列表框控件等等。件、列表框控件等等。 按住按住Shift健分别单击若干对象，用来选取需设置健分别单击若干对象，用来选取需设置属性的对象，属性窗口的对象组合框中将会显示属性的对象，属性窗口的对象组合框中将会显示“多重选定多重选定”文本，此时便可在属性窗口为这些文本，此时便可在属性窗口为

4、这些对象设置共同属性，例如：设置对象设置共同属性，例如：设置FontSize属性改属性改变文字大小。变文字大小。 5命令按钮组控件命令按钮组控件 命令按钮组控件是一个容器控件，它可包含若干命令按钮组控件是一个容器控件，它可包含若干个命令按钮，并能统一管理这些命令按钮，命令个命令按钮，并能统一管理这些命令按钮，命令按钮组与组内的各命令按钮都有自己的属性，事按钮组与组内的各命令按钮都有自己的属性，事件和方法程序，因而既可单独操作各命令按钮，件和方法程序，因而既可单独操作各命令按钮，也可对组控件进行操作。也可对组控件进行操作。命令按钮组的生成器命令按钮组的生成器 命令按钮组及其命令按钮的操作命令按钮

5、组及其命令按钮的操作 按钮选项卡按钮选项卡(1)微调控件：指定命令按钮组中的按钮数，对应微调控件：指定命令按钮组中的按钮数，对应于命令按钮组的于命令按钮组的ButtonCount属性属性(2)表格：包含标题和图形两列。表格：包含标题和图形两列。标题列对应于命令按钮的标题列对应于命令按钮的Caption属性，命令按钮可属性，命令按钮可以具有标题或图象，或两者都有。图形列对应于命令以具有标题或图象，或两者都有。图形列对应于命令按钮的按钮的Picture属性。属性。命令按钮会自动调整大小，以容纳新的标题和图片，命令按钮会自动调整大小，以容纳新的标题和图片，组容器也会自动调整大小。组容器也会自动调整大

6、小。布局选项卡布局选项卡(1)按钮布局：指定命令按钮组内的按钮按竖直方按钮布局：指定命令按钮组内的按钮按竖直方向或水平方向排列。向或水平方向排列。(2)按钮间隔：指定按钮之间的间隔。按钮间隔：指定按钮之间的间隔。上述两项将影响命令按钮组的上述两项将影响命令按钮组的Height和和Width属性。属性。(3)边框样式：指定命令按钮组有单线边栏或无边边框样式：指定命令按钮组有单线边栏或无边框。框。 Click事件的判别事件的判别容器中对象的引用容器中对象的引用容器及其对象的编辑容器及其对象的编辑 常用命令按钮组的属性有：常用命令按钮组的属性有：ButtonCount：设置组中命令按钮的数目。：设置

7、组中命令按钮的数目。BackStyle：设置命令按钮的背景是否透明。：设置命令按钮的背景是否透明。BorderStyle：定义命令按钮组的边框。：定义命令按钮组的边框。 (2)单击某命令按钮时，组控件的单击某命令按钮时，组控件的Value属性就会获得一个数属性就会获得一个数值或字符串：当值或字符串：当Value属性为属性为1(默认值默认值)时，将获得命令按时，将获得命令按钮的顺序号，它是一个数值；而当钮的顺序号，它是一个数值；而当Value属性设置为空时，属性设置为空时，将获得命令按钮的将获得命令按钮的Caption值，它是字符串。于是在命令值，它是字符串。于是在命令按钮组的按钮组的Click

8、事件代码中便可判别出单击的是哪个命令事件代码中便可判别出单击的是哪个命令按钮，并决定执行的动作。按钮，并决定执行的动作。(1)若命令按钮组及其所含的各命令按钮分别设置了若命令按钮组及其所含的各命令按钮分别设置了Click事事件代码，件代码，Visual FoxPro将以命令按钮的将以命令按钮的Click事件代码优事件代码优先。先。或或This.Commandl。 (1)容器本身的编辑：设计时若在表单上选定容器，就可编容器本身的编辑：设计时若在表单上选定容器，就可编辑该容器的属性、事件代码与方法程序，但不能编辑容器辑该容器的属性、事件代码与方法程序，但不能编辑容器中的对象。中的对象。 (2)容器

9、中对象的编辑：要编辑容器中的对象，须先激活容容器中对象的编辑：要编辑容器中的对象，须先激活容器。激活的方法是选定容器的快捷菜单中的【编辑】命令，器。激活的方法是选定容器的快捷菜单中的【编辑】命令，容器被激活的标志是其四周显示一个斜线边框，容器被激活的标志是其四周显示一个斜线边框，如图所示如图所示。容器激活后，用户便可选定其中的对象进行编辑。容器激活后，用户便可选定其中的对象进行编辑。6操作步骤如下：操作步骤如下：计算器的按钮部分用命令按钮组控件进行设计。向表单计算器的按钮部分用命令按钮组控件进行设计。向表单添加一个命令按钮组控件，在命令按钮组控件上单击右添加一个命令按钮组控件，在命令按钮组控件

10、上单击右键，选择【生成器】，在按钮选项卡中设置按钮数目为键，选择【生成器】，在按钮选项卡中设置按钮数目为16，并设置标题，并设置标题 。然后在。然后在“布局布局”页面中设置页面中设置“按钮布局按钮布局”为：水平。单击【确定】按钮，关闭生成为：水平。单击【确定】按钮，关闭生成器。设置命令按钮组控件的器。设置命令按钮组控件的Height属性值为属性值为140，在命令，在命令按钮组控件上单击右键，选择【编辑】，移动命令按钮，按钮组控件上单击右键，选择【编辑】，移动命令按钮，将所有命令按钮的将所有命令按钮的height和和Widdth均设置为：均设置为：25，设置，设置成成 的状态。其它部分外观的设计

11、同的状态。其它部分外观的设计同例例6-10，可以从可以从例例6-10的表单中复制过来。的表单中复制过来。 例例5-1 用命令按钮组设计计算器。用命令按钮组设计计算器。 设置命令按钮组控件设置命令按钮组控件Commandgroup1的的Value属性值为：属性值为：=“”这一步骤非常重要，如没有这一步，计算器的设置要这一步骤非常重要，如没有这一步，计算器的设置要复杂得多。复杂得多。在命令按钮组控件在命令按钮组控件Commandgroup1的的Click事件添加下事件添加下列代码：列代码：ENDIFIF This.Value= &如果单击了如果单击了“=”按钮按钮ELSE &如果单

12、击了除如果单击了除“=”以外的按钮以外的按钮Thisform.t=.F.ENDIF如图所示如图所示如图所示如图所示7编辑框编辑框 在编辑框中可以编辑长字符字段或备注字段中的在编辑框中可以编辑长字符字段或备注字段中的文本。编辑框中允许输入多段文本，也可以使用文本。编辑框中允许输入多段文本，也可以使用方向键、方向键、PageUp键、键、PageDown键、滚动条来键、滚动条来移动文本。编辑框只能处理字符型数据。移动文本。编辑框只能处理字符型数据。 编辑框的常用属性有：编辑框的常用属性有： AllowTabs：设置用户是否可以在编辑框中用：设置用户是否可以在编辑框中用Tab 键前后移动。如果允许，应

13、明确地指出用户键前后移动。如果允许，应明确地指出用户可以通过按可以通过按Ctrl+Tab移到下一个控件。移到下一个控件。ControlSource：设置将哪一个数据库的表的那：设置将哪一个数据库的表的那个字段的值显示在编辑框中。个字段的值显示在编辑框中。HideSelection：当编辑框没有焦点时选定文本：当编辑框没有焦点时选定文本是否以选定状态显示。是否以选定状态显示。 ReadOnly：设置用户是否可以改变编辑框的文：设置用户是否可以改变编辑框的文本。本。 ScrollBars：设置是否显示垂直滚动条。：设置是否显示垂直滚动条。 SelLength：返回用户在控制的文本区域中选定：返回用

14、户在控制的文本区域中选定的字符数目，或指定要选定的字符数目。的字符数目，或指定要选定的字符数目。SelStart：返回控件的文本输入区域中用户选择：返回控件的文本输入区域中用户选择文本的起始点。当没有选定文本时，指示插入点文本的起始点。当没有选定文本时，指示插入点的位置。另外，它还可以指定控件的文本输入区的位置。另外，它还可以指定控件的文本输入区域中选择的文本起始点。域中选择的文本起始点。 SelText：返回用户选定的文本，如果没有选定：返回用户选定的文本，如果没有选定任何文本，则返回空字符串任何文本，则返回空字符串 ()。或指定包含选。或指定包含选定文本的字符串。定文本的字符串。 8例例5

15、-2 建立一个表单，其外观建立一个表单，其外观如图所示如图所示并完成下列功能：并完成下列功能： 编辑框与某表文件的的编辑框与某表文件的的备注型字段绑定；备注型字段绑定；执行表单后，用户选择执行表单后，用户选择编辑框的内容，单击编辑框的内容，单击【确定】按钮，选定的【确定】按钮，选定的内容将在右边的文本框内容将在右边的文本框中出现。中出现。操作步骤如下：操作步骤如下： 先作准备工作，建立一个名为先作准备工作，建立一个名为WBKLB.DBF的表文件，包含的表文件，包含一个字段，字段名为：一个字段，字段名为：NR，类型为：，类型为：M，并输入一条记录的，并输入一条记录的内容，内容可从某个已有的文件或

16、帮助中复制过来。内容，内容可从某个已有的文件或帮助中复制过来。新建一个表单，设置表单的新建一个表单，设置表单的Caption属性值为：编辑框实例；属性值为：编辑框实例；为表单设置数据环境，在数据环境中添加表为表单设置数据环境，在数据环境中添加表WBKLB.DBF；在表单中添加一个编辑框控件，一个文本框控件，设置编辑在表单中添加一个编辑框控件，一个文本框控件，设置编辑框的框的ControlSourc属性为：属性为：WBKLB.NR；再在表单中添加；再在表单中添加一个命令按钮控件，设置该控件的一个命令按钮控件，设置该控件的Caption属性为：确定；属性为：确定；Click事件代码为：事件代码为：

17、9复选框和单选框复选框和单选框 复选框与选项按钮复选框与选项按钮(又译单选框又译单选框)是对话框中是对话框中的常见对象，复选框允许同时选择多项，选的常见对象，复选框允许同时选择多项，选项按钮则只能在多个选项中选择其中的一项。项按钮则只能在多个选项中选择其中的一项。所以复选框可以在表单中独立存在，选项按所以复选框可以在表单中独立存在，选项按钮只能存在于它的容器选项按钮组中。钮只能存在于它的容器选项按钮组中。 复选框控件复选框控件 选项按钮组控件选项按钮组控件 10复选框控件复选框控件 复选框控件用于指定布尔状态：真或假，开复选框控件用于指定布尔状态：真或假，开或关，打开或关闭。或关，打开或关闭。

18、复选框的常用属性有：复选框的常用属性有：Caption：该属性的值用来定义复选框的标题，：该属性的值用来定义复选框的标题，即说明该复选框的功能。即说明该复选框的功能。ControlSource：该属性值指定与该复选框对象：该属性值指定与该复选框对象绑定的数据源。绑定的数据源。Value：指定复选框的状态。：指定复选框的状态。 Value 属性的设置有：属性的设置有：设置设置说明说明0 （默认值）未选定。（默认值）未选定。1 选定。选定。2 灰色，该设置只在代码中可用。灰色，该设置只在代码中可用。Style：该属性的值用来定义复选框的外观，有：该属性的值用来定义复选框的外观，有：0-标准、标准、

19、1-图形两种可选值。图形两种可选值。11选项按钮组控件选项按钮组控件 选项按钮组常用来表示在一组可选的项目中，选项按钮组常用来表示在一组可选的项目中，同一时刻有且仅有一项可以被选中。同一时刻有且仅有一项可以被选中。在选项按钮组控件上单击鼠标右键，然后选在选项按钮组控件上单击鼠标右键，然后选择【编辑】，可以对选项组中的每一个选项择【编辑】，可以对选项组中的每一个选项按钮进行属性和事件代码的设置。按钮进行属性和事件代码的设置。 选项组常用的属性有：选项组常用的属性有：ButtonCount：设置组中选项的数目。：设置组中选项的数目。BackStyle：设置选项组的背景是否透明。：设置选项组的背景是

20、否透明。BorderStyle：定义选项组的边框。：定义选项组的边框。Value：表示被选中的按钮序号，默认值为：表示被选中的按钮序号，默认值为1。 选项的常用属性有：选项的常用属性有：Caption：定义选项的说明。：定义选项的说明。Value：设置选项是否被选中，：设置选项是否被选中，1表示选中，表示选中，0表示未选中。表示未选中。Style：该属性的值用来定义单选框的外观，有：该属性的值用来定义单选框的外观，有：0-标准、标准、1-图形两种可选值。图形两种可选值。选项按钮组控件也有生成器，用法同命令按钮选项按钮组控件也有生成器，用法同命令按钮组类似。这里不再详述，请看下面的例题。组类似。

21、这里不再详述，请看下面的例题。12例例5-3 建立一个表单，其外观建立一个表单，其外观并完成下列功能：并完成下列功能： 表单被执行时按表单被执行时按图所示的格式显图所示的格式显示日期和时间；示日期和时间；当用户改变格式当用户改变格式设置时，立刻按设置时，立刻按用户设置的格式用户设置的格式显示日期和时间；显示日期和时间； 操作步骤如下：操作步骤如下：新建一个表单，添加五个标签控件、两个文本框控件、新建一个表单，添加五个标签控件、两个文本框控件、两个选项按钮组，两个复选框控件、两个形状控件、两个选项按钮组，两个复选框控件、两个形状控件、一个计时器控件，并设置相应属性，使其外观如图一个计时器控件，并

22、设置相应属性，使其外观如图5-6所示，两个形状控件必须设置为所示，两个形状控件必须设置为“置后置后”。设置控件的关键属性，设置计时器控件的设置控件的关键属性，设置计时器控件的Interval属属性值为：性值为：10；设置两个文本框的；设置两个文本框的TabStop属性值属性值为：为：.F.-假；上面文本框的假；上面文本框的Width属性值为：属性值为：240；下；下面文本框的面文本框的Width属性值为：属性值为：210；其它属性值读者；其它属性值读者可参照已确定的属性值及图可参照已确定的属性值及图5-6的相对位置自定。的相对位置自定。在计时器控件的在计时器控件的time事件中添加以下代码：事

23、件中添加以下代码：DO CASE SET DATE TO YMD SET DATE TO MDY SET DATE TO DMY ENDCASEx=DOW(DATE() &用用DOW（）函数获取当前日期的星期数（）函数获取当前日期的星期数DO CASECASE x=1 &如果是星期日如果是星期日y=日日CASE x=2 &如果是星期一如果是星期一y=一一CASE x=3 &如果是星期二如果是星期二y=二二CASE x=4 &如果是星期三如果是星期三y=三三CASE x=5 &如果是星期四如果是星期四y=四四CASE x=6 &如果是星期五

24、如果是星期五y=五五CASE x=7 &如果是星期六如果是星期六y=六六ENDCASEELSE DO CASE ENDCASEENDIF SET HOURS TO 12*根据当前时间确定是上午，还是下午根据当前时间确定是上午，还是下午IF hour(DATETIME()12 ELSEENDIFELSE &如果用户选择如果用户选择24小时制小时制SET HOURS TO 24ENDIFELSE &如果用户选择不显示秒如果用户选择不显示秒ENDIF 如图所示如图所示13列表框和组合框列表框和组合框 列表框与组合框都有一个供用户选项的列表，列表框与组合框都有一个供用户选项的列

25、表，但两者之间有两个区别：但两者之间有两个区别：(1)列表框任何时候都显示它的列表，而组合框平列表框任何时候都显示它的列表，而组合框平时只显示一个项，待用户单击它的向下按钮后才时只显示一个项，待用户单击它的向下按钮后才能显示可滚动的下拉列表。若要节省空间，并且能显示可滚动的下拉列表。若要节省空间，并且突出当前选定的项时可使用组合框。突出当前选定的项时可使用组合框。(2)组合框又分下拉组合框与下拉列表框两类，前组合框又分下拉组合框与下拉列表框两类，前者允许键入数据项；而列表框与下拉列表框都仅者允许键入数据项；而列表框与下拉列表框都仅有选项功能。有选项功能。 14列表框控件列表框控件 生成器生成器

26、 列表框生成器含有列表项、布局、样式、值等列表框生成器含有列表项、布局、样式、值等4个选项卡，用于为列表框设置各种属性。个选项卡，用于为列表框设置各种属性。列表项选项卡列表项选项卡 样式选项卡样式选项卡 布局选项卡布局选项卡 值选项卡值选项卡 控件值源的类型控件值源的类型 列表框的常用属性列表框的常用属性 列表项选项卡列表项选项卡该选项卡用于指定要填充到列表框中的项。该选项卡用于指定要填充到列表框中的项。填充项可以是填充项可以是3种类型数据之一：表或视图中的种类型数据之一：表或视图中的字段、手工输入的数据或数组中的值。字段、手工输入的数据或数组中的值。 表或视图中的字段表或视图中的字段 手工输

27、入数据手工输入数据数组中的值数组中的值 样式选项卡该选项卡用于指定列表框的样式，所显示的行该选项卡用于指定列表框的样式，所显示的行数，要否递增搜索。下面仅说明显示行数的设数，要否递增搜索。下面仅说明显示行数的设置。置。“要显示的行数要显示的行数”微调控件用来调整列表框的微调控件用来调整列表框的显示行数，但是仅在文本选取显示行数，但是仅在文本选取7号字时所设置号字时所设置的行数与实际项数相符。原因是该微调控件的的行数与实际项数相符。原因是该微调控件的设置实际上改变了列表框的设置实际上改变了列表框的Height属性，而属性，而Visual FoxPro则按象素来指定高度。则按象素来指定高度。 布局

28、选项卡布局选项卡含有布局选项卡含有1个复选框和个复选框和1个表格，用于个表格，用于控制列表框的列宽和显示。控制列表框的列宽和显示。1)“调整列表框的宽度来显示所有列调整列表框的宽度来显示所有列”复选框：该选复选框：该选项自动设置了项自动设置了Width属性，能根据列表项选项卡中属性，能根据列表项选项卡中微调控件指定的列数自动调整列表框的宽度。微调控件指定的列数自动调整列表框的宽度。2)表格：表格中显示了在列表项选项卡中定义的列，表格：表格中显示了在列表项选项卡中定义的列，并可用鼠标拖动列标头右边的列间隔线来调整列并可用鼠标拖动列标头右边的列间隔线来调整列宽，相当于修改了宽，相当于修改了Co1u

29、mnWidths属性。双击列属性。双击列标头还可隐藏该列，使得表单执行时该列不显示，标头还可隐藏该列，使得表单执行时该列不显示，但其数据仍起作用。但其数据仍起作用。 值选项卡值选项卡包含两个组合框，分别用来指定返值选项卡包含两个组合框，分别用来指定返回值的列以及存储返回值的字段。回值的列以及存储返回值的字段。1)“从哪一列中返回值从哪一列中返回值”组合框：该组合框的操作对组合框：该组合框的操作对应于应于BoundColumn属性。组合框列表中包含字属性。组合框列表中包含字段名或表示列号的选项，供用户决定列表框返回段名或表示列号的选项，供用户决定列表框返回值的字段或列。值的字段或列。2)字段名组

30、合框：该组合框的操作对应于字段名组合框：该组合框的操作对应于ControlSource属性，用来指定存储返回值的字属性，用来指定存储返回值的字段。段。 控件值源的类型控件值源的类型 列表框和组合框的列表中可以填充各类数据，列表框和组合框的列表中可以填充各类数据，在上述的列表框生成器中，已涉及值，数组在上述的列表框生成器中，已涉及值，数组和字段和字段3种类型，实际上共有种类型，实际上共有9类它们均由类它们均由RowSourceType属性来指定，属性来指定，RowSourceType 属性的可取值如表属性的可取值如表5-1所示：所示： 列表框的常用属性列表框的常用属性 MoverBars：设置列

31、表框的左侧是否显示移动：设置列表框的左侧是否显示移动按钮。按钮。MultiSelect：设置用户是否可以同时在列表中：设置用户是否可以同时在列表中选择多项。选择多项。Value：返回列表框中选定的项，如果有多列，：返回列表框中选定的项，如果有多列，返回由返回由BoundColumn属性指定的列的内容。属性指定的列的内容。DisplayValue：返回列表框中选定的项第一列：返回列表框中选定的项第一列的内容。的内容。 15例例5-4 设计一个表单，实现设计一个表单，实现 的简易数学用表。的简易数学用表。 原数取原数取1100。 操作步骤如下：操作步骤如下：新建一个表单，向表单添加五个标签控件，一

32、新建一个表单，向表单添加五个标签控件，一个列表框控件，并设置相关属性。个列表框控件，并设置相关属性。设置列表框控件设置列表框控件List1的属性的属性ColumnCount的的值为值为5，说明含有，说明含有5列；属性列；属性ColumnWidth的的值为：值为：30,40,50,50,150，确定，确定5列各自的宽度。列各自的宽度。在控件在控件List1的的Init事件中添加如下代码：事件中添加如下代码： FOR i=1 to 100n=STR(i,3)This.AddListItem(n,i,1)n=STR(i*i,5)This.AddListItem(n,i,2)n=STR(SQRT(i)

33、,7,4)This.AddListItem(n,i,3)n=STR(LOG(i),7,4)This.AddListItem(n,i,4)n=STR(EXP(i),17,4)This.AddListItem(n,i,5)ENDFOR如图所示如图所示16组合框控件组合框控件 组合框是列表框和文本框的组合。组合框有组合框是列表框和文本框的组合。组合框有两种类型：两种类型：下拉式组合框下拉式组合框, Style属性的值是属性的值是0时时下拉式列表框，下拉式列表框，Style属性的值是属性的值是2时时组合框控件也有生成器，用法与列表框完全组合框控件也有生成器，用法与列表框完全相同相同 除了生成器提到的属

34、性外，组合框的常用属除了生成器提到的属性外，组合框的常用属性还有：性还有： Value属性属性 DisplayValue属性属性 ListCount属性属性 ListIndex属性属性 List属性属性 Selected属性属性 功能：返回组合框中选定的项，如果有多列，功能：返回组合框中选定的项，如果有多列，返回由返回由BoundColumn属性指定的列的内容。属性指定的列的内容。 功能：返回组合框中选定的项第一列的内容。功能：返回组合框中选定的项第一列的内容。也可返回用户输入的内容。也可返回用户输入的内容。 功能：返回组合框或列表框中列表项的个数。功能：返回组合框或列表框中列表项的个数。说明

35、：该属性在设计时不可用，运行时为只读说明：该属性在设计时不可用，运行时为只读属性。即仅可取用属性值，不可进行设置。属性。即仅可取用属性值，不可进行设置。 格式：格式：Control.ListIndex=nIndex 功能：返回或设置组合框功能：返回或设置组合框(列表框列表框)列表显示时列表显示时选定项的顺序号。选定项的顺序号。说明：说明：(1)本属性用顺序号来表示某项已被选定。本属性用顺序号来表示某项已被选定。nIndex则则代表要设置的顺序号，可取代表要设置的顺序号，可取1到到ListCount之间的整之间的整数之一。数之一。nIndex的缺省值是的缺省值是0，表示没有选定列表项。对于下，表

36、示没有选定列表项。对于下拉组合框，当列表中没有与键入值相同的项时就返拉组合框，当列表中没有与键入值相同的项时就返回回0。(2)本属性设计时不可用，运行时可读写。本属性设计时不可用，运行时可读写。 格式：格式：Control.List(nRow,nCol )功能：返回组合框或列表框第功能：返回组合框或列表框第nRow行，行，nCol列的内容。列的内容。 格式：格式：control.Selected(nIndex)=IExpr 功能：用于分辨组合框或列表框中某一列表项功能：用于分辨组合框或列表框中某一列表项是否被选中。当选中时是否被选中。当选中时Selected属性返回属性返回.T.，否则返回否则

37、返回.F.。说明：说明：(1)nIndex表示列表项的显示顺序号；表示列表项的显示顺序号；(3)本属性设计时不可用，运行时可读写。本属性设计时不可用，运行时可读写。 17微调控件微调控件 微调控件的常用属性有：微调控件的常用属性有：Increment：用户点按向上或向下按钮时每次增大或减小：用户点按向上或向下按钮时每次增大或减小的值。的值。KeyboardHighValue：能输入到微调控件文本框中的最：能输入到微调控件文本框中的最大值。大值。KeyboardLowValue：能输入到微调控件文本框中的最：能输入到微调控件文本框中的最小值。小值。SpinnerHighValue：用户按向上按钮

38、时能达到的最大值。：用户按向上按钮时能达到的最大值。SpinnerLowValue：用户按向下按钮时能达到的最小值。：用户按向下按钮时能达到的最小值。Value：返回用户设置的值。：返回用户设置的值。 18例例5-5 设计新增人事数据的表单设计新增人事数据的表单 要求充分利用新学的知识，设计表单时尽量为用户着想，为要求充分利用新学的知识，设计表单时尽量为用户着想，为用户提供方便。用户提供方便。 设计步骤如下：设计步骤如下：利用数据环境向表单快速添利用数据环境向表单快速添加控件：用鼠标指向加控件：用鼠标指向RSB表表的字段行，按下鼠标左键拖的字段行，按下鼠标左键拖曳到表单的左上角，释放鼠曳到表单

39、的左上角，释放鼠标则产生如图所示的表单，标则产生如图所示的表单，默认表单不够大，可拖曳表默认表单不够大，可拖曳表单边框到足够大，就可以看单边框到足够大，就可以看到所有的控件。到所有的控件。 对于性别字段的输入，只有对于性别字段的输入，只有两种可取值，没有必要让用两种可取值，没有必要让用户输入户输入“男男”或或“女女”，可，可利用选项按钮组控件，如图利用选项按钮组控件，如图5-12所示，由用户单击鼠标所示，由用户单击鼠标就可选定就可选定“男男”或或“女女”。所以需将已有的与性别绑定所以需将已有的与性别绑定的文本框删除。的文本框删除。操作如下：在表单空表操作如下：在表单空表处单击鼠标，取消对所处单

40、击鼠标，取消对所有控件的选择，选择与有控件的选择，选择与性别绑定的文本框，按性别绑定的文本框，按Delete键删除。添加一键删除。添加一个选项按钮组，设置成个选项按钮组，设置成如图如图5-13右上角所示的右上角所示的外观。外观。对于对于“部门代码部门代码”字段的值要字段的值要利用利用BMDM表的内容，删除与表的内容，删除与“部门代码部门代码”绑定的文本框，绑定的文本框，添加一个组合框控件，在组合添加一个组合框控件，在组合框上单击鼠标右键，选择【生框上单击鼠标右键，选择【生成器】，对成器】，对“列表项列表项”页面设页面设置成如图置成如图5-14所示，对所示，对“值值”页面设置成如图页面设置成如图

41、5-15所示，其所示，其它两个页面不变，最后单击它两个页面不变，最后单击【确定】确认设置。【确定】确认设置。删除与删除与“出生日期出生日期”和和“工作日期工作日期”绑定的文本框，保留相应的标签，添绑定的文本框，保留相应的标签，添加两个微调控件、一个组合框控件、加两个微调控件、一个组合框控件、一个形状控件和三个标签控件，并调一个形状控件和三个标签控件，并调整成第二行的外观。提示：形状控件整成第二行的外观。提示：形状控件要置后。在组合框上单击鼠标右键，要置后。在组合框上单击鼠标右键，选择【生成器】，对选择【生成器】，对“列表项列表项”页面页面设置，表格中的数一直输入到设置，表格中的数一直输入到12

42、，其它三个页面不变，最后单击【确定】其它三个页面不变，最后单击【确定】确认设置。并设置两个微调控件的属确认设置。并设置两个微调控件的属性示性示选定输入年月日的所有控件，如选定输入年月日的所有控件，如图图5-17所示。单击所示。单击“复制复制”按钮，按钮，再单击再单击“粘帖粘帖”按钮，这样就有按钮，这样就有了两个输入日期的控件，再将了两个输入日期的控件，再将Spinner1、Spinner2、Spinner3、Spinner4的的Value属属性分别设置为：性分别设置为：1960，1，1949，1作为默认值。作为默认值。 对于对于“职称职称”字段，也需作处理，字段，也需作处理，为给用户提供更方便

43、的输入界面，为给用户提供更方便的输入界面，删除与删除与“职称职称”绑定的文本框，绑定的文本框，添加一个组合框控件，在组合框添加一个组合框控件，在组合框上单击鼠标右键，选择【生成上单击鼠标右键，选择【生成器】，对器】，对“列表项列表项”页面设置成页面设置成如图如图5-15所示，对所示，对“值值”页面设页面设置成如图置成如图5-19所示，其它两个页所示，其它两个页面不变，最后单击【确定】确认面不变，最后单击【确定】确认设置。设置。对于对于“相片相片”字段，也需作处理，字段，也需作处理，为美观起见，添加一个形状控件，为美观起见，添加一个形状控件，使其置后，并设置成三维。为给使其置后，并设置成三维。为

44、给用户提供更方便的输入界面，添用户提供更方便的输入界面，添加一个命令按钮，将命令按钮的加一个命令按钮，将命令按钮的外观设置成如图外观设置成如图5-13所示，相片所示，相片标签下的命令按钮形状，并设置标签下的命令按钮形状，并设置该命令按钮的该命令按钮的Click事件的代码为：事件的代码为：filename=GETPICT() &利用利用getpict()函数打开选择图函数打开选择图片的对话框片的对话框APPEND GENERAL 相片相片 FROM &filename &将选将选取的图片放到当前记录的相片字段中取的图片放到当前记录的相片字段中Thisform.Refres

45、h() &刷新表单的显示，目的是让刚选刷新表单的显示，目的是让刚选的图显示出来的图显示出来 调整各控件的位置如图调整各控件的位置如图5-13所示，添加两个线条控件、所示，添加两个线条控件、两个命令按钮控件，线条的两个命令按钮控件，线条的颜色一条设置成深灰、一条颜色一条设置成深灰、一条设置成白色，两条紧埃着，设置成白色，两条紧埃着，形成立体效果。形成立体效果。添加控件代码：添加控件代码：Init事件代码事件代码 “保存保存”按钮的按钮的Click事件代码事件代码 “取消退出取消退出”命令按钮的命令按钮的Click事件代码事件代码 四个组合框控件的四个组合框控件的Init事件代码事件代码

46、选项按钮组的选项按钮组的Click事件的代码事件的代码 与职称绑定组合框控件的与职称绑定组合框控件的LostFocus事件的代码事件的代码 19表格控件表格控件 Visual FoxPro提供了一个强大的工具来显示提供了一个强大的工具来显示和操作多行数据，这就是表格。表格是一个和操作多行数据，这就是表格。表格是一个容器对象，像表单集能包含多个表单一样，容器对象，像表单集能包含多个表单一样，它可以包含多个列。另外，列可以包含表头它可以包含多个列。另外，列可以包含表头和控件，并且每一部分都有自己的属性、事和控件，并且每一部分都有自己的属性、事件和方法。件和方法。 表格的组成表格的组成 在表单窗口添

47、加表格控件在表单窗口添加表格控件 表格编辑表格编辑 表格的常用属性表格的常用属性 用表格控件建立一对多表单用表格控件建立一对多表单 (1)表格表格(Grid)：由一或若干列组成：由一或若干列组成(2)列列(Column)：一列可显示表的一个字段，列由：一列可显示表的一个字段，列由列标题和列控件组成。列标题和列控件组成。(3)列标题列标题(例如：例如：Headerl)：默认显示字段名，允：默认显示字段名，允许修改。许修改。(4)列控件列控件(例如：例如：Textl)；一列必须设置一个列控；一列必须设置一个列控件，该列中的每个单元格都可用此控件来显示字件，该列中的每个单元格都可用此控件来显示字段值

48、。列控件默认为文本框段值。列控件默认为文本框 从数据环境创建从数据环境创建 利用表格生成器创建利用表格生成器创建 表格项选项卡表格项选项卡 样式选项卡样式选项卡 布局选项卡布局选项卡 关系选项卡关系选项卡 交互式创建交互式创建修改列标题修改列标题前已提到，在表格生成器的标题文本框中可以修改列前已提到，在表格生成器的标题文本框中可以修改列标题。此外还有下面两种方法。标题。此外还有下面两种方法。b. 在属性窗口对象列表中按照从容器到对象的次序，在属性窗口对象列表中按照从容器到对象的次序，找到找到Headerl对象后，选择该对象作为当前对象，然对象后，选择该对象作为当前对象，然后修改其后修改其Cap

49、tion属性。属性。 调整表格的行高与列宽调整表格的行高与列宽b. 调整行高：标题栏行和内容行的调整方法略有不同。调整行高：标题栏行和内容行的调整方法略有不同。表格激活后，若调整标题栏高度，可将鼠标指针置于表格激活后，若调整标题栏高度，可将鼠标指针置于表格标题栏行首按钮的下框线处，当指针变成带有上表格标题栏行首按钮的下框线处，当指针变成带有上下双向箭头的横条后，即可上下拖动行线来改变高度。下双向箭头的横条后，即可上下拖动行线来改变高度。调整内容行高度时，应将鼠标指针置于表格内容第调整内容行高度时，应将鼠标指针置于表格内容第1行行行首按钮的下框线处，然后上下拖动行线来改变行高。行首按钮的下框线处

50、，然后上下拖动行线来改变行高。此时，所有内容行的高度将统一变化。此时，所有内容行的高度将统一变化。 若要禁止用户在运行时擅自改变表格标题栏的高若要禁止用户在运行时擅自改变表格标题栏的高度，可将表格的度，可将表格的AllowHeaderSizing属性设置属性设置为为.F.；若表格的；若表格的AllowRowSizing属性为属性为.F.，则，则禁止改变表格内容行的高度。禁止改变表格内容行的高度。列的增删列的增删a. 在表格的在表格的ColumnCount属性中设置表格的列数，从属性中设置表格的列数，从而改变表格的列数。而改变表格的列数。b. 打开表格生成器，在表格项选项卡中可增加或减少字打开表

51、格生成器，在表格项选项卡中可增加或减少字段。段。c. 要删除列，可在属性窗口中选定某列后按要删除列，可在属性窗口中选定某列后按Del健。健。列属性列属性ControlSource：指定某表的某字段作为本列的数据：指定某表的某字段作为本列的数据源。源。CurrentControl：为列指定控件。：为列指定控件。 在数据环境中建立一对多表单的步骤如下：在数据环境中建立一对多表单的步骤如下：从数据环境设计器的父表中把期望的字段拖动到表单从数据环境设计器的父表中把期望的字段拖动到表单里。里。从数据环境设计器中把相关的子表拖动到表单里。从数据环境设计器中把相关的子表拖动到表单里。表格属性表格属性Chil

52、dOrder：与父表的主关键字相连接的子表的外部：与父表的主关键字相连接的子表的外部关键字。关键字。ColumnCount：列数。如果：列数。如果ColumnCount设置为设置为-1，表格的列数与表格的列数与RecordSource中的字段数相同。中的字段数相同。LinkMaster：在表格中显示的子记录的父表。：在表格中显示的子记录的父表。RecordSource：显示在表格中的数据源。：显示在表格中的数据源。RecordSourceType：显示在表格中的数据类型。：显示在表格中的数据类型。20例例5-6 设计一个按部门浏览人事表设计一个按部门浏览人事表记录的表单。记录的表单。 设计步骤

53、如下：设计步骤如下：建立一个新表单，为该表单添加数据环境，在数据环境建立一个新表单，为该表单添加数据环境，在数据环境中添加表中添加表BMDM和表和表RSB，将表，将表BMDM的的“部门名称部门名称”字段从数据环境中拖到表单中，在表单中将出现一个文字段从数据环境中拖到表单中，在表单中将出现一个文本框控件，该控件的本框控件，该控件的ControlSource属性将自动设置为属性将自动设置为BMDM.部门名称。在部门名称。在RSB的标题处按下鼠标拖到表单中，的标题处按下鼠标拖到表单中，将出现一个表格控件，该控件的将出现一个表格控件，该控件的RecordSourceType属属性自动被设置为性自动被设

54、置为1-别名，别名，RecordSource属性自动被设置属性自动被设置为：为：RSB。 在表单中添加一个命在表单中添加一个命令按钮组控件，并设令按钮组控件，并设置相应属性使其外观置相应属性使其外观如图如图5-20所示，注意所示，注意需将需将“上一条上一条”命令命令按钮的按钮的Enabled属性属性设置为设置为.F.。设置命令。设置命令按钮组的按钮组的Click事件的事件的代码为：代码为：IF This.Value=1 &如果用户单击了如果用户单击了“上一条上一条”命令按钮命令按钮SKIP -1 &让表指针向前跳一步让表指针向前跳一步ELSE &如果用户单击了如果用户单

55、击了“下一条下一条”命令按钮命令按钮SKIP &让表指针向后跳一步让表指针向后跳一步ENDIFDO CASECASE RECNO()=1 &如果表指针指向第一条记录如果表指针指向第一条记录CASE RECNO()=RECCOUNT() &如果表指针指向最后一条记录如果表指针指向最后一条记录OTHERWISE &如果表指针指向中间某条记录如果表指针指向中间某条记录ENDCASEThisform.Refresh &刷新表单的显示刷新表单的显示 最后以最后以fzbd.scx为文件名为文件名保存表单。然后执行表单，保存表单。然后执行表单，当用户单击下一条或上一当

56、用户单击下一条或上一条时，对于文本框中显示条时，对于文本框中显示的一个父表的部门名称，的一个父表的部门名称，在子表中将列出所有属于在子表中将列出所有属于该部门的职工记录信息，该部门的职工记录信息，如图如图5-21所示。这是由于所示。这是由于我们在两个表之间建立了我们在两个表之间建立了一对多的关系一对多的关系。21页框控件页框控件 页框是一个包含页面的容器对象，用户可在页框是一个包含页面的容器对象，用户可在页框中定义多个页面，以生成带选项卡的对页框中定义多个页面，以生成带选项卡的对话框。话框。 在表单中添加页框控件的步骤为：在表单中添加页框控件的步骤为：在表单控制工具栏中单页框控件按钮；在表单控

57、制工具栏中单页框控件按钮；移动鼠标指针到表单中，单击并拖拽到合适的大移动鼠标指针到表单中，单击并拖拽到合适的大小；小；页框的常用属性有：页框的常用属性有：PageCount：设置页框中页面的个数。：设置页框中页面的个数。页面的常用属性有：页面的常用属性有：Caption：设置页面的名称。：设置页面的名称。 在页框中选择不同页面的步骤如下：在页框中选择不同页面的步骤如下：在页框中单击鼠标右键，选择编辑，则页框呈现在页框中单击鼠标右键，选择编辑，则页框呈现出选中状态，边框变粗；出选中状态，边框变粗；单击要选择的页面标签。单击要选择的页面标签。在页面中加入控件的步骤如下：在页面中加入控件的步骤如下：

58、选中要加入控件的页面；选中要加入控件的页面；在表单控制工具栏中单击所需控件，移动鼠标到在表单控制工具栏中单击所需控件，移动鼠标到所选页面中，单击并拖拽到合适大小。所选页面中，单击并拖拽到合适大小。 22例例5-7 建立一个建立一个 及及 所示含有两所示含有两个页面的增加及浏览人事数据的表单。个页面的增加及浏览人事数据的表单。 如图如图1图图2设计步骤如下：设计步骤如下：打开打开RSBWH表单，选中所有控件，单击常用工具栏的【复表单，选中所有控件，单击常用工具栏的【复制】按钮，在页框控件上单击鼠标右键，选择【编辑】菜单制】按钮，在页框控件上单击鼠标右键，选择【编辑】菜单项，单击常用工具栏的【粘贴

59、】按钮，并调整控件到合适的项，单击常用工具栏的【粘贴】按钮，并调整控件到合适的位置，如图位置，如图1所示。并将所示。并将RSBWH表单的表单的Init事件的代码复制事件的代码复制到当前表单的到当前表单的Init事件中；将事件中；将RSBWH表单数据环境的表单数据环境的Opentables和和Closetables事件的代码复制到当前表单的相事件的代码复制到当前表单的相应事件中。应事件中。 将数据环境窗口显示出来，单击页框的第二个页面。拖拽将数据环境窗口显示出来，单击页框的第二个页面。拖拽RSB表（鼠标指针指向表（鼠标指针指向RSB的标题行，然后单击并拖拽）到的标题行，然后单击并拖拽）到页框的第

60、二个页面上，并调整表格到合适的位置，如图页框的第二个页面上，并调整表格到合适的位置，如图2所示。所示。添加添加Page1的的Click事件的代码为：事件的代码为：GO BOTTOM &确保回到页面确保回到页面1时表指针指向最后一条记录。时表指针指向最后一条记录。以以ykbd为文件名保存该表单，然后执行表单，将出现如图为文件名保存该表单，然后执行表单，将出现如图1所示的表单，在表单中单击第二个页面，将显示一个表格，所示的表单，在表单中单击第二个页面，将显示一个表格，如图如图2所示。表格中列出表的记录。所示。表格中列出表的记录。 23超级连接超级连接 超级链接对象含有一个超级链接对象含有一个NavigateTo方法程序，方法程序，它允许用户指定一个网址，执行该方法程序它允许用户指定一个网址，执行该方法程序时时Visual FoxPro就会启动因特网浏览器，并就会启动