考生文件夹下有一个数据库文件“samp3.accdb”,里面已经设计好表对象“tTeacher”、窗体对象“tTest”,报表对象“rTeacher”和宏对象“m1”。试在此基础上按照以下要求补充窗体设计和报表设计: 设置“fTest”窗体。打开窗体时,

admin2021-01-07  29

问题 考生文件夹下有一个数据库文件“samp3.accdb”,里面已经设计好表对象“tTeacher”、窗体对象“tTest”,报表对象“rTeacher”和宏对象“m1”。试在此基础上按照以下要求补充窗体设计和报表设计:
设置“fTest”窗体。打开窗体时,窗体标题显示内容为:“**月**日####样例”,请按照VBA代码中的指示将代码补充完整。
    注意:①显示标题中,月和日均为本年度当月和当日,“####”为标签控件“bTitle”的内容;②显示内容中间及前后不允许出现空格;③如果月或日小于10,按实际位数显示。
    要求:本年度当月和当日的时间必须使用函数获取。

选项

答案【操作步骤】 步骤l:右键单击“fTest”窗体,在弹出的快捷菜单中选择“设计视图”命令。 步骤2:单击“设计”选项卡下“工具”功能组中的“查看代码”按钮,进入VBA代码编辑界面。 步骤3:在“Private Sub Form_Load()”事件过程中添加如下代码“Me.Caption=Trim(Month(Date)&“月”&Day(Date)&“日”&Me.bTitle.Caption&“样例”)”,如图1.25所示。 [*] 步骤4:按Ctrl+S组合键保存修改,关闭VBA代码编辑器。

解析
转载请注明原文地址:https://kaotiyun.com/show/3LSp777K
0

最新回复(0)