请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Forml的窗体上画一个名称为CD 1的通用对话框,通过属性窗口设置CD 1的初始路径为C:\,默认的文件名为None,标题为“保存等级考试”,如图2所示。 注意

admin2015-05-30  24

问题 请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Forml的窗体上画一个名称为CD 1的通用对话框,通过属性窗口设置CD 1的初始路径为C:\,默认的文件名为None,标题为“保存等级考试”,如图2所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。

(2)在名称为Form1的窗体上设计一个菜单。要求在窗体上添加名为menu0,标题为“菜单命令”的主菜单,再添加两个名称分别为“menu1”、“menu2”,标题分别为“不可用菜单项”、“上一菜单项可用”的子菜单,并且使程序运行时,menu1子菜单不可用,menu2子菜单已经选中(运行时的效果如图3所示)。

再编写适当的事件过程,使得程序运行时,单击“上一菜单项可用”,则“不可用菜单项”变为黑色(可用)。要求程序中不得使用变量,且只有一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sit2.Frm。

选项

答案第1小题 【操作步骤】 步骤1:新建一个“标准。EXE”工程,选择【工程】→【部件】命令,在弹出的“部件”对话框的列表中选中“MicroSoft Common Dialog Control6.0”项目,单击“确定”按钮。 步骤2: 在窗体Forml上画一个通用对话框,其相关属性设置如表12.7所示。 [*] 步骤3:编写Form1的Load事件,加入下面的代码: CD1.ShowSave 步骤4:按要求将文件保存至考生文件夹中。 【特别提示】通用对话框控件不是VB内部控件,通常不会在VB默认工具箱中列出。 【主要考点】通用对话框。 第2小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,打开VB菜单设计器设计菜单,各菜单项及属性设置如表12.8所示。 [*] 步骤2:打开代码编辑窗口,编写“上一菜单项可用”命令的Click事件过程。 参考代码: Private Sub menu2_Click() menu 1.Enabled=True End Sub 步骤3:按要求将文件保存至考生文件夹中。

解析 (1)通用对话框的InitDir。属性用于为打开或另存为对话指定初始的目录,如果此属性没有指定,则使用当前目录。
通用对话框的初始路径由InitDir属性设置,默认文件名由FileName属性设置,标题由DialogTitle属性设置。
(2)①VB中的菜单是通过菜单编辑器来设计的。菜单编辑器中的基本设置项有:“标题”项,对应出现在菜单中的显示内容;“名称”项,系统识别菜单项的唯一关键字(不能重复);“索引”项,用于设置菜单数组中各元素的索引号;“快捷键”项,是一个下拉列表框,用于设置菜单项的快捷键;“帮助上下文”项,设置当鼠标移动到某菜单项上按键时显示的帮助信息在帮助文件中的对应位置;Visible(可见)项,用于设置控件或菜单项在程序运行时是否可见,值为True表示可见,值为False表示不可见:Enabled(有效)项,用于设置控件或菜单项在程序运行时是否有效,值为True时表示有效,值为False时表示无效(显示为灰色)。通过编辑按钮区的七个按钮可对菜单进行添加、插入、删除、提升(设置为上一级菜单)、缩进(设置为下一级菜单)、上移、下移等操作。
②文本框的Text属性用于设置或返回其显示的文本内容。
本题原程序设计思路:在“上一菜单项可用”命令的单击事件过程中,通过语句设置“不可用菜单项”命令的Enabled属性值为True。
转载请注明原文地址:https://jikaoti.com/ti/LD60FFFM
0

最新回复(0)