在考生文件夹下有myform表单文件,将该表单设置为顶层表单,然后设计一个菜单,并将新建立的菜单应用于该表单(在表单的Load事件中运行菜单程序)。 新建立的菜单文件名为mymenu,结构如下(表单、报表和退出是菜单栏中的3个菜单项): 表单 浏览课程 浏

admin2013-10-25  39

问题 在考生文件夹下有myform表单文件,将该表单设置为顶层表单,然后设计一个菜单,并将新建立的菜单应用于该表单(在表单的Load事件中运行菜单程序)。
新建立的菜单文件名为mymenu,结构如下(表单、报表和退出是菜单栏中的3个菜单项):
表单
浏览课程
浏览选课统计
报表
预览报表
退出
各菜单项的功能如下:
●选择"浏览课程"时在表单的表格控件中显示"课程"表的内容(在过程中完成,直接指定表名)。
●选择"浏览选课统计"时在表单的表格控件中显示简单应用题建立的视图sview的内容(在过程中完成,直接指定视图名)。
●选择"预览报表"时预览简单应用题建立的报表creport(在命令中完成)。
●选择"退出"时关闭和释放表单(在命令中完成)。
注意:最后要生成菜单程序,并注意该菜单将作为顶层表单的菜单。

选项

答案【操作步骤】 步骤1:单击常用工具栏中的"新建"按钮,在"新建"对话框中选择"菜单"单选钮,再单击"新建文件"按钮。 步骤2:在"新建菜单"对话框中选择"菜单"按钮,在菜单设计器中的"菜单名称"中依次输入"表单"、"报表"和"退出"这三个主菜单项,然后选择"表单"菜单项,在"结果"中选择"子菜单",单击"创建"按钮,在"菜单设计器"中,输入两个子菜单项"浏览课程"和"浏览选课统计",选择"报表"菜单项,在"结果"中选择"子菜单",单击"创建"按钮,在"菜单设计器"中,输入一个子菜单项"预览报表"。 步骤3:在"浏览课程"子菜单的"结果"中选择"过程"并输入命令下列语句  myform.grid1.RecordSource="课程" 步骤4:在"浏览选课统计"子菜单的"结果"选择"过程"并输入命令下列语句  myform.grid1.RecordSource="sview" 步骤5:在"预览报表"子菜单的"结果"选择"命令"并输入命令"report form creport preview"。 步骤6:在"退出"主菜单的"结果"选择"过程"并输入以下命令语句。 thisform.release  set sysmenu to default 步骤7:选择"显示"菜单中的"常规选项"命令,在"常规选项"对话框中选中"顶层表单"。再单击工具栏上"保存"按钮,在弹出"保存"对话框中输入"mymenu"即可。 步骤8:在"菜单设计器"窗口下选择"菜单"菜单中"生成"命令,生成"mymenu.mpr"文件。 步骤9:单击常用工具栏中的"打开"按钮,打开myform表单。在"表单设计器"中,在其"属性"的ShowWindow处选择"2-作为顶层表单";双击"Init Event",在"myform.Init"编辑窗口中输入"do mymenu.mpr with this ,’xxx’",启动菜单命令;双击"Destroy Event",在"myform.Destroy"编辑窗口中输入"release menu xxx extended",在表单退出时释放菜单。

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

最新回复(0)