2. 计算机
  3. 43考生文件夹下存在一个数据库文件“samp3．mdb”，里面已经设计好表对象“tStud”、查询对象“qStud”和“tTimer”窗体对象，同时还设计出以“qStud”为数据源的报表对象“rStud”。试在此基础上按照以下要求补充报表和窗体设计。 有

43考生文件夹下存在一个数据库文件“samp3．mdb”，里面已经设计好表对象“tStud”、查询对象“qStud”和“tTimer”窗体对象，同时还设计出以“qStud”为数据源的报表对象“rStud”。试在此基础上按照以下要求补充报表和窗体设计。 有

admin2019-01-09  46
问题 43考生文件夹下存在一个数据库文件“samp3．mdb”，里面已经设计好表对象“tStud”、查询对象“qStud”和“tTimer”窗体对象，同时还设计出以“qStud”为数据源的报表对象“rStud”。试在此基础上按照以下要求补充报表和窗体设计。
有一个名为“tTimer”的计时器窗体。运行窗体后，窗体标题自动显示为“计时器”；单击“设置"按钮(名称为“cmdSet”)，在弹出的输入框中输入计时秒数(10以内的数)，单击“确定”按钮；单击“开始”按钮(名称为“cmdStar”)开始计时，同时在文本框(名称为“txtList”)中显示计时的秒数。计时间到时，停止计时并响铃，同时将文本框清零。根据以上描述，按照VBA代码中的指示将代码补充完整。
    注意：不允许改动数据库中的表对象“tStud”和查询对象“qStud”，同时也不允许修改报表对象“rStud”和窗体对象“fTimer”中已有的以及未涉及的控件和属性。
    程序代码只允许在“*******Add******”与“*******Add******”之间的空行内补充一行语句、完成设计，不允许增删和修改其他位置已存在的语句。
选项
答案【操作步骤】 步骤1：选择“窗体”对象，右键单击“fTimer”窗体，在弹出的快捷菜单中选择“设计视图”命令。 步骤2：双击标尺相交处的“窗体选定器”，打开“属性表”对话框，在该对话框中单击“事件”选项卡下“加载”行右侧的事件生成器按钮，进入VBA代码编辑区。 步骤3：在“’*****add2*****”区域的空白行输入如下代码： Form．Caption＝"计时器" 代码输入位置如图4—256所示。 [*] 步骤4：右键单击“cmdStar”按钮，在弹出的快捷菜单中选择“属性”命令，打开“属性表”对话框，在该对话框中单击“事件”选项卡下“单击”行右侧的事件生成器按钮，进入VBA代码编辑区。 步骤5：在“’*****add1*****”区域的空白行输入如下代码： Dim f As Integer。 在“’*****add3*****”区域的空白行输入“Beep”。 在“’*****add4*****”区域的空白行输入“txtList＝s”。 代码输入位置如图4—257所示。 [*] 步骤6：单击快速工具栏中的“保存”按钮，然后关闭VBA代码编辑区。 步骤7：单击快速工具栏中的“保存”按钮，然后关闭“设计视图”。 补充：①双击左侧导航窗格中的窗体“fTimer”，弹出如图4—258所示的“计时器”窗口界面。 [*] ②单击“设置”按钮，在弹出的对话框中的“请输入计时范围：”下方的文本框中输入10以内的数，比如输入8，如图4—259所示，单击“确定”按钮。 [*] ③单击“开始按钮”，在左边的文框中显示计时秒数，如图4—260所示，是计时到第4秒的时候。计时停止后，铃声响起，并且文本框中内容清零。 [*] 以上补充内容不写入操作步骤，只是为了演示前面的操作结果。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/lYMp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)