首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个名称为CD1的通用对话框,通过属性窗口设置CD1的初始路径为C:\,默认的文件名为None,标题为“保存等级考试”,如图2所示。 注意:存
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个名称为CD1的通用对话框,通过属性窗口设置CD1的初始路径为C:\,默认的文件名为None,标题为“保存等级考试”,如图2所示。 注意:存
admin
2017-06-22
46
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个名称为CD1的通用对话框,通过属性窗口设置CD1的初始路径为C:\,默认的文件名为None,标题为“保存等级考试”,如图2所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.frm。
(2)在名称为Form1的窗体上设计一个菜单。要求在窗体上添加名为menu0,标题为“菜单命令”的主菜单,再添加两个名称分别为“menu1”、“menu2”,标题分别为“不可用菜单项”、“上一菜单项可用”的子菜单,并且使程序运行时,menu1子菜单不可用,menu2子菜单已经选中(运行时的效果如图3所示)。
再编写适当的事件过程,使得程序运行时,单击“上一菜单项可用”,则“不可用菜单项”变为黑色(可用)。要求程序中不得使用变量,且只有一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbp,窗体文件名为sjt2.frm
选项
答案
(1)步骤1:新建一个“标准EXE”工程,选择【工程】→【部件】命令,在弹出的“部件”对话框的列表中选中“MicroSoft Common Dialog Control6.0”项目,单击“确定”按钮。 步骤2: 在窗体Form1上画一个通用对话框,其相关属性设置如下表所示。 [*] 步骤3:编写Form1的Load事件,加入下面的代码: CD1.ShowSave 步骤4:按要求将文件保存至考生文件夹中。 (2)步骤1:新建一个“标准EXE”工程,打开VB菜单设计器设计菜单,各菜单项及属性设置如下表所示。 [*] 步聚2: 打开代码编辑窗口,编写“上一菜单项可用”命令的Click事件过程。 参考代码: Private Sub menu2_Click() menu1.Enabled=True End Sub 步骤3:按要求将文件保存至考生文件夹中。
解析
(1)通用对话框的InitDir属性用于为打开或另存为对话指定初始的目录,如果此属性没有指定,则使用当前目录。
通用对话框的初始路径由InitDir属性设置,默认文件名由FileName属性设置,标题由DialogTitle属性设置。
(2)①VB中的菜单是通过菜单编辑器来设计的。菜单编辑器中的基本设置项有:“标题”项,对应出现在菜单中的显示内容;“名称”项,系统识别菜单项的唯一关键字(不能重复);“索引”项,用于设置菜单数组中各元素的索引号;“快捷键”项,是一个下拉列表框,用于设置菜单项的快捷键;“帮助上下文”项,设置当鼠标移动到某菜单项上按<F1>键时显示的帮助信息在帮助文件中的对应位置;Visible(可见)项,用于设置控件或菜单项在程序运行时是否可见,值为True表示可见,值为False表示不可见;Enabled(有效)项,用于设置控件或菜单项在程序运行时是否有效,值为True时表示有效,值为False时表示无效(显示为灰色)。通过编辑按钮区的七个按钮可对菜单进行添加、插入、删除、提升(设置为上一级菜单)、缩进(设置为下一级菜单)、上移、下移等操作。②文本框的Text属性用于设置或返回其显示的文本内容。
本题原程序设计思路:在“上一菜单项可用”命令的单击事件过程中,通过语句设置“不可用菜单项”命令的Enabled属性值为True。
转载请注明原文地址:https://kaotiyun.com/show/eDGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下程序,查找并输出该数组中的最小值,请在空白处填上合适的代码,将程序补充完整。OptionBase1PrivateSubCommand1_Click()Dimarr1DimMinAsInteger,i
在窗体上画一个命令按钮Command1,然后编写如下程序:PrivateSubCommand1_Click()Dimarr()AsIntegerReDimarr(3)Fori=0To3arr(i)=iNextix=Input
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()X=0n=InputBox("")
在窗体上绘制一个名称为Label1的标签,然后编写如下事件过程:PrivateSubForm_Click() Dimarr(10,10)AsInteger DimiAsInteger,jAsInteger
数据库系统的核心是______。
对关系S和R进行集合运算,结果中既包含S中的所有元组也包含R中的所有元组,这样的集合运算称为()。
下面语句正确的是
下列说法正确的是
【】的功能是用于显示当前过程中的有关信息,当测试一个过程时,可在其中输入代码并立即执行。
随机试题
_____weneedmoreequipmentisquiteobvious.
肾脏解剖描述中哪一项是错误的()
A.LD1>LD2B.LD1/LD2倒置且伴有LDH5增高C.LD5>LD4D.LD4和LD5都升高E.LD3和LD4都升高恶性肿瘤肝转移
无形资产是指企业长期使用但没有实物形态的资产,它包括()。
在编写事务时,下列不属于降低事务隔离级别所带来的好处的是()。
一间宿舍可住多个学生,则实体宿舍和学生之间的联系是______。
Americanwomenexperienceagreat【1】oflifestyles.A"typical"Americanwomanmaybesingle.Shemayalsobedivorcedormarried
IntelligentandEnergy-savingSolarHomeA)Ifsomegroupgaveoutawardsfortheleastenergy-efficientstructures—thewaythose
标准规定,城际之间投递包裹的时间不得超过72小时,否则将被认定为延误,顾客即有权索赔。
A、MorepumpkinsareneededtocelebrateHalloween.B、Thesupplyforsalehasdecreased.C、Morepeopledeveloptheirloveforpum
最新回复
(
0
)