第4套
一、
1. 打开并修改表单
MODIFY FORM myform
2. 在其“属性”的Caption处输入“表单操作”,在Name处输入“myform”。
1. 打开并修改表单
MODIFY FORM myform
2. 选中Label1标签,在其“属性”的TabIndex处输入“1”,选中Text1文本框,在其“属性”的TabIndex处输入“2”,选中Command1命令按钮,在其“属性”的TabIndex处输入“3”。
1. 在“表单设计器-myform.scx”中,单击“表单\新建方法程序”菜单项,接着显示“新建方法程序”对话框并在名称处输入“mymethod”,先单击“添加”按钮,再单击“关闭”按钮。
2. 在表单“属性”中,单击“方法程序”选项卡,找到“mymethod”用户自定义过程处并双击鼠标。
3. 在Form1.mymethod编辑窗口中,输入“wait "文本框的值是"+this.text1.value window”。
4. 关闭编辑窗口。
1. 打开并修改表单
MODIFY FORM myform
2. 选中Label1标签中,在其“属性”的Caption处“在s字符前插入 "\<”。
3. 选中Command1命令按钮,双击其按钮,在其编辑窗口输入“thisform.mymethod()”。
二、
1. 在命令窗口中输入建立查询命令
CREATE QUERY queryone
2. 在“打开”对话框中,选择表“order”再按“确定”按钮,在“添加表或视图”对话框中,单击“其他”按钮,选择表“orderitem”再按“确定”按钮,在“联接条件”对话框中,直接按“确定”按钮,再单击“其他”按钮,选择表“goods”再按“确定”按钮,在“联接条件”对话框中,直接按“确定”按钮。最后在“添加表或视图”中,再按“关闭”按钮。
3. 单击“字段”选项卡,选择“Order.订单号”、“Order.客户名”、“Order.签订日期”、“Goods.商品名”、“Goods.单价”、“Orderitem.数量”,在“函数和表达式”处输入“Goods.单价*Orderitem.数量 AS 金额”并单击“添加”按钮。
3. 单击“字段”选项卡,选择试题要求的字段添加到“选定字段”列表框中。
4. 单击“排序依据”选项卡,选择“Order.订单号”并选择“降序”,接着单击“添加”按钮,再选择“Goods.商品名”也选择“降序”,接着单击“添加”按钮。
5. 单击“查询\输出去向”菜单项,在“查询去向”对话框中,单击“表”按钮,在“表名”处输入“tableone”,再单击“确定”按钮。
6. 按“Ctrl+W”键保存该查询并运行。
1. 创建数据库
CREATE DATABASE order_m
2. 添加表到数据库中
ADD TABLE order
ADD TABLE orderitem
ADD TABLE goods
3. 打开并修改数据库
MODIFY DATABASE order_m
4. 单击“文件\新建”菜单项,在“新建”对话框中选择“视图”单选钮,再单击“新建文件”。在“添加表或视图”对话框中,双击表“order”(或单击选中表“order”,接着单击“添加”按钮),再双击表“orderitem”,在“联接条件”对话框中直接单击“确定”按钮,接着双击表“goods”,在“联接条件”对话框中直接单击“确定”按钮,接着在“添加表或视图”对话框中,单击“关闭”按钮,来关闭此对话框。
5. 单击“字段”选项卡,选择试题要求的字段添加到“选定字段”列表框中。
6. 单击“排序依据”选项卡,选择“Order.订单号”并选择“升序”,接着单击“添加”按钮。再选择“Goods.商品名”并选择“升序”,单击“添加”按钮。
7. 单击“筛选”选项卡,在“字段名”中,选择“Order.客户名”,在“条件”处选择“=”,再在“实例”处输入“lilan”。
8. 保存该视图,在“保存”对话框中输入视图名“viewone”。
9. 运行该查询,并在命令窗口输入“copy to tabletwo”把查询结果输出到“tabletwo”中。
三、
1. 在命令窗口中输入建立表单命令
CREATE FORM formone
2. 在“表单设计器”中,在其“属性”的Caption处输入“综合应用”。
3. 在“表单设计器”中,添加一个标签Label1,在其“属性”的Caption处输入“商品号:”。
4. 在“表单设计器”中,分别添加一个文本框Text1和一个命令按钮Command1,在其“属性”的Caption处输入“确定”。
5. 双击“确定”按钮,在“Command1.Click”编辑窗口中输入下列程序
select * from order where exists(select * from orderitem where 订单号=order.订单号 and 商品号=thisform.text1.value) into table tmptable
select tmptable.订单号,客户名,签订日期,商品名,单价,数量 from tmptable,orderitem,goods ;
where tmptable.订单号=orderitem.订单号 and orderitem.商品号=goods.商品号 and goods.商品号=thisform.text1.value;
order by tmptable.订单号 ;
into table tablethree