在考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好窗体对象“ffest”及宏对象“m1”。试在此基础上按照以下要求补充窗体设计: (1)在窗体的窗体页眉节区位置添加一个标签控件,其名称为“bTitle”,标题显示为“窗体测试

admin2017-03-21  34

问题 在考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好窗体对象“ffest”及宏对象“m1”。试在此基础上按照以下要求补充窗体设计:
    (1)在窗体的窗体页眉节区位置添加一个标签控件,其名称为“bTitle”,标题显示为“窗体测试”。
    (2)打开窗体时,窗体标题显示内容为:“**月**日####”,请按照VBA代码中的指示将代码补充完整。
    注意:①显示标题中,月和日均为本年度当月和当日,“####”为标签控件“bTitle”的内容;②显示内容中间及前后不允许出现空格;③如果月或日小于10,按实际位数显示。要求:本年度当月和当日的时间必须使用函数获取。
    (3)在窗体主体节区内添加二个复选框控件,复选框选项按钮分别命名为“opt1”和“opt2”,对应的复选框标签显示内容分别为“类型a”和“类型b”,标签名称分别为“bopt1”和“bopt2”;分别设置复选框选项按钮opt1和opt2的“默认值”属性为假值。
    (4)在窗体页脚节区位置添加一个命令按钮,命名为“bTest”,按钮标题为“测试”;设置命令按钮bTest的单击事件属性为给定的宏对象m1。注意:不允许修改窗体对象Test中未涉及的属性;不允许修改宏对象m1。程序代码只允许在“**Add**"与“**Add**”之间的空行内补充一行语句完成设计,不允许增删和修改其它位置已存在的语句。

选项

答案【操作步骤】 (1)步骤1:双击“samp3.accdb”数据库,在对象导航窗格中右键单击“frest”窗体,选择右键菜单“设计视图”,进入窗体的设计视图。 步骤2:在<窗体设计工具>选项卡的<控件>命令组中单击“标签”控件,在窗体页眉区内单击鼠标绘制,在光标闪动处输入“窗体测试”;右击标签,在弹出的快捷菜单上选择“属性”命令,在<属性表>对话框内修改“名称”为:bTitle,如图2.13所示。 [*] 步骤3:单击快速访问工具栏中的“保存”按钮,保存本步骤设计。 (2)步骤1:在<属性表>对话框上方的对象选择器中选中“窗体”,单击“事件”选项卡,在“加载”行内选择“事件过程”,单击“代码生成器”按钮,进入到VBA代码编辑界面。在“****Add****”之间输入:Me.Caption=Month(Date)&”月”&Day(Date)&”日”&bTitle.Caption 步骤2:单击快速访问工具栏中的“保存”按钮,关闭代码窗口。单击<窗体设计工具>选项卡中<视图>命令组的“窗体视图”命令查看窗体运行时左上角标题。 (3)步骤1:在<窗体设计工具>选项卡的<控件>命令组中单击“复选框”控件,在窗体主体区内单击鼠标绘制,连续绘制两个复选框并上下排列。 步骤2:单击上方复选框控件,在<属性表>对话框内修改“名称”为“optl”,“默认值”为“=False”,选择其右侧标签控件,在<属性表>对话框内修改“名称”为“boptl”,“标题”为“类型a”。单击下方复选框控件,在<属性表>对话框内修改“名称”为“opt2”,“默认值”为“=False”,选择其右侧标签控件,在<属性表>对话框内修改“名称”为“bopt2”,“标题”为“类型b”。 步骤3:单击快速访问工具栏中的“保存”按钮。 (4)步骤1:在<窗体设计工具>选项卡的<控件>命令组中单击“命令按钮”控件,在窗体页脚区内单击鼠标绘制,在弹出的<命令按钮向导>对话框中单击“取消”。 步骤2:单击命令按钮控件,在<属性表>对话框内修改“名称”为“bTest”,“标题”为“测试”;单击<属性表>对话框的“事件”选项卡,单击“单击”事件后的向下黑色小箭头,在下拉列表中选择宏名“ml”。 步骤3:单击快速访问工具栏中的“保存”按钮,单击<窗体设计工具>选项卡中<视图>命令组的“窗体视图”运行窗体,单击“测试”按钮,出现如下宏执行时的对话框如图2.14所示。 [*] 步骤4:单击“确定”按钮,并关闭窗体。 步骤5:关闭“samp3.accdb”窗口。

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

最新回复(0)