首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
对考生目录下的数据库“医院”建立文件名为myf的表单。表单含有一个表格控件,用于显示用户查询的信息;表单上有一个按钮选项组,含有“药查询”,“处方查询”和“查询综合”3个选项按钮;表单上有两个命令按钮,标题分别为“浏览”和“关闭”。 当选择“药查询”
对考生目录下的数据库“医院”建立文件名为myf的表单。表单含有一个表格控件,用于显示用户查询的信息;表单上有一个按钮选项组,含有“药查询”,“处方查询”和“查询综合”3个选项按钮;表单上有两个命令按钮,标题分别为“浏览”和“关闭”。 当选择“药查询”
admin
2009-02-15
80
问题
对考生目录下的数据库“医院”建立文件名为myf的表单。表单含有一个表格控件,用于显示用户查询的信息;表单上有一个按钮选项组,含有“药查询”,“处方查询”和“查询综合”3个选项按钮;表单上有两个命令按钮,标题分别为“浏览”和“关闭”。
当选择“药查询”选项按钮并单击“浏览”按钮时,在表格中显示“药信息”表的全部字段。
选择“处方查询”选项按钮并单击“浏览”按钮,表格中显示“处方信息”表的字段“处方号”和“药编号”。
选择“综合查询”选项按钮并单击“浏览”按钮时,表格中显示所开处方中含有“药编号”为“5”的处方号、药名及开此处方的医生姓名。
单击“关闭”按钮退出表单。
选项
答案
在命令窗口中输入命令:CREATE FORM myf,打开表单设计器,通过“表单控件”工具栏向表单添加1个表格、1个选项按钮组和2个命令按钮。 选中表单,在属性面板顶端的下拉框中选择Command1,修改该命令按钮控件的Caption属性值为“浏览”,以同样的方法将第二个命令按钮设置Caption属性值改为“关闭”,在属性面板顶端的下拉框中选择 (Optiongroup1),将其ButtonCount属性值改为3,右击选项按钮组,选择“编辑”快捷菜单命令,在此状态下(编辑状态下,控件四周出现蓝色框线),分别修改三个单选项的Caption属性值为“药查询”、“处方查询”和“综合查询”, 双击命令按钮“浏览”,编写该控件的Click事件,程序代码如下: ******命令按钮Command1(浏览)的Click事件代码****** DO CASE CASE Thisform.Optiongroup1.Value=1 SELECT*; FROM药信息; INTO CURSOR temp Thisform.Grid1.RecordSourceType=1 Thisform.Grid1.RecordSource="temp" CASE Thisform.optiongroup1.Value=2 SELECT处方号,药编号; FROM处方信息; INTO CURSOR temp Thisform.Grid1.RecordSourceType=1 Thisform.Grid1.RecordSource="temp" CASE Thisform.optiongroup1.Value=3 SELECT处方号,药名,医生.姓名; FROM医生,处方信息,药信息; WHERE医生.职工号=处方信息.职工号; AND处方信息.药编号=药信息.药编号; AND药信息.药编号=5; INTO CURSOR temp Thisform.Grid1.RecordSourceType=1 Thisform.Grid1.RecordSource="temp" ENDCASE ********************************************************* 以同样的方法为“关闭”命令按钮编写Click事件代码:Thisform.Release。 保存表单完成设计。运行结果如图3-75所示。 [*]
解析
本大题考查的是表单设计,在本题中需要注意的地方是选项按钮组控件中改变单选按钮的属性是ButtonCount,修改选项组中每个单选按钮的属性,可以通过属性面板中顶端的下拉框的控件名来选定,也可以右击该控件,选择“编辑”快捷菜单命令,在编辑状态下单个选定控件;程序设计中,查询语句为基本SQL查询,在程序控制上可以通过分支语句DO CASE--ENDCASE语句来进行判断选项组中选定的单选按钮,并执行相应的命令,选项组中当前选定的单选按钮,可通过:Case Thisform.Optiongroup1.Value=1,2,3……语句来判断。
转载请注明原文地址:https://kaotiyun.com/show/kdKZ777K
本试题收录于:
二级VF题库NCRE全国计算机二级分类
0
二级VF
NCRE全国计算机二级
相关试题推荐
如下图所示,某公司的办公网和商务网通过路由器R1互连,并通过R2、R3与Intemet相连。公司内部使用OSPF路由协议,与Internet连接使用静态路由。请阅读以下R1的部分配置信息,并补充空白处的配置命令或参数,按题目要求完成R1的正确配置。R
如下图所示,某校园网用10Gbps的POS技术与Internet相连,POS接口的帧格式是SONET。路由协议的选择方案是校园网内部采用OSPF动态路由协议,校园网与Intemet的连接使用静态路由协议。另外,还要求在R3上配置一个loopback接口,接
某公司网络DHCP服务器地址为192.168.0.2,可分配IP地址为192.168.0.6.192.168.0.254,缺省网关的地址为192.168.0.1。网络中某客户机从服务器获取IP地址后,在客户机上执行pingwww.bupt.edu.cn命
Serv-U服务器中可以限制用户上传信息占用存储空间的选项是()。
Cisco路由器中的路由表包含多种路由信息源时,根据缺省的管理距离值,路由器在转发数据包时,会选择的路由信息源是()。
Cisco路由器存储当前使用的操作系统映像文件和一些微代码的内存是()。
DNS正向搜索的功能是将域名解析为IP地址,Windows系统中可测试该功能的命令是()。
函数ReadData()负责从文件IN.DAT中读取1000个十进制整数到数组inBuf[]中。请编制函数Compute()分别计算出inBufV]中偶数的个数even、奇数的平均值ave1、偶数的平均值ave2及所有偶数的方差tot—v的值。函数Writ
数据库表的字段可以定义规则,规则是
数据的逻辑结构有线性结构和【】两大类。
随机试题
微分方程x(y’)2一2xy’+x=0的阶数是_______.
在影响X线减弱的因素中,错误的是
乌梢蛇区别于伪品的是
施工成本管理的措施中最易为人接受和采用的措施是()。
下列关于增值税一般纳税人注销时税务处理的说法,正确的是()。
成本与可变现净值孰低法中的“可变现净值”是指()。
根据下图回答131~135题。注:我国该年度科学研究与试验发展经费支出总额为3003.1亿元。该年度我国高等学校用于应用研究部分的“科学研究与试验发展经费支出”约为()。
Ifyouwanttogototheconcert,you’llhavetomakea______,ortherewillbenotickets.
Every101minutesorso,aDepartmentofDefenseimagingsatellitecirclestheEarth,capturingimagesfromtheequatortothep
Theconceptofstudentexchangebetweencountriesisnotanewone.Itisacommon【B1】______inmanyEuropeancountriesandtheU
最新回复
(
0
)