2010秋vfp上机参考答案01-02

2010秋vfp上机参考答案01-02

ID:14221039

大小:85.00 KB

页数:5页

时间:2018-07-26

2010秋vfp上机参考答案01-02_第1页
2010秋vfp上机参考答案01-02_第2页
2010秋vfp上机参考答案01-02_第3页
2010秋vfp上机参考答案01-02_第4页
2010秋vfp上机参考答案01-02_第5页
资源描述:

《2010秋vfp上机参考答案01-02》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、2010QVFP01一、项目、数据库和表操作(12分)打开T盘根目录中的项目文件JXGL,在该项目中已有一数据库JXSJ。1.在JXSJ数据库中按如下表格所示的结构创建AB表,并按表格中的要求设置相关属性。宇段名数据类型宽度宇段标题RQD0日期SCSLN6售出门票数量SJRSN6实际参观人数BZM0备注(1)设置AB表的表注释:参观人数;参观人数(不要括号)(2)设置日期字段的默认值:当前系统日期;Date()注意:是引文括号(3)设置日期字段的显示类:微调框;ListBox(4)设置记录有效性规则

2、:实际参观人数小于或等于售出门票数量;sjrs<=scsl(5)创建普通索引,索引名为abcd,要求按实际参观人数与售出门票数量之比排序.索引表达式:sjrs/scsl2.在AB表中输入如下记录:浏览ab表-“显示”菜单-“追加方式”RQSCSLSJRSBZ(默认值)240100198808全天下雨3.给KC表中所有学分大于或等于5的记录加删除标记。浏览kc表,“表”菜单-“删除记录”,范围选:ALL,For里填写:xf>=54.JS表已存在主索引GH,索引表达式为GH;KCAP表已存在普通索引GH

3、,索引表达式为GH。以JS表为主表、KCAP表为子表,根据GH建立永久关系,并设置两表之间的参照完整性:更新级联、删除级联。二、设计查询(8分)已知教师表(JS)含有工号(gh,C)、姓名(xm,C)等字段;自由表图书借阅表(JYB)含有读者号(dzh,C)、分类号(flh,C)、借阅日期(jyrq,D)、还书日期(hsrq,D)等字段,教师的读者号与工号相同。按如下要求修改JXGL项目中的查询CHAXUN:基于JS表和JYB表查询教师借书情况,计算过期罚款信息。要求:查询输出字段为dzh、xm、罚

4、款额;查询结果按罚款额降序排序;输出去向为文本文件TEMP。注:罚款计算方法为30天以上超过部分每本每天0.10元,未还书者(即还书日期为空的记录)不统计。连接:Js.gh=Jyb.dzh(题目中有文字:教师的读者号与工号相同)字段:dzh,xm,(hsrq-jyrq-30)*0.1As罚款额筛选:字段中写入Hsrq-jyrq>=30(这样即可保证还书日期为空的不统计)排序:罚款额分组:没有使用合计函数,不用分组去向:右击查询设计器—“输出设置”,找到“文本文件”,在旁边输入文件名Temp三、设计菜

5、单(5分)JXGL项目中已存在菜单MENU,其中已定义了“文件”菜单栏及其中的“退出菜单”项。按如下要求设计菜单,菜单运行后的效果如图1所示。1.在“文件”菜单栏右侧创建“数据管理”菜单栏。下方2.在“数据管理”菜单栏下创建子菜单“查询”和“数据备份”。3.为“查询”菜单项设置快捷键:F12。点“选项”按钮,点“键标签”后面的文本框,然后按键盘第一行上的F12键,注意:F12是一个键4.在菜单项“查询”和“数据备份”之间插入分组线。-注意:很多人敲成/-,实不应该5.为“数据备份”菜单项设置过程代

6、码:在“结果”中选择“过程”,点“创建”或“修改”按钮,在弹出的“过程”界面中,输入代码即可。d=GETFILE("dbf","*.dbf")USE&dCOPYTObf1四、设计表单(10分)表单F101A用于统计输入文本中各类字符的个数。按下列要求修改表单,修改后表单运行时如图2所示。1.修改表单的有关属性,使表单的标题Caption为“字符数统计”,并设置字数统计的三个文本框禁用Enabled.F.。2.适当加大Shape1形状的高度,在其区域内增加一个标签控什LabelSum(注意:这里要将标

7、签的name属性改为LabelSum)和一个文本框控件Text4(注意:这里要留意文本框的name属性是不是Text4,如果不是请改为Text4),并设置Labe1Sum的标题Caption为“总字符数:”。3.编写“清空”按钮的Click事件代码,用2条语句实现如下功能:(1)清除编辑框Editl中的文本;(2)使“字数统计”矩形区域内的4个文本框的值均置零。双击“清空”按钮,在弹出的窗口中(留意是否是Click过程,如果不是选择Click,如果搞错地方,即使写对也是0分本题),输入代码:This

8、form.Edit1.Value=’’&&等号后是一对引号,单引号双引号都可以,表示空字符串Thisform.SetAll(‘Value’,0,’TextBox’)4.表单已定义了一个Count()方法,用来对Edit1编辑中的文本进行字数统计。编写“统计”按钮的Click事件代码,以实现:先调用表单的Count()方法,然后将文本框Text1、Text2和Text3的值相加后显示在文本框Text4中。双击“统计”按钮,在弹出的窗口中(留意是否是Click过程),输入

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。