考生文件夹下存在一个数据库文件“samp3.accdb”,桌面已经设计好表对象“tStud”,同时还设计出窗体对象“tStud”和子窗体对象“fDetail”。请在此基础上按照以下要求补充“fStud”窗体的设计。 按照以下窗体功能,补充事件代码设计。

admin2019-01-09  26

问题 考生文件夹下存在一个数据库文件“samp3.accdb”,桌面已经设计好表对象“tStud”,同时还设计出窗体对象“tStud”和子窗体对象“fDetail”。请在此基础上按照以下要求补充“fStud”窗体的设计。
按照以下窗体功能,补充事件代码设计。
在窗体中有一个组合框控件和一个文本框控件,名称分别为“CItem”和“TxtDeta”;有两个标签控件,名称分别为“Label3”和“Ldetail”;还有三个命令按钮,名称分别为“CmdList”、“CmdRefer”和“CmdClear”。在“CItem”组合框中选择某一项目后,“Ldetail”标签控件将显示出所选项目名加上“内容:”。在“TxtDetail”文本框中输入具体项目值后,单击“CmdRefer”命令按钮,如果“Chem”和“TxtDetail”两个

选项

答案[操作步骤] 在设计视图中的任一位置右击,在弹出的快捷菜单中选择“事件生成器”命令,在弹出的对活框中选择“代码生成器”,如图3.234所示,单击“确定”按钮,在空行内依次输入以下代码: ’*********Add1********* Dim aa aa=chem.Value Ldetail.Caption=aa+"内容:" ’*********Add1********* ’*********Add2********* fDetail.Form.RecordSoume="tStud" ’*********Add2********* ’*********Add3********* MsgBox"查询项目和查询内容不能为空",vbOKOrdy,"注意" ’*********Add3********* [*] 如图3.235所示。关闭编程环境窗口,按Ctrl+S保存修改。 [*]

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

最新回复(0)