第 1 小题
【审题分析】本题只需按题目要求利用 VB 菜单设计器建立一个二级菜单即可。
【操作步骤】
步骤 1:新建一个"标准 EXE"工程,选择【工具】?【菜单编辑器】命令,打开菜单设计器。
步骤 2:在"标题"栏中输入"文件",在"名称"栏中输入 mnuFile;单击"下一个" 按钮,在"标题"栏中输入"帮助",在"名称"栏中输入 mnuHelp;单击"下一个"按钮,再单击编辑区的"右箭头"按钮,在"标题"栏中输入"打开",在"名称"栏中输入 mnuFileOpen;单击"下一个"按钮,在"标题"栏中输入"关闭",在"名称"栏中输入 mnuFileClose;单击"下一个"按钮,在"标题"栏中输入"退出",在"名称"栏中输入 mnuFileExit,;选定"帮助"项,单击编辑区的"下箭头"按钮,将其移至所有菜单项的下面。
步骤 3:按要求将文件保存至考生文件夹中。
【考试误区】分清标题和名称及菜单项间的层次关系。
第 2 小题
【知识点播】菜单中所包含的每一个菜单项都可看成是一个命令按钮,程序运行时,选择某菜单项将触发其 Click 事件。
【审题分析】要实现本题中的功能,应在"显示"菜单项的 Click 事件过程中,将字符串 Visual Basic 赋值给文本框的 Text 属性,在"清除"菜单项的 Click 事件过程中,设置文本框的 Text 属性值为空白。
【操作步骤】
步骤 1:新建一个"标准 EXE"工程,在窗体 Form1 中加入一个文本框,在属性设置窗口中将其 Name 属性值设置为 Txt1,Text 属性设置为空白。
步骤 2:选择【工具】?【菜单编辑器】命令,打开菜单设计器。
步骤 3:在"标题"栏中输入"操作",在"名称"栏中输入 mnuOp;单击"下一个" 按钮,再单击编辑区的"右箭头"按钮,在"标题"栏中输入"显示",在"名称"栏中输入 mnuOpDis;单击"下一个"按钮,在"标题"栏中输入"清除",在"名称"栏中输入 mnuOpCls。
步骤 4:单击窗体 Form1 的"操作"菜单下的"显示"项,在打开的代码编辑窗口中输入代码。
步骤 5:单击代码编辑窗口中的对象下拉列表框,从中选择 mnuOpCls,在其 Click 事件过程中输入代码:Txt1.Text = ""。
步骤 6:按要求将文件保存至考生文件夹中。
【考试误区】清除文本框中所显示的信息是通过设置 Text 属性来实现的,文本框没有 Cls 方法。