首页 百科知识 单选按钮控件怎么设置

单选按钮控件怎么设置

时间:2022-09-16 百科知识 版权反馈
【摘要】:步骤1:双击标尺相交的“窗体选择器”,弹出“属性表”对话框,在该对话框中单击“事件”选项卡,然后再单击该选项卡“加载”行的事件生成器按钮,进入VBA代码编辑区。步骤2:在“*****Addl*****”区域的空白行中输入“Me.Caption—Date”;在“*****Add2*****”区域的空白行中输入“Me.fTitle.Caption一″读者借阅信息″”。

考生文件夹下存在一个数据库文件“samp3.accdb”,里面已经设计好表对象“tBorrow”、“tReader”和‘tBook”,查询对象“qT”,窗体对象“fReader”和报表对象“rReader”。请在此基础上按照以下要求补充设计。

(1)在报表“rReader”的报表页眉节区内添加一个标签控件,其名称为“bTitle”,标题显示为“高级读者借阅情况”,字体名称为“黑体”,字体大小为22,同时将其安排在距上边0.5厘米、距左侧2厘米的位置。

 


答案:

步骤1:选择“报表”对象,右键单击“rReader”报表,在弹出的快捷菜单中选择“设计视图”命令,打开设计视图。 

步骤2:右键单击“页面页眉”节的任一点,在弹出的快捷菜单中选择“报表页眉/页脚(H)”命令。 

步骤3:单击“报表设计工具”下的“设计”选项卡,然后再单击该选项卡下“控件”组中的“标签”控件。 

步骤4:在“报表页眉”节区中单击任一点,即可出现标签控件。右键单击该控件,在弹出的快捷菜单中选择“属性”命令,弹出“属性表”对话框,然后单击该对话框中的“全部”选项卡,在该选项卡下的“名称”行中输入“bTitle”,在“标题”行中输入“高级读者借阅情况”,在“字体名称”行的下拉列表中选择“黑体”,在“字号”行中输入“22”,单击快速工具栏中的“保存”按钮,关闭属性表。



(2)设计报表“rReader”的主体节区为“tSex”文本框控件设置数据来源显示性别信息,并要求按“借书日1期”字段升序显示,“借书日期”的显示格式为“长日期”的形式。

 


答案:

步骤1:右键单击文本框控件“tSex”(即未绑定),在弹出的快捷菜单中选择“属性”命令,弹出“属性表”对话框,然后单击该对话框的“全部”选项卡,在该选项卡的“控件来源”下拉列表框中选择“性别”,单击快速]:具栏中的“保存”按钮,关闭属性表。 

步骤2:在报表主体节区中右键单击文本框控件“借书日期”,在弹出的快捷菜单中选择“属性”命令,打开“属性表”对话框,然后单击该对话框的“全部”选项卡,在该选项卡的“格式”下拉列表中选择“长日期”,然后单击快速工具栏中的“保存”按钮,关闭属性表。 

步骤3:在“分组、排序和汇总”窗口中单击“添加排序”按钮,在“排序依据”行的“选择字段”下拉列表中选择“借书日期”字段,在“排序次序”下拉列表中选择“升序”。 

步骤4:单击快速工具栏中的“保存”按钮,然后关闭“设计视图”。



(3)设置窗体“bList”按钮的标题为“高级读者信息”;单击该按钮,其事件代码预览方式打开“rReader”报‘表,条件输出高级读者(职称为“教授”和“副教授”的读者)借阅信息。

 


答案:

步骤1:选择“窗体”对象,右键单击“fReader”窗体,在弹出的快捷菜单中选择“设计视图”命令,打开窗体的设计视图。步骤2:在“窗体页脚”区中,右键单击命令按钮“blit”,在弹出的快捷菜单中选择“属性”命令,打开“属性表”对话框,然后单击该对话框的“全部”选项卡,在该选项卡下的“标题”行中输入“高级读者信息”;在该窗口中,单击“事件”选项卡,单击“单击”行右侧的事件生成器按钮,进入VBA代码编辑区。 

步骤3:在“’*****Add3*****”区域的空白行输入“DoCmd.OpenReport”rReader”,acViewPreview,”qT”,”职称一7教授’or职称一’副教授“…。 

步骤4:单击快速工具栏中的“保存”按钮,关闭VBA代码编辑区。



(4)窗体加载时设置窗体标题属性为系统当前日期,设置“fTitle”标签的标题为“读者借阅信息”。 

’注意:不允许修改窗体对象“fReader”和报表对象“rReader”中未涉及的控件和属性;不允许修改表对象l"tBorrow”、“tReader”和“tBook”及查询对象“qT”的内容;程序代码只允许在“*****Add*****”与“*****Add*****”之间的空行内补充一行语句、完成设计,不允许增删和修改其它位置已存在的语句。

 


答案:

步骤1:双击标尺相交的“窗体选择器”,弹出“属性表”对话框,在该对话框中单击“事件”选项卡,然后再单击该选项卡“加载”行的事件生成器按钮,进入VBA代码编辑区。 

步骤2:在“*****Addl*****”区域的空白行中输入“Me.Caption—Date”;在“*****Add2*****”区域的空白行中输入“Me.fTitle.Caption一″读者借阅信息″”。 

步骤3:单击快速工具栏中的“保存”按钮,然后关闭VBA代码编辑区。 

步骤4:单击快速工具栏中的“保存”按钮,然后关闭“设计视图”。

免责声明:以上内容源自网络,版权归原作者所有,如有侵犯您的原创版权请告知,我们将尽快删除相关内容。

我要反馈