在考生文件夹下完成下列操作:
为了查询不同歌手演唱的歌曲,请设计一个表单mform.scx,其界面如下图所示:
表单控件名为formone表单的标题为“歌曲查询”。表单左侧有一个标签控件Labelone,显示内容为“输入歌手姓名”,一个文本框控件Textone用于输入歌手姓名, 个命令按钮Commanda和Commandb分别显示“查询”和“退出”,以及一个表格控件Gridone。
表单运行时,用户首先在文本框中输入歌手“刘德华”,然后单击“查询”按钮,如果输入正确,在表单右侧以表格形式显示此歌手的演唱的歌曲信息,包括歌曲名称、语言和歌,按点歌码升序排序,并将此信息存入tb.dbf文件中。单击“退出”按钮将关闭表单。
第1题:
ec数据库中含有两个数据库表“购买”和“会员”。对ec数据库设计一个表单myf。表单的标题为“会员购买统计”。表单左侧有标题为“请选择会员”标签和用于选择“会员号”的组合框以及“查询”和“退出”两个命令按钮。表单中还有一个表格控件。
表单运行时,用户在组合框中选择会员号,单击“查询”按钮,在表单上的表格控件显示查询该会员的“会员号”、“姓名”和所购买的商品的“总金额”。
单击“关闭”按钮,关闭表单。
第2题:
在考生文件夹下完成如下综合应用:
设计一个表单“bdl”,表单标题名为“部门年度数据查询”,要求如下:
(1)为表单建立数据环境,向数据环境添加部门销售表。
(2)当在“年度”标签微调控件中选择年度并单击“查询”按钮,则会在下面的表格控件内显示该年度各部门的“销售额”和“利润”。指定微调控件上箭头按钮(Spinner—HighValue属性)与下箭头按钮(SpinnerLowValue属性)值分别为“2008”和“2003”,缺省值(Value属性)为“2007”,增量(Increment属性)为“1”。
(3)单击“关闭”按钮,关闭表单。
【考点指引】本大题主要考查表单的设计,重点是微调控件和表格控件的使用。
【操作步骤】
①选择【文件】→【新建】命令,选择“表单”,单击“新建文件”按钮打开表单设计器,在表单属性窗口中将Caption属性值修改为“部门年度数据查询”,单击表单控件工具栏上的“标签”控件图标,为表单添加一个标签Label1,单击表单控件工具栏上的“微调控件”控件图标,为表单添加一个微调控件Spinner1,单击表单控件工具栏上的“命令按钮”控件图标,为表单添加两个命令按钮Command1和Com–mand2,单击表单控件工具栏上的“表格”控件图标,再添加一个表格控件Grid1。
②选择标签Label1,在标签属性窗口中将标签Label1的Caption属性值修改为“年度”。
③选择微调控件Spinner1,在微调控件属性窗口中将SpinnerHighValue属性值修改为“2008”,将Spinner–LowValue属性值修改为“2003”,将Value属性值修改为“2007”。
④分别选择两个命令按钮,在按钮属性窗口中将命令按钮Command1的Caption属性值修改为“查询”,Command2的Caption属性值修改为“关闭”,如图29–1所示。双击“关闭”命令按钮,在Click事件中输入代码:ThisForm.Release,用来关闭表单。
⑤在表单设计器中,用鼠标右键单击表单空白处,在弹出的快捷菜单中选择【数据环境】命令,打开表单的数据环境,选择数据表文件“部门销售”添加到数据环境中。
⑥选择表格控件“Grid1”,在表格控件属性窗口中将“RecordSource”属性值修改为“〝″”,将“RecordSourceType”属性值修改为“1”。
⑦双击“查询”命令按钮,在Click事件中输入代码:
SELECT*INTO CURSOR tmp FROM部门销售WHERE年度=ALLTRIM(STR(INT(ThisForm.Spin–ner1.Value)))
ThisForm.Grid1.RecordSourceType=1
ThisForm.Grid1.RecordSource=〝trap″
ThisForm.Grid1.Refresh
⑧选择【表单】→【执行表单】命令,系统首先要求保存该表单文件,在弹出的“另存为”对话框中输入表单文件名“bd1”,保存在考生文件夹下,然后运行表单。
第3题:
在考生文件夹下完成下列操作:
在考生文件夹下有一表单文件formone.scx和一个自定义类库文件classlibone.vcx。打开表单文件formone.scx,然后在表单设计器环境下完成如下操作。
1.将表单的标题设置为“简单操作”,并使表单不能最大化。
2.为表单添加一个名为np的属性,其初始值为系统当前日期(不含时间)。
3.为表单添加一个名为nm的方法,其代码如下:
thisform.np=thisform.np+1
wait dtoe(thisform.np)window
4.在表单中添加一个mybutton按钮,该按钮类定义于类库文件classlibone.vex。将该按钮的Name属性设置为mcb,然后设置其Click事件代码,其功能是调用表单的nm方法。
第4题:
在考生文件夹下设计名为supper的表单(表单名和文件名均为supper),表单的标题为“零件供应情况”。表单中有1个表格控件和2个命令按钮查询和退出。
运行表单时单击查询命令按钮后,表格控件中显示“供应”表工程号为“A1”所使用的零件的“零件名”、“颜色”、和“重量”。并将结果放到表jie中。
单击“退出”按钮关闭表单。
第5题:
“ec”数据库中含有“购买”和“会员”两个数据库表。对“ec”数据库设计一个表单“myform”。表单的标题为“会员购买统计”。表单左侧有标题为“请选择会员”标签和用于选择“会员号”的组合框以及“查询”和“退出”两个命令按钮。表单中还有1个表格控件。表单运行时,用户在组合框中选择会员号,单击“查询”按钮,在表单上的表格控件显示查询该会员的“会员号”、“姓名”和所购买的商品的“总金额”。单击“退出”按钮,关闭表单。
表单界面如图所示。