首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个标签,名称为L1,标题为“业余爱好”,再画一个名称为Chl的复选框数组,含三个复选框,它们的Index属性分别为0、1、2,标题依
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。 (1)在名称为Form1的窗体上画一个标签,名称为L1,标题为“业余爱好”,再画一个名称为Chl的复选框数组,含三个复选框,它们的Index属性分别为0、1、2,标题依
admin
2018-10-29
46
问题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。
(1)在名称为Form1的窗体上画一个标签,名称为L1,标题为“业余爱好”,再画一个名称为Chl的复选框数组,含三个复选框,它们的Index属性分别为0、1、2,标题依次为“体育”、“音乐”、“美术”,请设置复选框的属性,使其初始状态见表3—1。
运行后的窗体如图3—83所示。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1.vbp,窗体文件名为sjt1.ffm。
(2)在名称为Form1的窗体上画一个文本框,名称为Text1;再建立一个下拉菜单,菜单标题为“操作”,名称为M1,此菜单下含有两个菜单项,名称分别为Show和Hide,标题分别为“显示”、“隐藏”,请编写适当的事件过程,使得在运行时,单击“隐藏”菜单项,则文本框消失;单击“显示”菜单项,则文本框显示出来。运行后的窗体如图3-84所示。要求程序中不得使用变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹下,工程文件名为sjt2.vbD,窗体文件名为sjt2.frm。
选项
答案
第1小题 【操作步骤】 步骤1:新建一个“标准EXE”工程。 步骤2:在窗体Form1中加入一个标签和一个复选框,并用“复制”和“粘贴”的方法,生成包含三个元素的复选框数组。 步骤3:分别设置窗体和复选框数组中各元素的相关属性,其属性及值如表4-51所示。 [*] 步骤4:按要求将文件保存至考生文件夹中。 第2小题 【操作步骤】 步骤1:新建一个“标准EXE”工程,在窗体Form1中画一个文本框,在属性设置窗口中将其Name属性值设置为Text1。 步骤2:选择【工具】→【菜单编辑器】命令,打开菜单设计器,如表4-52中的设置建立菜单项。 [*] 步骤3:打开代码编辑窗口,编写以下事件过程。参考代码: Private Sub hide_Click( ) Text1.Visible=False End Sub Private Sub show_Click( ) Text1.Visible=True End Sub 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/23Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下通用过程:PublicFunctionf(xAsInteger) DimyAsInteger x=20 y=2 f=x*yEndFunction在窗体上画一个命令按钮,其名称为Command1,然后编写如下
要删除列表框中最后一个列表项,正确的语句是( )。
以下关于VB文件的叙述中,错误的是( )。
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() a$=InputBox("请输入一个二进制数") n=Len(a$) Fori=1Ton Dec=Dec*2+
顺序文件在一次打开期间( )。
求1!+2!+……+10!的程序如下:PrivateFunctions(xAsInteger) f=1 Fori=1Toxf=f*i Next s=fEndFunctionPrivateSubCommand1
A、选择B、差C、交D、并B关系T是关系R的一部分,并且是关系R去掉R和S相同的元素,符合差操作。
设有如下事件过程:PrivateSubForm_Click() Sum=0 Fork=1To3 Ifk
下面关于VB数据文件的叙述中错误的是()。
VB中有这样一类文件:该文件不属于任何一个窗体,而且仅包含程序代码,这类文件的扩展名是( )。
随机试题
社会主义民主的本质是()
心主神志的物质基础是
阿片受体部分激动剂是:
不属于I型变态反应的是
治疗肺虚久咳、痰中带血治疗瘰疬、疮痈、乳痈、肺痈
只能用于沥青混凝土面层下面层的是()沥青混凝土。
某市甲外资企业(增值税一般纳税人)2015年10月购进木材取得增值税专用发票上注明的价款200万元,委托本市乙公司加工实木地板,支付不含税加工费80万元,乙公司11月完工交付50%的实木地板,12月完工交付剩余部分。已知乙公司无同类实木地板的销售价格,实木
公安机关在行使紧急优先权时,对于造成的损失没有任何赔偿义务。()
NiagaraisanIndianwordwhichmeans"roaringwater".Indeed,theroarofthefallingwaterofNiagaracanbeheard(1)_____a
下列排序法中,每经过一次元素的交换会产生新的逆序的是
最新回复
(
0
)