表单设计与应用1.ppt

第八章表单设计与应用 通过学习第七章 对于一般问题我们可以写出程序代码 但是在运行程序解决问题时 没有专用的操作界面 表单 form 是VisualFoxpro提供的用于建立应用程序界面的最主要工具之一 表单内可以包含命令按钮 文本框 列表框等各种界面元素 产生标准的窗口或对话框 第一节面向对象的概念第二节表单的创建与管理第三节表单控件设计 一 对象相关的概念1 对象 客观世界里的任何实体都可以看作对象 对象可以是具体的物 也可以指某些概念 如 一名学生 一名教师 一台电脑 一部手机等 2 属性 用于表示对象的状态 如学生的学号 姓名 性别 出生日期 学校 班级 家庭地址 联系电话等 老师的职工号 姓名 性别 出生日期 婚姻状况 职称等 3 方法 用于描述对象的行为的过程 VFP为对象内定的通用过程 能使对象执行一个操作 第一节面向对象的概念 4 事件 由用户或系统触发的一个特定动作 一个对象可以有多个事件 但每个事件都由系统预先规定的 一个事件对应一个程序 称为事件程序 事件一旦触发 系统马上执行与该事件对应的过程 二 类相关的概念1 类 类是对相似对象的抽象 学生张三 李小明 王伟华都具有学生的相似性质 他们是学生类 老师李四 张旭 刘冰等具有教师的相似性质 他们是教师类 先定义类 再创建对象 2 子类和继承 上面例子中学生和老师都具有人的相似性质 如姓名 性别 出生日期等 学生类和老师类就是人这个类的子类 人是学生和老师的的父类 子类继承了父类所有属性 方法 但又有新增的属性及方法 1 VFP基类 参见教材表8 1用户可以基于基类生成所需要的对象 2 VFP基类的分类 分为容器类和控件类 相应地可分别生成各种容器对象和控件对象 1 控件 表单上显示数据和执行操作的基本对象 它不能包容其他的对象 如标签 命令按钮等 2 容器 是特殊的控件 可包容其它的控件或容器 如表格 页框等 三 VisualFoxPro基类 3 对象的引用 在面向对象的程序设计中常常需要引用对象 或对象的属性 事件与调用方法程序 引用规则 通常要用到以下引用关键字 引用格式 引用关键字后跟一个点号 再写出被引用对象的属性或方法程序 如 this captionthisform cls 允许多级引用 但要逐级引用 后面各级对象用对象名表示 各级间用点号分隔 如 mand1 click 控件也可引用包含它的容器 控件 parent 例8 1创建如图8 1所示的表单文件Lform1 表单上有一个名为CommandGroup1的命令按钮组 按钮组中包含两个命令按钮 名称分别为Command1和Command2 表8 5给出了针对此表单及表单对象的引用示例 一 创建表单创建表单一般有两种方法 1 使用表单向导创建表单 2 使用表单设计器创建表单1 向导建立表单 以简便方式引导用户从操作产生程序 避免书写代码 VFP提供了两种表单向导来帮助用户创建表单 表单向导 适合于创建基于一个表的表单 第二节表单的创建与管理 一对多表单向导 适合于创建基于两个具有一对多关系的表的表单 可以用以下方法启动表单向导 1 项目管理器 2 单击 文件 新建 选择文件类型 表单 再单击 向导 3 单击 工具 向导 表单 4 单击工具栏中的向导按钮 不管用哪种方法启动表单向导 系统都会打开相应的对话框 一步一步地向用户询问一些简单的问题 并根据用户的回答自动创建表单 例8 2使用 表单向导 选择学生表student生成一个文件名为Lform2的表单 要求选择student表中所有字段 表单样式为阴影式 按钮类型为图片按钮 排序字段选择no 学号 升序 表单标题为 学生基本数据输入维护 例8 3使用一对多表单向导新建一个表单lform3 要求 使用course为父表并选择cname tno字段作为显示字段 score为子表并选择所有字段作为显示字段 使用cno建立表之间的关系 表单样式为浮雕式 按钮类型为文本按钮 按cname降序排列 表单标题为 课程选修情况 说明 1 表单向导能引导用户选定表来产生实用的表维护窗口 窗口中含有选取的字段 还包含供用户操作的各种按钮 2 最后将表单保存为扩展名为 scx的表单文件 同时还有一个 sct的备注文件 3 要想使用表单操作 执行表单 单击 程序 运行 2 表单设计器建立表单基本步骤 打开表单设计器 对象操作与编码 保存表单 运行表单 1 打开表单设计器 项目管理器 菜单 单击 文件 新建 选择文件类型 表单 单击 新建文件 命令 createform 2 对象操作与编码表单设计器打开后 有下列工具供用户使用 表单设计器窗口及其表单窗口用于修改对象属性的属性窗口为对象写入各种事件代码和方法程序的代码编辑窗口 包含表单设计的各种工具栏用于提供表的数据环境的数据环境设计器窗口 3 保存表单注意 表单文件不同于表单对象 它是一个程序 包含表单集对象 表单对象及各种控件的定义 4 修改表单 无论使用向导还是使用设计器建立的表单都可通过表单设计器修改命令格式为 MODIFYFORM 5 执行表单 项目管理器 表单设计器未关闭时 单击 表单 执行表单 或工具栏中的运行按钮 单击 程序 运行 命令DOFORM NAME WITH LINKED NOSHOW 说明 a 选用NAME 系统将建立指定名字的变量 并使它指向表单对象 否则建立与表单文件同名的变量指向表单对象 b 选用WITH 表单运行引发init事件 系统将实参的值传递给该事件代码对应的形参 c 选用LINKED 表单对象将随指向它的变量的清除而关闭 否则 即使用变量已经清除 表单对象仍存在 例8 4在命令窗口中输入一条命令运行表单文件Lform3 scx 并使用内存变量XX指向正在运行的表单 在清除变量XX时使表单自动退出运行状态 1 常用属性 属性AlwaysOnTop 指定表单是否位于其他打开窗口之上AutoCenter 指定表单初始化时是否自动在VFP主窗口内居中显示BackColor 指明表单窗口的颜色Caption 指明显示于表单标题栏上的文本Name 表单对象的名字 用于代码中引用对象 二 表单的常用属性 方法与事件 Closable 是否可以通过单击关闭按钮或双击关闭框来关闭表单Movable 确定表单是否能够移动Left 指明对象最左边相对父对象的位置Top 指明对象最上边相对父对象的位置Height 指明对象的高度Width 指明对象的宽度WindowType 指定表单是模式表单还是非模式表单 在一个应用程序中如果运行了一个模式表单 那么在关闭该表单之前不能访问应用程序 中的其他界面元素 设置属性a 设计时在属性窗口中修改 1 打开 单击 显示 属性 或右单击表单设计器的空白处 再单击 属性 2 属性窗口的组成 对象组合框 包含当前表单 表单集及全部控件的列表 用户可在列表中选择对象选项卡 5个选项卡分别用来显示对象的属性 事件 方法程序等 属性设置框 用于更改属性值属性列表 每一行包含两列 分别显示属性名与它的当前值 说明 窗口底部简要地显示它的意义b 运行时通过代码修改 对象名 属性名 属性值2 方法 方法程序过程代码由VFP定义 对用户是不可见的 常用方法 Cls 清除表单中的图形和文本 Refresh 重画表单或控件 并刷新它所有的值 当表单被刷新时 表单上的所有控件都被刷新 当页框被刷新时 只有活动页被刷新 Release 将表单从内存中释放即关闭Show 显示表单Hide 隐藏表单Setfocus 控件获取焦点 使其成为活动对象3 添加新属性和新方法添加新属性 单击 表单 新建属性 添加新方法 单击 表单 新建方法程序 可以在属性窗口中双击该方法打开代码编辑窗口 然后输入或修改方法代码4 删除用户添加的属性和方法单击 表单 编辑属性 方法程序 在对话框中选择不需要的属性 单击 移去 5 常用事件a 事件列表Load 创建对象前引发表单的load事件 即运行表单时首先引发表单的load事件Init 创建对象时引发 在表单的init事件引 发之前 先引发它所包含的对象的init事件 所以在表单的init事件代码中能够访问它包含的对象Destroy 对象释放时引发Unload 对象释放时 在destory事件之后 引发GotFocus 对象获取焦点时引发Click 单击鼠标左键时引发DblClick 双击鼠标左键时引发RightClick 右单击鼠标时引发InteractiveChange 通过鼠标或键盘改变控件 值时引发b 事件代码 事件一旦被触发 系统马上执行与该事件对应的过程 所以事件过程的代码应该事先编写好 编写事件代码先要打开代码编辑窗口 方法如下 双击该对象右单击该对象 单击 代码 单击菜单 显示 代码 双击属性窗口的事件选项例8 5建立表单文件lfrom5 scx 设置表单的标 题为 表单操作 并使表单运行时自动居中 然后为表单新建一个名为newf的方法和一个名为news的属性 方法newf的代码为 wait newf window 并在表单的click事件中调用新方法newf 右击表单时关闭表单三 表单中包含的对象设置1 创建对象 使用表单控件工具栏中的各种控件按钮逐个创建控件 打开工具栏 单击 显示 表单控件工具栏 单击表单控件工具栏中的某一控件按钮 然后 单击表单窗口内的某处或按住左键拖动到合适大小 2 控件的基本操作 选定单个控件 单击控件或在属性窗口对象列表框中选择控件 控件周围出现8个控制柄 选定多个控件 按下shift键 逐个单击要选定的控件 或按下鼠标左键拖曳 屏幕出现的虚线框圈住所要选定的控件 取消选定 单击已选定控件的外部某处 移动控件 鼠标指向选定的控件后 拖动到合适的位置或修改控件的属性 left top 改变大小 选定控件后 指向某个控制柄 拖曳到合适大小或修改属性 width length 删除控件 选定不需要的控件 按delete键或选择菜单 编辑 剪切 复制对象 选定要复制的对象 编辑 复制 编辑 粘贴 3 控件的布局a 调用布局工具栏 单击 显示 布局工具栏 或单击 布局工具栏 按钮b 选择相关的控件 单击布局工具栏上相应的按钮 4 设置tab键次序VisualFoxpro提供了两种方式设置tab键次序 交互方式和列表方式 设置方式 菜单 工具 选项 表单 tab键次序 1 数据环境 定义表单或表单集中时使用的数据源 包括表 视图和关系 数据环境一旦建立 打开或运行表单时 其中的表或视图即自动打开 关闭或释放表单时 表或视图也随之关闭 2 数据环境设计器 用来创建或修改数据环境的工具 打开方法 先打开表单设计器 右单击表单设计器空白处 单击 数据环境 或单击 显示 数据环境 或单击 数据环境 按钮 四 数据环境 3 数据环境的使用 1 添加表或视图 右单击 数据环境 设计器窗口的空白处 单击添加或单击 数据环境 添加 在打开窗口中选择所需的表或视图注意 如果添加的表之间存在永久性联系 则联系也会被添入 2 移去表或视图 单击要移去的表或视图 单击 数据环境 移去 或右单击要移去的表或视图 单击 移去 3 表间关系的设置 添加关系 在数据环境设计器窗口 从父表中的字段拖到子表相关的索引上 如果没有相关的索引 就拖动到相关的字段上 删除关系 单击表示关系的连线 按Delete键 4 向表单中添加数据打开数据环境设计器 拖动字段 表或视图到表单 系统将产生相应的控件并与字段联系 第三节表单控件设计 表单中经常包含许多控件 表单的设计离不开控件 而要很好地使用和设计控件 则需要了解控件的属性 方法和事件 一 标签 Label 控件能在表单上显示文本的输出控件 常用作提示或说明 常用属性 1 Caption 字符型 用于指定标签的标题 标题是用来显示的文本2 Autosize 逻辑型 使标签区域自动调整为与标题文本大小一致 3 Alignment 指定标题文本在控件显示的对齐方式 0 左对齐1 右对齐2 央对齐4 设置文本的字体及文字大小 粗细 斜体 下划线 对应属性依次为FontName FontSize FontBold FontItalic FontUnderLine 5 Forecolor 设置标题文本的颜色 供用户输入或编辑一行数据常用属性 1 Value 用于指定文本的值 并在框中显示 1 Value值既可在属性窗口中输入或编辑 也可用命令设置 2 Value值可为数值型 0 字符型 无 日期型 或逻辑型 F 4种之一 默认值是 无 即字符型 3 输入数据时 如遇长数据能自动换行 但只要键回车 输入被终止 二 文本框 TextBox 控件 2 PasswordChar 指定文本框内是显示用户输入的字符还是占位符 指定用作占位符的字符 3 InputMask 指定在一个文本框中如何输入和显示数据 内容由一些模式符组成 每个模式符规定了相应位置上数据的输入和显示行为 在程序中起控制作用 用于完成某一特定的操作 操作代码通常放置在Click事件中 常用属性 1 Caption 显示在命令按钮上的文本 Caption属性值中某字符前插入符号 该字符变为热键 2 设置文本的字体及文字大小 粗细 斜体 下划线 对应属性依次为FontName FontSize FontBold FontItalic FontUnderLine 三 命令按钮 CommandButton 控件 3 Picture 该属性设置一个图形文件 命令按钮上显示对应的图形 4 Visible 指定对象是可见还是隐藏 默认值为 T 即对象是可见的 5 Enabled 指定表单能否响应由用户引发的事件 默认值为 T 即能响应 6 Default 若表单上有多个命令按钮 可将其中一个设置为缺省命令按钮 Default T 当所有命令按钮都未获得焦点时 用户按回车键时缺省命令按钮就作出响应 执行该命令按钮的Click事件 7 Cancel 若表单上有多个命令按钮 可将其中一个设置为取消命令按钮 Cancel T 用户按Esc键时执行该命令按钮的Click事件 例8 6设计如图所示的用户登录窗口lform6 scx 表单的标题为系统的当前日期 在文本框text1中输入用户名 text2中输入密码 输入的内容显示为 当用户输入用户名和密码并单击 登录 按钮 command1 时 若用户名错误 则提示 用户名错误 若用户名正确 而密码输入错误 则提示 口令错误 假设预置用户名为 ABCDE 密码为 123456 若用户名和密码都正确 则释放表单 如果输入的次数超过三次 则显示 用户名或口令错误 禁止进入系统 然后退出表单 注意 登录 按钮的访问键为Q 是 确认 按钮 退出 的访问键为R 为默认的 取消 按钮 文本框text2中仅允许输入数字字符 最多6位 操作步骤 1 创建表单 添加标签和文本框 命令按钮 2 设置属性 对象属性属性值Form1Caption dtoc date Label1Caption密码Text1PasswordChar Value 无 Command1Caption确定Command2Caption取消 3 Form1的Load事件代码 publici i用于计算输入次数i 0 4 Command2的Click事件代码如下 thisform release 5 Command1的Click事件代码 i i 1ifi 3wait 用户名或口令错误 禁止进入系统 windowthisform releaseelse ifalltrim thisform text1 value ABCDE ifalltrim thisform text2 value 123456 thisform releaseelsewaitwindow 口令错误 endifelsewaitwindow 用户名错误 endifendif 命令按钮组是一种容器 它可包含若干个命令按钮 并统一管理这些命令按钮 它与组内的各命令按钮都有自己的属性 方法和事件 1 常用属性 1 Buttoncount 指定命令组中命令按钮的数目 2 Buttons 用于存取各按钮的数组 例如在表单中有一命令按钮组commandgroup1 要求在运行表单时将第二个按钮隐藏 可以在表单的Init事件中编写代码 mandgroup1 buttons 2 visible f 四 命令按钮组 Commandgroup 控件 3 Value 命令组当前状态 单击某命令按钮时 组控件的Value属性获得一个数值 默认 或字符串 如果是数值型 则获得命令按钮顺序号 如果为字符串 获取命令按钮的Caption属性值 2 Click事件的判别 若命令组及组内各命令按钮分别设置了Click事件代码 系统根据用户单击的位置来触发命令组或命令按钮的click事件 若单击某命令按钮 则执行该按钮的Click事件代码 若单击命令组内空白处 执行命令组的Click事件代码 用于输入或更改文本 允许输入多段文本 1 与文本框的区别 1 编辑框只能输入或编辑字符型数据 而文本框则适用于4种类型的数据 2 文本框只能供用户键入一段数据 而编辑框可以输入多段 2 常用属性 1 Value ControlSource同文本框 2 AllowTabs 指定编辑框内是否允许使用Tab键 五 编辑框 EditBox 控件 T 表示编辑框内允许使用Tab键 F 默认值 表示编辑框内不允许使用Tab键 3 HideSelection 指定编辑框失去焦点时 编辑框选定的文本是否显示为选定状态 T 不显示 默认值 F 显示 4 ReadOnly 指定用户能否能编辑编辑框的内容 T 不能 F 能 默认值 5 ScrollBars 指定编辑框内是否显示滚动条 0 没有2 包含垂直滚动条 默认值 6 SelStart 返回用户在编辑框中所选或要选文本的起始点 插入点 位置 取值范围0 编辑框中字符个数 例如 当在编辑框中从第一个字符开始选定内容时 selstart值为0 7 SelLength 返回用户在编辑框中所选或要选字符的数目 取值范围0 编辑框中的字符总数 8 SelText 返回用户在编辑框中选定的文本 没有选定返回空串 以上三个属性在设计时不可用 运行时可读写 例8 7创建表单lform7 scx 表单中包含一个编辑框Edit1和两个命令按钮Command1 查找 Command2 替换 如图所示 要求 单击Command1时 选择Edit1里的某个单词example 单击Command2时 用单词exercise置换已选择的单词example 操作步骤 1 建立表单 向表单中添加一个编辑框和两个命令按钮 2 设置对象的属性 对象属性属性值Edit1hideselection f Command1caption查找Command2caption替换 3 Command1的Click事件代码 n at example thisform edit1 value ifn0thisform edit1 selstart n 1thisform edit1 sellength len example elsewaitwindow 没有相匹配的单词 endif 4 Command2的Click事件代码 ifthisform edit1 seltext example thisform edit1 seltext exercise elsewaitwindow 没有选择需要置换的单词 endif 对话框中常见的对象 允许同时选择多项 1 常用属性 1 Caption 指定复选框旁显示的文本 2 Value 指定复选框的当前状态 0或 F 表示清除 即未选定1或 T 表示选定 框内显示对勾2或 null 表示灰色 不确定 在代码中使用例8 8设计表单lform8 scx 要求 通过复选框选择课程号 单击统计 标签中显示选修相应课程的学生人数 六 复选框 CheckBox 控件 1 新建表单 添加三个复选框 一个命令按钮和一个标签 2 属性设置对象属性属性值Form1Catpion统计选修课程的学生人数Label1Caption共有 名学生选修Command1Caption统计Check1Caption3 105Check2Caption3 245Check3Caption6 166 3 Command1的Click事件代码如下 dimensionr 1 s 1 t 1 store0tor 1 s 1 t 1 ifthisform check1 value 1selectcount fromscorewherecno 3 105 intoarrayrendififthisform check2 value 1selectcount fromscorewherecno 3 245 intoarraysendif ifthisform check3 value 1selectcount fromscore wherecno 6 166 intoarraytendifthisform label1 caption 共有 ltrim str r 1 s 1 t 1 名学生选修 closeall 一个包含若干个选项按钮的容器 用户只能选择一个 1 常用属性 1 Value 选项按钮的Value属性 用于表示选项按钮的状态 1表示选定 0表示未选定 选项按钮组的Value属性 表示选定按钮的序号或选定按钮的Caption值 2 ButtonCount 指定选项组中选项按钮的数目 七 选项组 OptionGroup 控件 3 Buttons 用于存取选项组中每个按钮的数组 例8 9如图所示 设计一个能编辑或浏览4个数据库表的表单 表单运行时 通过选项组选择表 如果复选框选定 单击确定则编辑指定表 如果复选框未选定 单击 确定 则只能浏览指定表 不能进行编辑 单击 退出 按钮 关闭表单 1 新建表单 添加一个选项组 一个编辑框和一个命令按钮对象名属性属性值Form1Caption数据库表维护Label1Caption选表Check1Caption编辑Command1Caption确定OptionGroup1ButtonCount4Option1Caption学生表Option2Caption教师表Option3Caption课程表Option4Caption成绩表 2 打开数据环境设计器 添加表student teacher course和score 3 OptionGroup1的Click事件代码如下 docasecasethis value 1selectstudentcasethis value 2selectteachercasethis value 3selectcoursecasethis value 4selectscoreendcase 4 Command1的Click事件代码如下 Ifthisform check1 value 1browseElsebrowsenomofifyEndif 5 Command2的Click事件代码如下 Thisform release 它们都有一个供用户选项的列表 但两者之间有三个区别 列表框任何时候都显示列表中的所有项 而组合框只显示被选中的一项 用户单击它的列表按钮后才能显示可滚动的下拉列表 所以相对列表框 组合框更节省空间 组合框不提供多重选择的功能 没有MultiSelect属性 组合框有两种形式 下拉组合框与下拉列表框 前者除可从列表中选择外还允许输入数据项 八 列表框 ListBox 和组合框 ComboBox 1 RowSource 数据源 和RowSourceType 数据源类型 2 ListCount 返回组合框或列表框中列表项的个数 3 Selected 用于判断组合框或列表框某一项是否被选中 选中时返回 T 否则返回 F 4 Value 返回在列表中选定的项 5 List 格式List m n 返回组合框或列表框第m行n列的内容 6 ColumnCount 返回组合框或列表框的条目数 常用属性 设置值值源类型说明 7 MultiSelect 指定用户能否在列表框控件内进行多重选定 只用于列表框 0或 F 默认值 不允许多重选定1或 T 允许多重选定 通过Ctrl完成 8 Style 指定组合框的类型0 下拉组合框 既可在列表中选项 也可输入2 下拉列表框 仅可在列表中选项例8 10设计如图所示的表单 列表框显示score表的三个课程号 选择一个 单击 统计 文本框显示该课程的平均成绩 单击 退出 关闭 表单 1 建立表单 添加两个标签 两个命令按钮 一个文本框和一个列表框 2 属性设置如下对象名属性名属性值Form1Caption统计课程平均成绩Label1Caption平均成绩 Label2Caption课程号 Command1Caption统计Command2Caption退出List1RowSourceType1List1RowSource3 105 3 245 6 166 3 Command1的Click事件代码如下 selectavg degree fromscorewherecno Thisform List1 ValueintoarraycjThisform Text1 Value cj 1 4 Command2的Click事件代码如下 Thisform Release 5 List1的Click事件代码如下 Thisform Text1 Value 例8 11设计如图所示的表单 组合框显示score表的三个课程号 只能选择 不能输入课程号 选择一个 单击 统计 文本框显示该课程的平均成绩 单击 退出 关闭表单 2 属性设置如下对象名属性名属性值Form1Caption统计课程平均成绩Label1Caption平均成绩 Label2Caption课程号 Command1Caption统计Command2Caption退出Combo1RowSourceType1Combo1RowSource3 105 3 245 6 166Combo1Style2 3 Command1的Click事件代码如下 selectavg degree fromscorewherecno Tbo1 ValueintoarraycjThisform Text1 Value cj 1 4 Command2的Click事件代码如下 Thisform Release 5 Combo1的Click事件代码如下 Thisform Text1 Value 表格是一种容器对象 其外形与表的浏览窗口相似 按行和列的形式显示数据 可以设置在表单或页面中 用于显示表中字段 使用户可以修改表格中的数据 1 表格的组成 1 表格 Grid 由一列或若干列组成 2 列 Column 一列显示表的一个字段 由列标题和列控件组成 3 列标题 Header 默认显示字段名 允许修改 九 表格 Grid 控件 4 列控件 Text 一列必须有一个列控件 该列中的每个单元格式都可用此控件来显示字段值 列控件默认是文本框 表格 列 列标题和列控件都有自己的属性 方法和事件 2 表格的创建 1 从数据环境创建 用鼠标左键按住数据环境窗口所用表的标题栏 拖动到表单窗口后释放 即生成一个类似于Browse窗口的表格 显示拖入表的记录 2 表格控件按钮 单击 表单控件 工具栏中的 表格 按钮 3 表格生成器3 表格编辑 1 修改列标题右击 表格 编辑 单击要修改的列或在属性窗口对象列表框中 按照从容器到对象的次序 找到要修改的Header对象后单击 修改Caption属性 2 调整表格的行高与列宽 调整列宽 选定表格 鼠标放在表格两列标题之间 左右拖动 另一种方法是设置列的Width属性 调整行高 选定表格 如果调整行标题高度 鼠标放在标题栏行首按钮的下框线处 上下拖动 如果内容行高度 鼠标放在表格内容第一行首按钮的下框线处 上下拖动 或修改属性HeaderHeight RowHeight属性 4 表格常用属性 1 ColumnCount 表格列数 默认值 1 表格可以列出表的所有字段 2 RecordSource 表格的数据源 RecordSourceType 表格数据源类型 例8 12根据表student和score建立如图所示表单bgbd scx 当输入学生姓名并单击 查询统计 按钮时 会在右边的表格内显示该同学所选各课的成绩 并在左边相应的文本内显示其中的最高分 最低分以及平均分 单击 退出 关闭表单 1 建立表单bgbd scx 添加对象 5个标签 5个文本框 2个命令按钮 一个表格 2 属性设置 对象名属性名属性值Form1Caption查询统计Label1Caption输入姓名 Label2Caption最高分 对象名属性名属性值Label3Caption最低分 Label4Caption平均成绩 Command1Caption查询统计Command2Caption退出Grid1ColumnCount2Grid1RecordSourceType4表格两列标头的Caption分别设置为 课程号和成绩 3 Command1的Click事件代码如下 xm alltrim Thisform Text1 Value Thisform Grid1 RecordSource selectcno degreefromstudenta scorebwherea no b noandname xmintocursorLs selectmax degree min degree avg degree fromlsintoarraycjThisform Text2 Value cj 1 Thisform Text3 Value cj 2 Thisform Text4 Value cj 3 4 Command2的Click事件代码如下 Thisform Release 5 Form1的Unload事件代码如下 closeall例8 13根据表student和score建立如图所示的表单 在student表中选中某一记录 下面的表格可以显示该生在score表中对应的记录 1 建立表单 打开数据环境设计器窗口 添加表student和score 并根据no建立两表间的联系 2 表单Form1的标题Caption属性设置为 学生选课情况 3 从数据环境设计器窗口把两个表拖动到表单设计器窗口 自动生成两个表格控件 页框是包含页面 page 的容器 而页面本身也是容器 可以包含所需的控件 用户可以定义多个页面 从而生成带选项卡的对话框 页面中添加控件 选定页面 右单击页框 单击 编辑 单击页面对应的选项卡标签 添加控件 2 常用属性 1 PageCount 页框中包含的页面数 默认2 2 pages 是一个数组 用于存储页框中的某个 十 页框 PageFrame 控件 对象 例如 要将页框pageframe1中的第二个页框标题设为 列表框 Thisform pageframe1 pages 2 caption 列表框 3 Tabs 指定页框中是否显示页面标签栏 4 TabStretch 指定标签栏是单行还是多重行0 多重行1 单行 默认值 5 ActivePage 页框中活动页的页号例8 14在表单上创建一个如图所示含有两个页面的页框 分别用来维护student和teacher表 1 建立表单 添加页框 2 属性设置 对象名属性名属性值Form1Caption数据浏览P