第20题: [简答题]单击“关闭”按钮退出表单。 参考答案:在命令窗口中输入命令: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,修改选项组中每个单选按钮的属性,可以通过属性面板中顶端的下拉框的控件名来选定,也可
第23题: [多项选择]下列选项中,关于运输合同的说法正确的是( )。 A. 运输合同是双务、有偿合同 B. 所有运输合同都是诺成性合同 C. 所有运输合同都是格式合同 D. 大部分运输合同是格式合同 E. 大部分运输合同是实践性合同 参考答案:A,D 答案解析:[解析] 本题考核运输合同。运输合同是双务、有偿合同;大部分运输合同都是诺成性合同;大部分运输合同是格式合同。