问题 问答题

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

注意:不允许修改窗体对象“fStud”和子窗体对象“fDetail"中未涉及的控件、属性和任何VBA代码;不允许修改表对象“tStud”。代码设计只允许补充一条语句、完成设计,不允许增删和修改其他位置已存在的语句。

按照以下窗体功能,补充事件代码设计。
在窗体中有一个组合框控件和一个文本框控件,名称分别为“Cltem”和“TxtDetail";有两个标签控件,名称分别为“Label3”和“Ldetail”;还有三个命令按钮,名称分别为“CmdList’’、“CmdRefer”和“CmdClear”。在“Cltem”组合框中选择某一项目后,“Ldetail”标签控件将显示出所选项目名加上“内容:”。在“TxtDetail”文本框中输入具体项目值后,单击“CmdRefer”命令按钮,如果“Cltem”和“TxtDetail”两个控件中均有值,则在子窗体中显示找出的相应记录,如果两个控件中不全有值,显示消息框,消息框标题为“注意”,提示文字为“查询项目和查询内容不能为空!!!”,消息框中只有一个“确定”按钮;单击“CmdList”命令按钮,在子窗体中显示“tStud”表中的全部记录;单击“CmdClear”命令按钮,将“CItem”和“TxtDetail"两个控件中的值清空。

答案

参考答案:

[操作步骤]

在设计视图中的任一位置右击,在弹出的快捷菜单中选择“事件生成器”命令,在弹出的对话框中选择“代码生成器”,如图所示,单击“确定”按钮,在空行内依次输入以下代码:

*********Add1*********

Dim aa

aa=cltem.Value

Ldetail.Caption=aa+"内容:"

*********Add1*********

*********Add2*********

fDetail.Form.RecordSource="tStud"

*********Add2*********

*********Add3*********

MsgBox"查询项目和查询内容不能为空",vbOKOnly,"注意"

*********Add3*********

如图所示。关闭编程环境窗口,按Ctrl+S保存修改。

解析:

[考点] 本题考点:窗体控件属性设置。

材料题

铁路建设的发展见证了近现代各国经济社会发展的轨迹。阅读下列材料,回答问题。

材料一:纺织工业、采矿工业和冶金工业的发展引起对改进过去运输工具的需要,这种运输工具可以运送大宗的煤和矿石。……1830年以后,公路和水路受到了铁路的挑战。……将蒸汽机安装在货车上,这方面的主要人物是采矿工程师乔治.斯蒂芬森,他首先利用一辆机车把数辆煤车从矿井拉到泰恩河。短短数年内,铁路支配了长途运输,能够以比在公路或运河上所可能有的更快的速度和更低廉的成本运送旅客和货物。到1838年,英国已拥有500哩铁路;到1870年,拥有15500哩铁路。——[美]斯塔夫里阿诺斯《全球通史》

(1)据材料一,分析铁路运输业在英国诞生的条件。据材料并结合所学知识,分析从1830年到1870年,英国铁路运输业获得飞速发展的原因。

___________________________________________________________________________________________

材料二:1880年刘铭传奏请修建铁路,刘锡鸿等众多官员纷纷反对,理由是修建铁路“不可行者八,无利者八,有害者九”如每造铁路“山川之神不安即旱渗之灾易招”;火车飞行,“路稍有不平,则或激轮而全车皆碎”;仿西洋造火车,借英法等国金钱,无由归还,“诸强邻遂相凌逼,几至亡国”“清政府认为”铁路断不宜开“的观点不无道理,遂搁置修路偈议。

材料三:19世纪末,列强竞相在中国投资建设铁路,如中东铁路,胶济铁路,广九铁路等。同时,列强激烈争夺庐汉、粤汉、津镇铁路的修筑权。

(2)根据材料二和材料三,归纳影响近代中国铁路业缓慢发展的原因。

___________________________________________________________________________________________

材料四:

(3)据材料四并结合所学知识,分析京沪高速铁路的建成将对我国政治经济和社会生活产生哪些重大影响。综合上述材料,就近代以来中国铁路的发展谈谈你的认识。___________________________________________________________________________________________

判断题