2. 计算机
  3. 在考生：艾件夹下有一个“Acc3．mdb”数据库。 (1)在“基本情况”窗体中添加一个名称为“命令按钮1”、标题为“所属部门”的按钮。 (2)编写按钮代码实现单击该按钮时弹出对应部门的消息框(要使用Select Case语句实现)。单击按钮后的结果如图3所

在考生：艾件夹下有一个“Acc3．mdb”数据库。 (1)在“基本情况”窗体中添加一个名称为“命令按钮1”、标题为“所属部门”的按钮。 (2)编写按钮代码实现单击该按钮时弹出对应部门的消息框(要使用Select Case语句实现)。单击按钮后的结果如图3所

admin2010-04-02  36
问题 在考生：艾件夹下有一个“Acc3．mdb”数据库。
(1)在“基本情况”窗体中添加一个名称为“命令按钮1”、标题为“所属部门”的按钮。
(2)编写按钮代码实现单击该按钮时弹出对应部门的消息框(要使用Select Case语句实现)。单击按钮后的结果如图3所示。

(3)在“基本情况”窗体中添加一个名称为“命令按钮2”、标题为“计算工龄”的按钮。
(4)编写按钮代码实现单击该按钮时弹出人员的T龄(工龄＝Date()－调入日期)。单击按钮后的结果如图4所示。
选项
答案(1)在“Acc3．mdb”数据库窗口中单击“窗体”对．象，选择“基本情况”窗体，单击“设计”按钮，打开设计视图。从工具箱中选择按钮添加到窗体中，取消按钮向导，输入按钮文本。 (2)选中按钮，右键单击选择“事件生成器”，在“选择生成器”对话框中选择“代码生成器”，单击“确定”按钮，在“Private Sub”和“End Sub”之间添加如下代码： Dim Department As Integer I)epartment＝Forms![基本情况]![部门ID] Select Case Department Casel MsgBox”属于研发部”，vbInformation，”所属部门” Case2 MsgBox”属于管理部”，vbInformation，”所属部门” Case3 MsgBox”属于服务部”，vbInformation，”所属部门” End Select 单击工具栏中的“保存”按钮保存修改。 (3)从工具箱中选择按钮添加到窗体中，取消按钮向导，输入按钮文本。 (4)右键单击按钮，选择“事件生成器”，在“选择生成器”对话框中选择“代码生成器”，单击“确定”按钮，在“Private Sub”和“End Sub”之间添加如下代码： Dim D As Date Dim DI As Date D＝Date D1＝Year(D) MsgBox Year(D)－Year(Forms![基本情况]![调入日期])，vbInformation，”您的工龄(年)”单击工具栏中的“保存”按钮保存修改。
解析
转载请注明原文地址:https://jikaoti.com/ti/D6XiFFFM
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

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