(1)在考生文件夹下建立如下图所示的表单文件form_three,表单名为form1。标签控件命名为Ln,文本框控件命名为Textn,命令按钮控件命名为Commands。表单运行时在文本框中输入职员号,单击“开始查询”命令按钮查询该职员所经手的订购单信息(

admin2017-07-28  21

问题 (1)在考生文件夹下建立如下图所示的表单文件form_three,表单名为form1。标签控件命名为Ln,文本框控件命名为Textn,命令按钮控件命名为Commands。表单运行时在文本框中输入职员号,单击“开始查询”命令按钮查询该职员所经手的订购单信息(取自order表),查询的信息包括订单号、客户号、签订日期和金额,查询结果按签订日期升序排列,将结果存储到用字母“t”加上职员号命名的表文件中。例如,职员101经手的订购单信息将存储在表t101中,每次完成查询后关闭表单。

    (2)建立菜单mymenu,其中包含“查询”和“退出”两个菜单项,选择“查询”时运行表单form_three(直接用命令),选择“退出”时返回到默认的系统菜单(直接用命令)。
    (3)最后从菜单运行所建立的表单,并依次查询职员107、111和115经手的订购单信息。

选项

答案【操作步骤】 步骤1:在命令窗口输入“Create form form_three”,按下回车键建立一个表单,通过表单控件工具栏按题目要求为表单添加控件。在表单属性窗口中修改标签的Name属性为“Ln”,Caption属性为“输入职员号”,文本框的Name属性为“Textn”,命令按钮的Name属性为“Commands”,Caption属性为“开始查询”。 步骤2:写入命令按钮的Click事件代码如下: ****“开始查询”按钮的Click事件代码**** &&对x进行赋值 x=ThisForm.textn.Value &&选择查询字段,指定字段来源 a="SELECT Order.订单号,Order.客户号,Order.签订日期,Order.金额FROM order; &&设置查询条件 WHERE Order.职员号=x; &&查询结果按签定日期升序排列并将结果存储入表t中 ORDER BY Order.签订日期INTO TABLE t"+x &a *********************** 步骤3:新建一个菜单,菜单项为查询和退出,对应的命令分别为“DO FORM form_three”和“SETSYSMENU TO DEFAULT”。保存菜单名为“mymenu”并生成可执行菜单。 步骤4:运行菜单,单击“查询”打开表单并按要求运行表单。

解析
转载请注明原文地址:https://kaotiyun.com/show/LPBp777K
0

最新回复(0)