计算机考试vf小抄.docVIP

1调用表单menu_quick：do menu_quick.mpr 2设置表格的数据来源：thisform.grid1.recordsource=”pp” 3“退出”按钮click事件代码：thisform.release 4图书价格在原价格基础上降低5%：update books_bak set 价格=价格*(1-0.05) 5组合框有三个条目，即将组合框的init事件设置成public a(3), A(1)=”S1”, A(2)=’S2”,A(3)=”S3” 6统计文本框中信息，则将“统计”按钮的click事件设置成:x=allt(bol.value)；。。。；where。。。= x into array b；thisform.text1.value=allt(str(b[1])) 7“返回”菜单编写代码：set sysmenu to default 8将menu_lin..mpr菜单加入表单中，即将表单的init事件代码设置成：do menu_lin.mpr with this,”abc” 13在表单中添加菜单，即将表单的init事件代码编写成：do mymenu.mpr with this,”myform” 9表单退出时释放菜单，即将表单的destroy事件代码设置成：release menu abc extended 10向表score1中插入一条记录：学号为“007”，课程号为“001”，成绩为99：insert into score1(学号,课程号,成绩) values (“007”,”001”,99) 11从零件信息表中删除单价小于600的所有信息：delete from 零件信息 where 单价600 12将零件信息表中零件号为“p4”的零件的单价改为1090：update 零件信息 set 单价=1090 where 零件号=p4 将tabb表中的“日期”字段修改为2005-01-15：update tabb set 日期={^2005-01-15} 14“统计”菜单命令访问键为T，即在新建菜单中输入：统计(\T) 15将“课程表”中“课程号”定义为候选索引，索引名是temp：alter table 课程表 add unique 课程号 tag temp ,（注：主索引为pimary key） 给customers表建立一个名为thh的普通索引（表达式为客户号）：use customers；index on 客户号 tag khh 为表金牌榜增加一个“奖牌总数”（整数型）字段，并为该字段增加有效规则：奖牌总数=0：alter table金牌榜 add 奖牌总数 int check 奖牌总数=0 为教师表的职工号字段增加有效性规则：alter table 教师表 alter 职工号 set check left(职工号,4)=”1102” 将s_t表年度字段的默认值修改为2004：alter table s_t alter 年度 set default “2004” 为student表增加一个“年龄”字段（数值型）：later table student add column 年龄 N(2) （在使用alter命令时，修改搭配alter，添加用add column） 16循环结构： @,do while 条件 命令序列 enddo @,scan for 。。。endscan @,if endif @,replace…with @do case。。。endcase 17修改表可先打开表然后输入“browse” 18注意next 和 skip 和 continue（继续查找下一个） 和loop（如果满足条件则继续）不要用错 18创建自由表：create table表名 (组号 c(2) , 组名 c(10)) 19建立一个名为emp_bak的表，其结构与employee表的结构完全相同：use employee；copy stru to emp_bak.dbf 20为自由表employee表建立一个候选索引时可用use employee；modi stru先打开表设计器然后再建立索引 21建立一个one.prg命令文件该文件包含一条运行报表文件employee.frx的命令：先新建one程序文件然后在其中输入代码“report form employee”，然后在命令窗口输入“do one.prg” 预览报表three：report form three preview 22在菜单中运行表单form_three：do form form_three 23为表单中