表单设计概要.pptx

《表单设计概要.pptx》由会员分享，可在线阅读，更多相关《表单设计概要.pptx（74页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、2023/2/181常用控件列表框和组合框控件 微调控件 表格和页框控件 命令按钮组控件 第1页/共74页2023/2/182 列表框和组合框 列表框与组合框都有一个供用户选项的列表，但两者之间有两个区别：列表框任何时候都显示它的列表，而组合框平时只显示一个项，待用户单击它的向下按钮后才能显示可滚动的下拉列表。若要节省空间，并且突出当前选定的项时可使用组合框。组合框又分下拉组合框与下拉列表框两类，前者允许键入数据项；而列表框与下拉列表框都仅有选项功能。第2页/共74页2023/2/183列表框控件生成器 列表框生成器含有列表项、布局、样式、值等4个选项卡，用于为列表框设置各种属性。列表项选项卡

2、 样式选项卡 布局选项卡 值选项卡第3页/共74页2023/2/184列表框控件列表项选项卡该选项卡用于指定要填充到列表框中的项。填充项可以是3种类型数据之一：表或视图中的字段、手工输入的数据或数组中的值。表或视图中的字段 手工输入数据数组中的值 第4页/共74页2023/2/185列表框控件样式选项卡该选项卡用于指定列表框的样式，所显示的行数，要否递增搜索。“要显示的行数”微调控件用来调整列表框的显示行数，但是仅在文本选取7号字时所设置的行数与实际项数相符。原因是该微调控件的设置实际上改变了列表框的Height属性，而Visual FoxPro则按象素来指定高度。第5页/共74页2023/2

3、/186列表框控件布局选项卡布局选项卡含有1个复选框和1个表格，用于控制列表框的列宽和显示。1)“调整列表框的宽度来显示所有列”复选框：该选项自动设置了Width属性，能根据列表项选项卡中微调控件指定的列数自动调整列表框的宽度。2)表格：表格中显示了在列表项选项卡中定义的列，并可用鼠标拖动列标头右边的列间隔线来调整列宽，相当于修改了Co1umnWidths属性。双击列标头还可隐藏该列，使得表单执行时该列不显示，但其数据仍起作用。第6页/共74页2023/2/187列表框控件值选项卡值选项卡包含两个组合框，分别用来指定返回值的列以及存储返回值的字段。1)“从哪一列中返回值”组合框：该组合框的操作

4、对应于BoundColumn属性。组合框列表中包含字段名或表示列号的选项，供用户决定列表框返回值的字段或列。2)字段名组合框：该组合框的操作对应于ControlSource属性，用来指定存储返回值的字段。第7页/共74页2023/2/188列表框控件控件值源的类型 列表框和组合框的列表中可以填充各类数据，在上述的列表框生成器中，已涉及值，数组和字段3种类型，实际上共有9类它们均由RowSourceType属性来指定，RowSourceType 属性的可取值如表7-5所示：第8页/共74页2023/2/189列表框控件第9页/共74页2023/2/1810列表框控件列表框的常用属性 MoverB

5、ars：设置列表框的左侧是否显示移动按钮。MultiSelect：设置用户是否可以同时在列表中选择多项。Value：返回列表框中选定的项，如果有多列，返回由BoundColumn属性指定的列的内容。DisplayValue：返回列表框中选定的项第一列的内容。第10页/共74页2023/2/1811列表框控件举例例7-5 设计一个如图 所示的查询表单，其功能是：用户可在文本框中输入性别，然后查询出RSB表中相应性别的所有人的名字，并在列表框中显示出来。第11页/共74页2023/2/1812列表框控件举例操作步骤如下：在Visual FoxPro中新建一个表单窗口；按上图所示，在该表单窗口中分别

6、创建一个标签对象、一个文本框对象、一个列表框对象，调整它们的大小并摆放到相应的位置；设置各控件的属性如表7-6所示 第12页/共74页2023/2/1813列表框控件举例第13页/共74页2023/2/1814列表框控件举例在 Text1 的 Valid 事件中输入下列代码：SELECT 姓名 FROM rsb;WHERE 性别=ALLT(This.Value);INTO CURS pp第14页/共74页2023/2/1815组合框控件 组合框是列表框和文本框的组合。组合框有两种类型：下拉式组合框,Style属性的值是0时下拉式列表框，Style属性的值是2时组合框控件也有生成器，用法与列表框

7、完全相同 除了生成器提到的属性外，组合框的常用属性还有：第15页/共74页2023/2/1816组合框的常用属性Value属性功能：返回组合框中选定的项，如果有多列，返回由BoundColumn属性指定的列的内容。DisplayValue属性功能：返回组合框中选定的项第一列的内容。也可返回用户输入的内容。第16页/共74页2023/2/1817组合框的常用属性ListCount属性功能：返回组合框或列表框中列表项的个数。说明：该属性在设计时不可用，运行时为只读属性。即仅可取用属性值，不可进行设置。第17页/共74页2023/2/1818组合框的常用属性ListIndex属性格式：Control

8、.ListIndex=nIndex 功能：返回或设置组合框(列表框)列表显示时选定项的顺序号。说明：(1)本属性用顺序号来表示某项已被选定。nIndex则代表要设置的顺序号，可取1到ListCount之间的整数之一。nIndex的缺省值是0，表示没有选定列表项。对于下拉组合框，当列表中没有与键入值相同的项时就返回0。(2)本属性设计时不可用，运行时可读写。第18页/共74页2023/2/1819组合框的常用属性List属性格式：Control.List(nRow,nCol)功能：返回组合框或列表框第nRow行，nCol列的内容。第19页/共74页2023/2/1820组合框的常用属性Selec

9、ted属性格式：control.Selected(nIndex)=IExpr 功能：用于分辨组合框或列表框中某一列表项是否被选中。当选中时Selected属性返回.T.，否则返回.F.。说明：(1)nIndex表示列表项的显示顺序号；(2)IExpr可取.T.或.F.之一，用来设置属性值；(3)本属性设计时不可用，运行时可读写。第20页/共74页2023/2/1821组合框控件举例例7-6设计一个如图所示的查询表单，要求当表单执行时,用户在组合框中选择了哪一条记录,哪一条记录的内容就在下面显示出来。第21页/共74页2023/2/1822组合框控件举例操作步骤如下：在Visual FoxPro

10、中新建一个表单窗口；按上图所示，在该表单窗口中分别创建一个标签对象、一个组合框对象。调整它们的大小并摆放到表单上方相应的位置；设置各控件的属性如表7-7所示。第22页/共74页2023/2/1823组合框控件举例第23页/共74页2023/2/1824组合框控件举例添加数据环境RSB，将RSB的相应字段拖拽到表单，并调整对象的位置如图7-12所示。为组合框Combo1的Click事件中输入下列代码：LOCAT FOR 编号=ALLTRIM(This.Value)Thisform.Refresh 为组合框Combo1的Init事件中输入下列代码：This.ListIndex=1 第24页/共74

11、页2023/2/1825 微调控件 微调控件的常用属性有：Increment：用户点按向上或向下按钮时每次增大或减小的值。KeyboardHighValue：能输入到微调控件文本框中的最大值。KeyboardLowValue：能输入到微调控件文本框中的最小值。SpinnerHighValue：用户按向上按钮时能达到的最大值。SpinnerLowValue：用户按向下按钮时能达到的最小值。Value：返回用户设置的值。第25页/共74页2023/2/1826微调控件举例例7-7设计一个如图所示的表单，要求当表单执行时,用户在微调控件中设置好年月日，当用户单击确定时，用户设定的日期将在文本框中显示

12、出来。第26页/共74页2023/2/1827微调控件举例操作步骤如下：在Visual FoxPro中新建一个表单窗口；按上图所示，在该表单窗口中分别创建一个文本框对象、一个命令按钮对象、三个微调对象、三个标签对象。调整它们的大小并摆放到相应的位置；设置各控件的属性如表7-8所示 第27页/共74页2023/2/1828微调控件举例第28页/共74页2023/2/1829微调控件举例第29页/共74页2023/2/1830微调控件举例为 命令按钮Command1的 Click 事件中输入下列代码：t=+x+/+y+/+z+第30页/共74页2023/2/1831 表格控件 Visual Fox

13、Pro提供了一个强大的工具来显示和操作多行数据，这就是表格。表格是一个容器对象，像表单集能包含多个表单一样，它可以包含多个列。另外，列可以包含表头和控件，并且每一部分都有自己的属性、事件和方法。第31页/共74页2023/2/1832表格控件表格的组成表格(Grid)：由一或若干列组成列(Column)：一列可显示表的一个字段，列由列标题和列控件组成。列标题(例如：Headerl)：默认显示字段名，允许修改。列控件(例如：Textl)；一列必须设置一个列控件，该列中的每个单元格都可用此控件来显示字段值。列控件默认为文本框 第32页/共74页2023/2/1833表格控件在表单窗口添加表格控件从

14、数据环境创建 利用表格生成器创建 表格项选项卡 样式选项卡 布局选项卡 关系选项卡 交互式创建第33页/共74页2023/2/1834表格编辑修改列标题前已提到，在表格生成器的标题文本框中可以修改列标题。此外还有下面两种方法。用代码修改：例如”名称”，可将表格中第2列的标题修改为：名称。在属性窗口对象列表中按照从容器到对象的次序，找到Headerl对象后，选择该对象作为当前对象，然后修改其Caption属性。第34页/共74页2023/2/1835表格编辑调整表格的行高与列宽 调整列宽：表格激活后，将鼠标指针置于表格两列标题之间，这时指针变为带有左右双向箭头的竖条，便可左右拖动列线来改变列宽另

15、一种方法是设置列的Width属性，例如令调整行高：标题栏行和内容行的调整方法略有不同。表格激活后，若调整标题栏高度，可将鼠标指针置于表格标题栏行首按钮的下框线处，当指针变成带有上下双向箭头的横条后，即可上下拖动行线来改变高度。调整内容行高度时，应将鼠标指针置于表格内容第1行行首按钮的下框线处，然后上下拖动行线来改变行高。此时，所有内容行的高度将统一变化。第35页/共74页2023/2/1836表格编辑若要禁止用户在运行时擅自改变表格标题栏的高度，可将表格的AllowHeaderSizing属性设置为.F.；若表格的AllowRowSizing属性为.F.，则禁止改变表格内容行的高度。第36页/

16、共74页2023/2/1837表格编辑列的增删a.在表格的ColumnCount属性中设置表格的列数，从而改变表格的列数。b.打开表格生成器，在表格项选项卡中可增加或减少字段。c.要删除列，可在属性窗口中选定某列后按Del健。第37页/共74页2023/2/1838表格的常用属性表格属性ChildOrder：与父表的主关键字相连接的子表的外部关键字。ColumnCount：列数。如果ColumnCount设置为-1，表格的列数与RecordSource中的字段数相同。LinkMaster：在表格中显示的子记录的父表。RecordSource：显示在表格中的数据源。RecordSourceTyp

17、e：显示在表格中的数据类型。AllowAddNew：该属性为.T.时允许用户向表格中的表添加记录。该属性为.F.(默认值)时，只能用APPEND BLANK或INSERT命令来添加记录。第38页/共74页2023/2/1839表格的常用属性列属性ControlSource：指定某表的某字段作为本列的数据源。CurrentControl：为列指定控件。Spares：取值为.T.(默认值)时，在列表中只有选中的单元格以CurrentControl指定的控件显示，其它单元格仍以文本框显示。取值为.F.时，该列的所有单元格均以CurrentControl指定的控件显示。第39页/共74页2023/2/

18、1840用表格控件建立一对多表单在数据环境中建立一对多表单的步骤如下：从数据环境设计器的父表中把期望的字段拖动到表单里。从数据环境设计器中把相关的子表拖动到表单里。第40页/共74页2023/2/1841表格控件举例例7-8 设计一个如图所示的用表格显示RSB所有记录的表单。第41页/共74页2023/2/1842表格控件举例操作步骤如下：在Visual FoxPro中新建一个表单窗口；向表单的数据环境添加表RSB；将人事表的标题拖拽到表单；保存当前设计结果，并运行该表单，查看是否获得预期的结果。第42页/共74页2023/2/1843表格控件举例例7-9设计一个如图所示的查询表单，要求当用户

19、单击查询时,将在表格中显示出RSB的编号,姓名,职称和GZB的实发工资字段的值。第43页/共74页2023/2/1844表格控件举例操作步骤如下：在Visual FoxPro中新建一个表单窗口；按上图所示，在该表单窗口中分别创建一个表格对象、两个命令按钮对象。调整它们的大小并摆放到相应的位置；设置各控件的属性如表7-9所示：第44页/共74页2023/2/1845表格控件举例第45页/共74页2023/2/1846表格控件举例为命令按钮 Command1 的 Click 事件中输入下列代码：SELECT rsb.编号,姓名,职称,实发工资;FROM rsb,gzb WHERE rsb.编号=g

20、zb.编号;INTO CURS pp为命令按钮 Command2 的 Click 事件中输入下列代码：CLOSE ALLThisform.Release第46页/共74页2023/2/1847表格控件举例例7-10 设计一个按部门浏览人事表记录的表单，如图所示。第47页/共74页2023/2/1848表格控件举例设计步骤如下：建立一个新表单，为该表单添加数据环境，在数据环境中添加表BMDM和表RSB，将表BMDM的“部门名称”字段从数据环境中拖到表单中，在表单中将出现一个文本框控件，该控件的ControlSource属性将自动设置为：BMDM.部门名称。在RSB的标题处按下鼠标拖到表单中，将出

21、现一个表格控件，该控件的RecordSourceType属性自动被设置为：1-别名，RecordSource属性自动被设置为：RSB。第48页/共74页2023/2/1849表格控件举例向表单添加两个命令按钮控件，设置各控件的属性如表7-10所示：第49页/共74页2023/2/1850表格控件举例在Command1的Click事件中输入下列代码：SKIP-1 IF BOF()=MESSAGEBOX(已到第一条记录！,48,;信息)This.Enabled=.F.ELSEENDIF第50页/共74页2023/2/1851表格控件举例在Command2的Click事件中输入下列代码：SKIPIF

22、 EOF()=MESSAGEBOX(已到最后一条记录！,48,信息)This.Enabled=.F.SKIP-1ELSEThisform.RefreshENDIF 第51页/共74页2023/2/1852 页框控件 页框是一个包含页面的容器对象，用户可在页框中定义多个页面，以生成带选项卡的对话框。在表单中添加页框控件的步骤为：在表单控件工具栏中单页框控件按钮；移动鼠标指针到表单中，单击并拖拽到合适的大小；第52页/共74页2023/2/1853页框控件页框的常用属性有：PageCount：设置页框中页面的个数。页面的常用属性有：Caption：设置页面的名称。第53页/共74页2023/2/1

23、854页框控件在页框中选择不同页面的步骤如下：在页框中单击鼠标右键，选择编辑，则页框呈现出选中状态，边框变粗；单击要选择的页面标签。第54页/共74页2023/2/1855页框控件在页面中加入控件的步骤如下：选中要加入控件的页面；在表单控制工具栏中单击所需控件，移动鼠标到所选页面中，单击并拖拽到合适大小。第55页/共74页2023/2/1856页框控件举例例7-11 设计一个如图所示的查询表单，要求对RSB表可按姓名查询，也可按编号查询。并显示查找到的记录的编号、姓名、性别、职称、基本工资、简历、相片字段的值，如果找不到满足条件的记录，则弹出一个信息窗，显示“没找到满足条件的记录，请重新输入！

24、”第56页/共74页2023/2/1857页框控件举例操作步骤如下：新建一个表单，添加一个页框控件。在页框的第一个页面中添加一个标签控件、一个文本框控件、一个命令按钮，操作方法为：在页框中单击鼠标右键，选择编辑，选中第一个页面，在表单控件工具栏中单击标签控件，移动鼠标到第一个页面中，单击鼠标。第57页/共74页2023/2/1858页框控件举例将RSB.DBF添加到表单的数据环境中，分别将编号、姓名、性别、职称、基本工资、简历、相片字段拖入页框的第一个页面；按图7-18所示位置摆放。设置各控件的属性如表7-11所示 第58页/共74页2023/2/1859页框控件举例第59页/共74页2023

25、/2/1860页框控件举例第60页/共74页2023/2/1861页框控件举例选择页框第一个页面的所有对象，选择【编辑】【复制】，在属性窗口的对象列表中选择Page2对象，再选择【编辑】【粘帖】，这一步操作将所有的对象复制到页框的第二个页面中；并修改标签控件的Caption的属性为：请输入编号：第61页/共74页2023/2/1862页框控件举例在的Click事件中输入下列代码：LOCAT FOR ALLTRIM(姓名)=;IF NOT FOUND()=MessageBox(没找到满足条件的记录，;请重新输入！,48,信息)ENDIFThisform.Refresh 第62页/共74页2023

26、/2/1863页框控件举例在的Click事件中输入下列代码：LOCAT FOR ALLTRIM(编号)=;IF NOT FOUND()=MessageBox(没找到满足条件的记录，;请重新输入！,48,信息)ENDIFThisform.Refresh 第63页/共74页2023/2/1864页框控件举例在PageFrame1的Init事件中输入下列代码：GO BOTTOM SKIP 在PageFrame1.Page1的Activate事件中输入下列代码：在PageFrame1.Page2的Activate事件中输入下列代码：第64页/共74页2023/2/1865 命令按钮组控件 l命令按钮组

27、控件是一个容器控件，命令按钮组控件是一个容器控件，它可包含若干个命令按钮，并能统它可包含若干个命令按钮，并能统一管理这些命令按钮，命令按钮组一管理这些命令按钮，命令按钮组与组内的各命令按钮都有自己的属与组内的各命令按钮都有自己的属性，事件和方法程序，因而既可单性，事件和方法程序，因而既可单独操作各命令按钮，也可对组控件独操作各命令按钮，也可对组控件进行操作。进行操作。第65页/共74页2023/2/1866命令按钮组控件Click事件的判别若命令按钮组及其所含的各命令按钮分别设置了Click事件代码，Visual FoxPro以命令按钮的Click事件代码优先，忽略命令按钮组的Click事件代

28、码。若单击组内空白处，既不触发组控件的Click事件，也不触发命令按钮的Click事件。第66页/共74页2023/2/1867命令按钮组控件单击某命令按钮时，组控件的Value属性就会获得一个数值或字符串：当Value属性为1(默认值)时，将获得命令按钮的顺序号，它是一个数值；而当Value属性设置为空时，将获得命令按钮的Caption值，它是字符串。于是在命令按钮组的Click事件代码中便可判别出单击的是哪个命令按钮，并决定执行的动作。第67页/共74页2023/2/1868命令按钮组控件处理代码如下：DO CASE CASE This.Value=1 *执行动作1 CASE This.V

29、alue=2 *执行动作2ENDCASE第68页/共74页2023/2/1869命令按钮组控件命令按钮组的常用属性ButtonCount：设置组中命令按钮的数目。BackStyle：设置命令按钮的背景是否透明。BorderStyle：定义命令按钮组的边框。第69页/共74页2023/2/1870命令按钮组控件举例例7-12 用命令按钮组设计如图 所示的表单，要求当用户单击数字按钮时，文本框中将出现相应的数字。第70页/共74页2023/2/1871命令按钮组控件举例操作步骤如下：新建一个表单，向表单添加一文本框控件。向表单添加一个命令按钮组控件，在命令按钮组控件上单击右键，选择【生成器】，在按

30、钮选项卡中设置按钮数目为：10，并设置标题，如图所示。第71页/共74页2023/2/1872命令按钮组控件举例然后在“布局”页面中设置“按钮布局”为：水平。单击【确定】按钮，关闭生成器。设置命令按钮组控件的Height属性值为：84，在命令按钮组控件上单击右键，选择【编辑】，移动命令按钮，将所有命令按钮的height和Widdth均设置为：25，设置成图7-20 所示的状态。设置命令按钮组控件的Widdth属性值为192。第72页/共74页2023/2/1873命令按钮组控件举例设置命令按钮组控件ommandgroup1的Value属性值为：=“”这一步骤非常重要，这一步设置使命令按钮组Value属性的返回值为用户单击的命令按钮的Caption属性的值，而不是命令按钮的序号。在命令按钮组控件Commandgroup1的Click事件添加下列代码：第73页/共74页2023/2/1874感谢您的观看。第74页/共74页