计算机二级vf上机试题81-90

《计算机二级vf上机试题81-90》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、81UPDATE商品SET单价=单价*1.1SELECT*FROM商品WHERE产地="北京""仓库管理"数据库中含有三个数据库表"订单"、"职工"和"供应商"。设计一个表单ckform，表单的标题为"仓库管理"。表单左侧有标题为"选择订购单号"标签和用于选择"订单号"的组合框，以及"查询"和"退出"两个命令按钮和一个表格控件。图2-51表单示例表单运行时，用户在组合框中选择"订单号"（如CR-45），单击"查询"按钮，查询出对应的订单的"供应商名"、"职工号"，所放"仓库号"和"订购日期"。表单的表格控件用于显

2、示查询结果。单击"退出"按钮，关闭表单。如图2-51所示表3-68表单及控件属性设置续表步骤5：双击命令按钮，编写各个命令按钮的Click事件代码。各按钮代码如下：*****"查询"按钮的Click事件代码（以下SQL查询语句是通过查询设计器生成）*****XI=ALLTRIM(THISFORM.COMBO1.DISPLAYVALUE)THISFORM.GRID1.RECORDSOURCE=";SELECT供应商.供应商名,订单.职工号,职工.仓库号,订单.订购日期;FROM仓库管理!订单INNERJOIN仓库管

3、理!职工;INNERJOIN仓库管理!供应商;ON订单.供应商号=供应商.供应商号;ON订单.职工号=职工.职工号;WHERE订单.订单号=XI;INTOCURSORCTEMP"步骤1：在命令窗口执行命令：MODIFYCOMMANDSPVW，打开命令文件编辑器编写视图定义代码。步骤2：在编辑器中输入如下程序代码：OPENDATABASEECOMMERCECREATEVIEWSPVIEWAS;SELECTCustomer.会员号,Customer.姓名,Article.商品号,Orderitem.单价,;Order

4、item.数量,Orderitem.数量*Orderitem.单价AS金额;FROMecommerce!articleINNERJOINecommerce!orderitem;INNERJOINecommerce!customer;ONOrderitem.会员号=Customer.会员号;ONArticle.商品号=Orderitem.商品号;ORDERBYCustomer.会员号步骤3：在命令窗口执行命令：DOSPVW，执行文件生成视图文件。83②在编辑器中输入SQL查询代码：UPDATESCORESET成绩=

5、成绩+5。（1）在"成绩管理"数据库中使用SQL语句查询学生的"姓名"和"年龄"（计算年龄的公式是：2008-Year（出生日期），"年龄"作为字段名），结果保存在一个新表temp中，将使用的SQL语句保存在stage.txt中。步骤1：在命令窗口执行命令：MODIFYFILESTAGE，打开文本文件编辑器编写代码。步骤2：在编辑器中输入如下程序代码：SELECTStudent.姓名,2008-YEAR(出生日期)AS年龄;FROM成绩管理!student;INTOTABLEtemp.dbf"成绩管理"数据库中含

6、有三个数据库表：student、score和course。图2-53表单示例对"成绩管理"数据库数据设计一个表单testform，表单的标题为"学生成绩查询"。表单左侧有标签"选择学号"和用于选择"学号"的组合框，在表单中还包括"查询"和"退出"两个命令按钮以及一个表格控件。如图2-53所示。表单运行时，用户在组合框中选择学号，单击"查询"按钮，在表单中以表格形式显示该生所选"课程名"和"成绩"。单击"退出"按钮，关闭表单。【操作步骤】步骤1：在命令窗口执行命令：OPENDATABASE成绩管理，打开"成绩管理"

7、数据库环境。步骤2：在命令窗口执行命令：CREATEFORMTESTFORM，打开表单设计器新建表单。步骤3：右击表单选择【数据环境】快捷菜单命令，继续在表单数据环境中单击右键选择【添加】快捷菜单命令，在"添加表或视图"对话框中双击student、score和course表，将表添加到数据环境中。步骤4：从"表单控件"工具栏中依次向表单添加一个标签、一个组合框、一个表格和两个命令按钮控件。在"属性"面板的下拉框中选择表单对象，在"全部"选项卡中修改对象属性值，见表3-70。表3-70表单及控件属性设置续表步骤5：

8、双击命令按钮，编写各个命令按钮的Click事件代码。各按钮代码如下：*****"查询"按钮的Click事件代码（以下SQL查询语句是通过查询设计器生成）*****THISFORM.GRID1.RECORDSOURCE="SELECTCourse.课程名称,Score.成绩;FROM成绩管理!courseINNERJOIN成绩管理!score;ONCourse.课程编号=S