问题
问答题
在考生文件夹下存在一个数据库文件samp3.mdb，里面已经设计好表对象tEmp、窗体对象fEmp、报表对象rEmp及宏对象mgmp，试在此基础上按照以下要求补充设计。
窗体加载时将考生文件夹下的图片文件test.bmp设置为窗体fEInp的背景。窗体“加载”事件代码已提供，请补充完整。要求背景图像文件当前路径必须用CurrentProject.Path获得。
[注意] 不允许修改数据库中的表对象tEmp和宏对象mEmp；不允许修改窗体对象fgmp和报表对象rEmp中未涉及的控件和属性。程序代码只允许在两行“* * * * * Add* * * * *”之间的空行内补充一行语句完成设计，不允许增删和修改其他位置已存在的语句。
答案
参考答案：
在设计视图下，选中整个窗体并打开属性对话框，单击“事件”标签，单击“加载”事件最右侧的
按钮进入VBA编程窗口，在“* * * * * Add * * * * *”之间输入语句“Me.Picture=CurrentProject.Path＆"\test.bmp"”。其中：“Me.Picture”表示当前窗体的“图片”属性，“CurrentProject．Path”代表当前路径，与字符串”\test.bmp"进行连接即形成了文件test.bmp的完整路径。如图3-7所示。保存程序后关闭编程窗口，回到窗体设计视图。保存窗体后关闭。双击fEmp窗体，重新打开，可看到背景图片。完成上述4题的操作后，关闭数据库文件samp3.mdb。
