规划表单及相应脚本.doc

五：设计表单及相应脚本 1.数据维护表单 数据维护表单主要实现对数据的增、减、改、删功能。在此以“学生情况表”为例说明，其他两个表单设计与此类似。“学生情况表”表单设计效果图如图所示。 操作步骤: (1)在“项目管理器”的“文档”选项卡中，选择【表单】→【新建】→【新建表单】； （2）修改表单的Captiom属性，取名为（“学生情况表数据维护表单“）。 （3）在表单处单击右键，在弹出菜单中选择“数据环境”添加该表单所涉及到的表，此例为“学生情况表”。并在“数据环境设计器”中选定该表，然后在“属性”窗口中将其Exclusive属性设为T－真。 （4）在表单添加一个表格控件（Grid），并设置相应属性； 对象名 属性 GRID1 RECORDSOURCE=学生情况表（数据环境中需添加的表） Deletemark F 假 Scrollbars 2－垂直 （5）添加4个命令按钮，【添加】【修改】【删除】【退出】并设置相应属性（Caption）如下表。 （6）编写脚本。（依次 双击命令按钮，打开空白记录本） 事件 事件代码 Form Destroy pack use 【添加】按钮Click Appe blank Thisform.grid1.column1.setfocus 【修改】按钮click EDIT 【删除】按钮Click If messagebox(“一旦删除记录便不能恢复，真的删除吗？”,1+48+0,”信息提示”)=1 dele Thisform.refresh endif Thisform.grid1.column1.setfocus 【退出】按钮click Thisform.release 当做完一个表后，可以点菜单上的 红色叹号按钮，系统会提示是否保存到表单中，此时给此表单取名为 myform11。不带后缀。或者在表单的右上角点关闭按钮，也会提示为此表单保存的对话框。 为了节约时间，以此类推，做第二个或第三个表时，可以采取简单的方式。当做完第一个表单，经【运行】后查证都可以操作时，回到第一个表单处，点【菜单】→【另存为】→弹出另存为对话框，先为表单取名为myform12/myform13等.然后在表单中做如下几处修改即可. (1)在表单的空白处点右键→数据环境→找到第二个表单所涉及的表,比如此例中第二个表为 “课程成绩表”,点【添加】，右键【属性】→exclusive属性设为T。 （2）表单form1的caption的属性（如第二个表单“课程成绩表维护表单”） （3）在对象grid1的【属性】中，修改recordsource的属性（数据环境中所添加的表，如“课程成绩表”，必须与所添加表的名称一致）。 如此招葫芦画瓢，可以做出第三个查询表单。 2.数据查询表单 数据查询表单需根据用户输入的查询条件，显示出满足条件的记录。（表单的基本操作请见附录3） 通过学号查询学生基本情况（myform21.scx） 按学号查询学生学号、姓名、性别、籍贯，此表单包括一个【文本控件】、一个【标签】（输入学生学号的窗口），一个【表格】控件，一个表示“退出”的【命令】控件，如图所示，在表单处单击右键，在弹出的菜单中选择“数据环境”，添加该表单所涉及的表，此例为学生基本情况表。 对象名 属性 Grid Recordsource=学生情况表（数据环境中要添加的表） Delemark F 假 事件 事件代码 Text1的 lostfocus事件 （双击text 窗口弹出空白记录本） Set filter to学号 alltrim(thisform.text1.value) Thisform.refresh 【退出】按钮Click Thisform.release （2）第二个表，通过【课程号】查询课程名称、出版社、单价情况表单（myform22.scx） 表单包括一个【文本】控件和一个【标签】，用于输入（输入课程号编码的窗口），一个【表格】控件，一个表示退出的【命令】按钮。其界面和属性设置类似于表单myform21.scx。 （3）双查询表单－通过课程号和选课时间查询当天选课学生的基本情况表单（myform23.scx）从题目要求可知道，这是通过第二个表中的选课时间和课程号，来查询第一个表中的学生基本情况表。所以这设计到两个数据环境。做此表时，表单包括两个【文本】控件和两个【标签】控件，用于输入课程号及选课时间，一个表格控件用来显查询结果，一个退出命令按钮，一个表示【查询】的命令按钮。此表中，标签名字通过【属性】修改，两个【文本】控件，不需要输入任何事件代码，grid表中也无需设置，此表的重点就是在写【查询】事件的代码。 （4）“查询”按钮的CLICK脚本为 Select 学生情况表.学号,姓名,课程号,