- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
[工学]vfp上机答案
一套1. (1) CREATE TABLE 教师(编号 C(8), 姓名 C(10), 性别 C(2), 职称 C(8))
(2) UPDATE 课程 SET 任课教师=T2222 WHERE 课程名=数据库
2、(1)在“表单设计器”中,建立一个计时器控件Timer1,在“属性”的Interval处输入“200”,再双击此计时器控件,
在“Timer1.Timer”编辑窗口中输入下列命令组,再关闭此窗口。
THISFORM.Label1.Left=THISFORM.Label1.Left-10
If THISFORM.Label1.Left=-THISFORM.Label1.Width Then
THISFORM.Label1.Left=THISFORM.WIDTH
ENDIF
(2). 在“表单设计器”中,添加一个命令按钮,在“属性”窗口的Caption处输入“关闭”,双击“关闭”命令按钮,
在“Command1.Click”编辑窗口中输入“Release Thisform”,接着关闭编辑窗口。
3、菜单 4. 在“浏览课程”子菜单的“结果”选择“过程”并输入命令下列语句
myform.grid1.recordsource=课程
5. 在“浏览选课统计”子菜单的“结果”选择“过程”并输入命令下列语句
myform.grid1.recordsource=sview
6. 在“预览报表”子菜单的“结果”选择“命令”并输入命令“report form creport preview”。
7. 在“退出”主菜单的“结果”选择“命令”并输入命令“myform.release”。
8. 单击工具栏上“保存”按钮,在弹出“保存”对话框中输入“mymenu”即可。
9. 在“菜单设计器”窗口下,单击“菜单”菜单栏,选择“生成”菜单项,生成“mymenu.mpr”文件。
修改表单
1. 输入修改表单命令
MODIFY FORM myform
2. 在“表单设计器”中,在其“属性”的ShowWindow处选择“2-作为顶层表单”,双击“Load Event”,
在“Form1.Load”编辑窗口中输入“do mymenu.mpr”,双击“Init Event”,
在“myform.Init”编辑窗口中输入“do mymenu.mpr with this ,xxx”,启动菜单命令,双击“Destroy Event,
在“myform.Destroy”编辑窗口中输入“release menu xxx extended”,在表单退出时释放菜单。
二套 1、(1) SELECT * FROM student WHERE 性别=男 ORDER BY 学号 INTO TABLE results
(2) DO FORM student
(3) ALTER TABLE student ADD COLUMN 年龄 N(2)
2、 在文件sprog.prg中存放下面两条SQL语句:
UPDATE student SET 年龄=year(date()) - year(出生日期)
SELECT Student.政治面目, COUNT(*) AS 人数, AVG(年龄) AS 平均年龄 FROM student GROUP BY
Student.政治面目 INTO TABLE sqlresults
3、在文件progzh.prg存放内容如下:
select 1
use jieguo
select 2
use gnht
sum jhsl to asum 计算订货总数
index on dhdw to aaa uniq
count to adhdw 计算订货单位数
index on ghdw to bbb uniq
count to aghdw 计算供货单位数
use
select 1
replace num with adhdw 把订货单位数存放第1条记录中
skip
replace num with aghdw 把供货单位数存放第2条记录中
文档评论(0)