考生文件夹下有一个数据库文件“samp3.accdb”,其中已经设计好表对象“产品”、“供应商”,查询对象“按供应商查询”,窗体对象“characterS”和宏对象“打开产品表”、“运行查询”和“关闭窗口”。请按以下要求完成设计。 1.创建一个名为

admin2015-07-10  23

问题 考生文件夹下有一个数据库文件“samp3.accdb”,其中已经设计好表对象“产品”、“供应商”,查询对象“按供应商查询”,窗体对象“characterS”和宏对象“打开产品表”、“运行查询”和“关闭窗口”。请按以下要求完成设计。
    1.创建一个名为“menu”的窗体,要求如下。
    (1)对窗体进行如下设置:在距窗体左边1厘米、距上边0.6厘米处依次水平放置三个命令按钮“显示产品表”(名为“bt1”)、“查询”(名为“bt2”)和“退出”(名为“bt3”),命令按钮的宽度均为2厘米,高度为1.5厘米,每个命令按钮相隔1厘米。
    (2)设置窗体标题为“主菜单”。
    (3)当单击“显示产品表”命令按钮时,运行宏“打开产品表”,就可以浏览“产品”表;当单击“查询”命令按钮时,运行宏“运行查询”,即可启动查询“按供应商查询”;当单击“退出”命令按钮时,运行宏“关闭窗口”,关闭“menu”窗体。
    2.窗体“characterS”中有两个文本框,名称分别为“bTxt1”和“bTxt2”,还有一个命令按钮,名称为“bC”。窗体功能为:单击“bC”按钮将“bTxt1”文本框中已输入的字符串反向显示在“bTxt2”文本框中。请按照VBA代码中的指示将代码补充完整。
    注意:不允许修改数据库中的表对象“产品”、“供应商”,查询对象“按供应商查询”和宏对象“打开产品表”、“运行查询”和“关闭窗口”;不允许修改窗体对象“characterS”中未涉及的控件和属性。程序代码只允许在“*******Add*******”与“*******Add*******”之间的空行内补充一行语句、完成设计,不允许增删和修改其他位置已存在的语句。

选项

答案1.(1)【操作步骤】 步骤1:单击“创建”选项卡下“窗体”组中的“窗体设计”按钮,如图4.67所示。按Ctrl+S组合键,弹出“另存为”对话框,在“窗体名称(N)”文本框里输入“menu”,然后单击“确定”按钮。 [*] 步骤2:单击“设计”选项卡下“控件”组中的“按钮”控件,如图4.68所示,然后在窗体任意位置单击,关闭弹出的“命令按钮向导”对话框。右键单击新建的按钮,从弹出的快捷菜单中选择“属性”命令,在打开的“属性表”对话框中,单击“全部”选项卡,在其“名称”行中输入“bt1”,“标题”行中输入“显示产品表”,“宽度”行中输入“2cm”,“高度”行中输入“1.5cm”,“上边距”行中输入“0.6cm”,“左”行中输入“1cm”,如图4.69所示。关闭属性窗口。 [*] [*] 步骤3:单击“设计”选项卡“控件”组中的“按钮”控件。右键单击该按钮,从弹出的快捷菜单中选择“属性”命令,在打开的“属性表”对话框中,单击“全部”选项卡,在其“名称”行中输入“bt2”,“标题”行中输入“查询”,“宽度”行中输入“2cm”,“高度”行中输入“1.5cm”,“上边距”行中输入“0.6cm”,“左”行中输入"4cm”。关闭属性窗口。 步骤4:单击“设计”选项卡“控件”组中的“按钮”控件。右键单击该按钮,从弹出的快捷菜单中选择“属性”命令,在打开的“属性表”对话框中,单击“全部”选项卡,在其“名称”行中输入“bt3”,“标题”行中输入“退出”,“宽度”行中输入“2cm”,“高度”行中输入“1.5cm”,“上边距”行中输入“0.6cm”,“左”行中输入“7cm”,最终结果如图4.70所示。关闭属性窗口。 [*] 1.(2)【操作步骤】 在窗体设计视图的任意区域右击,在弹出的快捷菜单中选择“属性”命令,单击“所选内容的类型”右侧的下三角按钮,在弹出的下拉列表中选择“窗体”命令,即可进入窗体属性,选择“全部”选项卡,在其“标题”行中输入“主菜单”。 1.(3)【操作步骤】 步骤1:右键单击命令按钮“bt1”,在弹出的快捷菜单中选择“属性”命令。在打开的“属性表”对话框中,单击“事件”选项卡,在“单击”行中选择下拉列表框的值为“打开步骤2:右键单击命令按钮“bt2”,在弹出的快捷菜单中选择“属性”命令。在打开的“属性表”对话框中单击“事件”选项卡,在“单击”行中选择下拉列表框的值为“运行查询”,关闭属性窗口。 [*] 步骤3:右键单击命令按钮“bt3”,在弹出的快捷菜单中选择“属性”命令。在打开的“属性表”对话框中,单击“事件”选项卡,在“单击”属性行中选择下拉列表框的值为“关闭窗口”,关闭属性窗口。 步骤4:单击快速工具栏中“保存”按钮[*],关闭设计视图。 2.【操作步骤】 步骤1:选择“窗体”对象,右键单击“characters”窗体,在弹出的快捷菜单中选择“设计视图”命令。 步骤2:右键单击命令按钮“bC”,在弹出的快捷菜单中选择“属性”命令。 步骤3:在打开的“属性表”对话框中,在“事件”选项卡中单击“单击”行右侧的“选择生成器”按钮[*],进入代码编辑区,如图4.72所示。输入代码: [*] 设置循环 设置循环 ********* Add1 ********* For i=Len(s1)To 1 Step—1 设置循环 *********Add1 ********* 设置循环 将结果显示在bTxt2中 设置循环 *********Add2********* Me.bTxt2=s2 设置循环 *********Add2********* 步骤4:单击快速工具栏中“保存”按钮[*],关闭设计视图。

解析
转载请注明原文地址:https://jikaoti.com/ti/Vm20FFFM
0

最新回复(0)