在考生文件夹下完成下列操作。 创建一个快捷菜单MyMenu,实现如下图所示的功能,即通过右击表单MyForm中的文本框时弹出的快捷菜单实现文本框字体的设置。具体要求如下: ①在:MyMenu的“设置”代码中添加接受参数语句:PARAM

admin2017-09-25  28

问题       在考生文件夹下完成下列操作。
创建一个快捷菜单MyMenu,实现如下图所示的功能,即通过右击表单MyForm中的文本框时弹出的快捷菜单实现文本框字体的设置。具体要求如下:
    ①在:MyMenu的“设置”代码中添加接受参数语句:PARAMETERS mfRef。
    ②在快捷菜单MyMenu中添加“宋体”“黑体”和“楷体”菜单项,分别实现将调用快捷菜单的控件或对象的字体名属性(FontName)设置为“宋体”“黑体”和“楷体”,这些功能都通过执行“过程”完成。
    ③生成菜单程序文件。
    ④打开表单MyForm,在文本框。Textl的RightClick事件代码中添加调用快捷菜单MvMenu的命令,实现通过快捷菜单设置Textl文本字体的功能。

选项

答案【操作步骤】 步骤1:单击常用工具栏中的“新建”按钮,在“新建”对话框中选择“菜单”,单击“新建文件”按钮;在打开的“新建菜单”对活框中单击“快捷菜单”按钮。 步骤2:在快捷菜单设计器中,设置“菜单名称”分别为“宋体”“黑体”和“楷体”,“结果”均为“过程”。 步骤3:分别单击三个菜单项后面的“创建”按钮,编写对应的过程代码。 “宋体”菜单项中的代码:myform.Textl.FontName="宋体" “黑体”菜单项中的代码:myform.Textl.FontName="黑体" “楷体”菜单项中的代码:myform.Textl.FontName="楷体" 步骤4:选择“显示”菜单中的“常规选项”命令,弹出“常规选项”对话框,在“菜单代码”组中勾选“设置”复选框,在“过程”列表框中输入“PARAMETERS mfRef”,最后单击“确定”按钮。 步骤5:单击工具栏中的“保存”按钮,将菜单以MyMenu为文件名进行保存。选择“菜单”菜单中的“生成”命令,生成可执行菜单。 步骤6:打开考生文件夹下的表单:MyForm,在表单设计器中双击文本框控件,在“过程”下拉列表框中选择RightClick过程,输入命令“DO mymenu.mpr”。 步骤7:保存表单并运行,在文奉框处单击鼠标右键,依次执行三个菜单项中的命令。

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

最新回复(0)