资源预览内容
第1页 / 共12页
第2页 / 共12页
第3页 / 共12页
第4页 / 共12页
第5页 / 共12页
第6页 / 共12页
第7页 / 共12页
第8页 / 共12页
第9页 / 共12页
第10页 / 共12页
亲,该文档总共12页,到这儿已超出免费预览范围,如果喜欢就下载吧!
资源描述
1 新建商品数据表SB.DBF,字段有:商品号(C,5),商品名(C,8),单价(N,5,2),出厂单价(N,5,2),产地(C,6)。并添加如下记录:商品号(C,5),商品名(C,8),单价(N,6,2),出厂单价(N,6,2),产地(C,6)。10001 电视机 800.0 500.0 青岛20001 电子字典 360.0 200.0 深圳10002 手机8210 980.0 600.0 北京30001 MP3 800.0 560.0 广州10003 商务通 890.0 460.0 深圳设计一个名称为MY_FORM的表单,上面有“浏览”、“调整”、“备份”和“退出”四个命令按钮,“商品名称”标签和文本框text1。1) 在text1中输入文本,单击“浏览”按钮时,显示商品名含有该文本的所有商品记录。a=allt(thisform.text1.value)赋值语句,allt()为删去左右空格Sele * from sb where 商品名=”&a%”Sql语句,sele(字段)from (数据库)where(条件)2) 单击“调整”按钮时,将“商品号”前两位编号为“10”的商品的“单价”修改为出厂单价的110%。Update sb set 单价=出厂单价*1.1 where left(商品号,2)=”10” Sql语句,更新语句,update(表名)set(列名)=(表达式)where(条件)Use sb in 0在0区中使用表sbSele sb选择sbBrow浏览3) 单击“备份”按钮时,将“商品表”进行备份(使用命令COPY TO ),备份文件名为“商品表备份.DBF”,Copy to 商品表备份 Copy to 语句,备份表Use 商品表备份 in 0 alia sp在0区中使用商品表备份 Sele sp选择spBrow浏览4) 单击“退出”按钮时,关闭表单。Thisform.release退出2 设计一个菜单。主菜单子菜单任务文件(F)建查询 (C) Ctrl+C新建立查询,表自备,查询内容、文件名自定保存(S)_mfi_save关闭 (G)编辑(E)输入 (I)append blank(增添空行)修改 (E)修改该查询modify structure(修改)运行(R) Ctrl+R运行该查询显示结果do form1.scx退出(X)过程提示“退出菜单?”,退出恢复系统隐含菜单msg=messagebox(“退出菜单?”,1)(提示信息)if msg=1set sysmenu to defa Endif(if语句)3 在建立“E:专业姓名”文件夹下,建立表单(bd2.scx),添加标签“输入字符串”、文本框,添加“输出”、“退出”命令按钮,并编写代码。“输出”Click代码:把文本框内输入的字符串,去掉左、右、中间所有空格字符后,在信息框显示。“退出”:结束表单运行。n=thisform.text1.value赋值语句i=0H=len(thisform.text1.value)Len()求长度thisform.text1.value=space(0)Space()生成空格do while iHDo while语句i=i+1thisform.text1.value=thisform.text1.value+allt(substr(n,i,1)Substr(abc,2,1)从第二个开始截取一个单位的长度等于bEnddo4 设计一个电话计费程序。假定每分钟通话费用为0.12元。要求:表单窗口中用标签形式列出开始时间、结束时间、通话时间及应付金额(元),再设计一个开始按钮(按下后开始计时)和计费按钮(按下后显示结束时间、通话时间及费用)开始Public T1Thisform.label1.caption=time()T1=second()/60Thisform.refresh计费public T1thisform.label2.caption=time()T2=second()/60T=t2-t1T3=round(t+0.5,0)Thisform.label3.caption=str(t,6,4)+”分钟”Thisform.label4.caption=str(0.12*t3,6,4)+”元”Thisform.refresh5 建立“学生管理” 数据库,在其中新建“成绩”数据表并任意输入3条记录,结构如下:学号C(8),姓名C(8),计算机N(5.1),英语N(5.1),数学N(5.1),总成绩N(5.1)。建立表单(bd1.scx),用表格显示该数据表,添加标签“计算机平均成绩”及显示该数据的文本框。添加“计算”、“退出”命令按钮,并编写代码。“计算”Click代码:计算“总成绩”字段的值(总成绩计算机+英语+数学),计算“计算机平均成绩”的值并在文本框显示。“退出”:结束表单运行。COMMAND1:thisform.grid1.recordsource=sele * from 成绩 into cursor aGrid表格控件,into cursor 生成临时文件,into array 生成数组sele avg(计算机) from 成绩 into array A选择成绩表计算出计算机的平均成绩生成数组Athisform.text1.value=Aupdate 成绩 set 总成绩=计算机+英语+数学退出thisform.release6 建“订货管理”数据库。在其中新建数据表customer,表结构如下:客户号(C/8)、客户名(C/10)、地址(C/20)、电话(C/12)。以客户号建立主索引。新建数据表order_list,表结构如下:客户号(C/8)、订单号(C/10)、日期(D)、总金额(N/12,2)。以客户号建立普通索引,并与customer建立表间永久关系。1)两个数据表各添加3条记录(保证两个表的客户号存在一对一关系)。2)新建项目“订单”并将数据库添加到该项目中。3)在项目中新建表单。如下:当指针指向首记录“上一条”不能用;当指针指向末记录“下一条”不能用上一条skip -1浏览上一条Thisform.refresh更新if bof()Bof()到达最上面的那条记录Thisform.command1.enabled=.f.Enabled,可用性thisform.command2.enabled=.t.endif下一条skip Thisform.refreshif eof()Eof(),到达最下面的那条记录thisform.command2.enabled=.f.thisform.command1.enabled=.t.endif7 首先创建一个student.dbf数据表 其结构为学号(C,3),姓名(C,6),性别(C,2),出生日期(D,8)。记录内容自定。要求,根据输入限制条件的上限和下限来查找数据表中的记录,表单会显示查找到的结果。程序的演示效果如图所示。a=thisform.text1.valueb=thisform.text2.valuethisform.grid1.recordsource=sele * from student where 学号 between a and binto cursor XBetween and 在之间Thisform.refresh8 建立一表单文件BF.SCX. 如图 要求:(1)在“建表”按钮中编写代码,使用SQL语句建立一XSDA.DBF表,字段结构:学号 C(6); 姓名 C(10) ; 成绩N(5,1) 再用SQL命令方式添加三条记录,如下: 学号 姓名 成绩100101 德华 89 100202 学友 90100103 曼玉 88creat table XSDA(学号 c (6),姓名 c (10),成绩 n (5,1)创建表格语句,create table表名(字段名 类型(字段宽度,小数位数)inser into XSDAvalues (100101,德华,89)插入语句,inser into 表名(字段内容)inser into XSDA values (100202,学友,90)inser into XSDAvalues (100103,曼玉,88)browse(2)在”排序按钮”中编写SQL代码,完成按成绩降序查询。sele * from xsda order by 成绩 descOrder by,排序语句Browse(3)在”分组按钮”中编写SQL代码,完成按班级(学号前四位表示班级)分组,并显示班级总成绩。sele sum(成绩) as 班级总成绩 ,left(学号,4) as 班级 from xsda group by 班级Left(学号,4),取学号的前4位,group by,分组Browse(4)在”输出按钮”中编写SQL代码,完成将成绩在8089之间的同学信息输出到表xsda1.dbf中。sele * from xsda where 成绩 betw 80 and 89 into table xsda1Into table生成表use xsda1Browse9 有学生管理数据库BOOK,数据库中有SCORE表(含有学号、物理、高数、英语和学分)等5个字段,其中前4项已有数据。 请编写符合下列要求的程序并运行程序。 设计一个名MYFORM4的表单,表单中有两个命令按钮,按钮的名称分别是CMDYES和CMDNO,标题分别为“计算”和“关闭”。程序运行时,单击“计算按钮应该完成下列操作:1)计算每一个学生的总学分并存入对应的“学分”字段。学分的计算方法是:物理60以上(包括60分)为2学分,否则为0分;高数60分以上(包括60分)为3学分,否则为0分;英语60以上(包括60分)为4学分,否则为0分。 2)根据上面
收藏 下载该资源
网站客服QQ:2055934822
金锄头文库版权所有
经营许可证:蜀ICP备13022795号 | 川公网安备 51140202000112号