需要背诵的题目_第1页
需要背诵的题目_第2页
需要背诵的题目_第3页
需要背诵的题目_第4页
全文预览已结束

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、用命令新建一个名为“外汇”的数据库,并将该命令存储在one.txt中。create database 外汇用SQL一句在“外汇”数据库中新建一个数据库表rate,其中包含4个字段“币种1代码”c(2),“币种2代码”c(2),“买入价” N(8,4),“卖出价”N(8,4),请将SQL语句存储于two.T中。CREATE TABLE rate (币种1代码 C(2), 币种2代码 C(2), 买入价 N(8,4), 卖出价 N(8,4)表单文件test_form中有一个名为form1的表单,请将编辑框控件Edit1d的滚动条去掉。 在“表单设计器”中,在“属性”的ScrollBars处选择“0

2、-无”。在“雇员”表中,将所有记录的EMAIL字段值使用“部门号”的字段值加上“雇员号”的字段值再加上“”进行替换 REPLACE ALL EMAIL WITH 部门号+雇员号+打开考生目录下的表单文件formone.scx,然后设置表单的Load事件代码:打开employee表,并将索引xm设置为当前索引。 use employee set order to xm设置formone表单中mylist列表框的有关属性,其中RowSourceType属性为字段,使得当表单运行时,列表框内显示employee表中姓名字段的值。在“表单设计器”中,选中“列表框”控件,在其“属性”的RowSource

3、处输入“employee.姓名”,在RowSourceType处选择“6 - 字段”。设置文本框的inputmask属性,使其中只能输入数值,其中:小数部分为两位,整数部分(包括正负号)最多为5位。在formone表单中添加一个列表框,并设置列表框的属性:名称为mylist;高度为60;可以多重选择。在“表单设计器”中,添加一个列表框List1控件,在其“属性”的Name处输入“mylist”,在Height处输入“60”,在MultiSelect处选择“.T. - 真”。修改命令按钮的Click事件代码,使其中的wait命令功能为显示文本框的值。注意:需要将文本框中的数值转换成字符串,其中:

4、小数位数保留两位,字符串的长度为8。选择文本框控件,在属性窗口设置InputMask属性为“99999.99”。这里大家注意inputmask属性如何设置什么时候用“9”,什么时候用“#”建立一个命令文件one.prg,该文件包含一条运行(预览)报表文件employee.frx的命令。report form employee preview修改命令按钮的Click事件代码,使其中的wait命令功能为显示文本框的值。注意:需要将文本框中的数值转换成字符串,其中:小数位保留两位,字符长的长度为8改为:wait STR(THISFORM.TEXT1.VALUE,8,2)利用INDEX命令为custo

5、mers表建立一个普通索引,索引名为khh,索引表达式为“客户号”,索引存放在customers.cdx中。然后将该INDEX命令存入命令文件pone.prg中。INDEX ON 客户号 TAG KHH建立一个名为menu_quick的快捷菜单,菜单中有两个菜单项“查询”和“修改”。然后在表单myform中的RightClick事件中调用快捷菜单menu_quick。(33套)1. 在命令窗口输入建立菜单的命令 CREATE MENU menu_quick 2. 在“新建菜单”对话框中,单击“快捷菜单”按钮,接着输入两个菜单名。 3. 单击“菜单生成”菜单项,如果新建的菜单没有保存,那么单击“

6、是”按钮,再单击“生成”按钮。如果新建的菜单已经保存,那么直接单击“生成”按钮,最后关闭“快捷菜单设计器”。 4. 在命令窗口输入修改表单命令 MODIFY FORM myform 5. 在“测试快捷菜单”中,双击其“属性”的“RightClick Event”,在“Form1.RightClick”编辑窗口中输入“do menu_quick.mpr”,关闭编辑窗口。在考生目录下有一个名为menu_lin的下拉式菜单,请设计顶层表单form_menu,将菜单menu_lin加入到该表单中,使得运行表单时菜单显示在本表单中,并在表单退出时释放菜单。(34套)1. 在命令窗口中输入建立表单命令 C

7、REATE FORM form_menu 2. 在其“属性”的“ShowWindow”中选择“2 - 作为顶层表单”。 3. 在“属性”中,双击“Init Event”,在“Form1.Init”编辑窗口中输入“do menu_lin.mpr with this ,xxx”,启动菜单命令。 4. 在“属性”中,双击“Destroy Event,在“Form1.Destroy”编辑窗口中输入“release menu xxx extended”,在表单退出时释放菜单。编写程序three.prg完成下列操作:根据“外汇汇率”表中的数据产生rate表中的数据。要求:将所有“外汇汇率”表中的数据插入r

8、ate表中并且顺序不变,由于“外汇汇率”中的币种1和币种2存放的是外币名称,而rate表中的币种1代码和币种2代码应该存放外币代码,所以插入时要做相应的改动,外币名称与外币代码的对应关系存储在“外汇代码”表中。注意:程序必须执行一次,保证rate表中有正确的结果。(15套)close allselect 0use 外汇代码select 0use rateselect 0use 外汇汇率do while .not. eof() select 外汇代码 locate for 外币名称=外汇汇率-币种1 mm1=外币代码 locate for 外币名称=外汇汇率-币种2 mm2=外币代码 selec

9、t rate append blank select rate replace 币种1代码 with mm1,币种2代码 with mm2,买入价 with 外汇汇率-买入价,卖出价 with 外汇汇率-卖出价 select 外汇汇率 skipenddoclose all使用SQL语句查询每个职工所经手的具有最高金额的订购单信息(orders表),并将结果按金额升序、金额相同按订购单号升序存储到表results中。(18套)SELECT * FROM orders ORDER BY 金额 WHERE 职工号+str(金额,10,0) IN (SELECT 职工号+str(MAX(orders.

10、金额),10,0) FROM orders GROUP BY 职工号) INTO TABLE results编写文件名为FOUR.PRG的程序,根据表TABA中所有记录的a,b,c三个字段的值,计算各记录的一元二次方程的两个根x1和x2,并将两个根x1和x2写到对应的字段x1和x2中,如果无实数解,在note字段中写入“无实数解”。注意:平方根函数为SQRT();程序编写完成后,运行该程序计算一元二次方程的两个根。(71套)在文件four.prg中存放: USE TABA SCAN X = B*2 - 4*A*C IF X = 0 XX1 = (-B + SQRT(X)/(2*A) XX2 = (-B - SQRT(X)/(2*A) REPLACE x1 with xx1,x2 with xx2 ELSE REPLACE x1 with .null.,x2 with .null.,NOTE WITH 无实数解 E

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论