首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在窗体上建立一个名称为Textl的文本框,然后建立两个主菜单,标题分别为“体育活动”和“帮助”,名称分别为vbMenu和vbHelp,其中“体育活动”菜单包括标题为“足球”、“篮球”和“排球”三个子菜单,名称分别为vbMenul、vbMenu2和vl
(1)在窗体上建立一个名称为Textl的文本框,然后建立两个主菜单,标题分别为“体育活动”和“帮助”,名称分别为vbMenu和vbHelp,其中“体育活动”菜单包括标题为“足球”、“篮球”和“排球”三个子菜单,名称分别为vbMenul、vbMenu2和vl
admin
2010-07-13
42
问题
(1)在窗体上建立一个名称为Textl的文本框,然后建立两个主菜单,标题分别为“体育活动”和“帮助”,名称分别为vbMenu和vbHelp,其中“体育活动”菜单包括标题为“足球”、“篮球”和“排球”三个子菜单,名称分别为vbMenul、vbMenu2和vloMenu3。要求程序运行后,如果在“体育活动”的下拉菜单中选择“足球”,则在文本框内显示“足球”;如果选择“篮球”,则在文本框内显示“篮球”;如果选择“排球”,则在文本框内显示“排球”。程序中不能使用任何变量,直接显示字符串。程序运行后,选择“排球”的界面如图54—3所示。
注意:保存时必须存放在考生文件夹下,窗体文件名为sj3.frm,工程文件名为sj3.Vbp。
(2)在考生文件夹中有文件sj4.vbp及其窗体文件sj4.frm,该程序是不完整的。窗体上有一个名称为Textl的文本框;两个复选框,名称分别为Checkl和Check2,标题分别为“英语”和“德语”。要求程序运行后,如果Checkl和Check2都不选,单击“显示”命令按钮,则在文本框中什么都不显示;如果只选中Checkl,单击“显示”命令按钮,则在文本框中显示“我精通英语”;如果只选中Check2,单击“显示”命令按钮,则在文本框中显示“我精通德语”;如果同时选中Checkl和Check2,单击“显示”命令按钮,则在文本框中显示“我精通英语和德语”。程序运行后,若选择Checkl,则显示界面如图54—4所示。
注意:请在有“?”的地方填入正确内容,然后删除“?”及所有注释符(即“’”号),但不能修改其他部分。存盘时不得改变文件夹和文件名。
选项
答案
(1)在窗体上建立好控件后,先设置控件属性,再编写事件过程。 在Visual Basic中,菜单也被看做控件,具有属性和事件。菜单的建立在菜单编辑器中完成,菜单的级数通过内缩符号来表示,第一级菜单没有内缩符号,第二级菜单的内缩符号为1;文本框内容用Text属性来设置。 根据题意,按“Ctrl+E”组合键打开菜单编辑器,在其中添加如下菜单项: [*] 单击“确定”按钮,完成菜单编辑。再将一个文本框控件添加到窗体中,将其名称设为Text1,在代码窗口中编写如下代码: Private Sub vbMenul_Click(Index As Integer) ’足球选项 Textl.Text="足球" End Sub Private Sub vbMenu2_Click(Index As Integer) ’篮球选项 Textl.Text="篮球" End Sub Private Sub vbMenu3_Click(Index As Integer) ’排球选项 Textl.Text="排球" End Sub 单击[*]按钮运行程序,并按要求保存。 (2)复选框用来表示状态,在程序运行期间可以改变其状态。复选框标题由Caption属性来设置,复选框的Value属性用来表示复选框的状态,其取值有:0表示复选框未被选中;1表示复选框被选中;2表示复选框被禁止使用(灰色)。 根据题意,将一个文本框、一个命令按钮和两个复选框控件添加到窗体中,文本框控件的名称设为Textl,命令按钮的名称:勾Commandl、标题为“显示”,复选框的名称分别设为Checkl和Check2,Caption属性分别设为“英语”和“德语”。双击复选框进入代码窗口,补充后的代码如下: Option Explicit Private Sub Commandl_Click()
Textl.Text
="" If Checkl.Value And Not Check2.Value Then Textl.Text="我精通英语" If Checkl.Value=0 And Check2.Value Then Textl.Text="我精通德语" If Checkl.Value And Check2.Value Then Textl.Text="我精通英语和德语" End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/uGmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假设a是int类型的变量,并初始化为1,则下列选项中合法的条件语句是( )。
如果不为类的成员变量定义初始值,Java会给它们设置默认值。下列说法中不正确的是( )。
下面程序代码运行结果为( )。importjava.awt.*;publicclassTest{publicstaticvoidmain(Stringargs[]){String
下面专门定义常量变量的保留字是( )。
调用以下哪些方法可以使运行状态的线程进入阻塞状态?( )
Java源文件中最多只能有一个______类,其他类的个数不限。
在模块化程序设计中,按功能划分模块的原则是
当一个应用程序的所有非守护线程终止运行时,若仍然有守护线程在运行,应用程序将______。
下面属于面向对象程序设计语言的是______。
在面向对象的程序设计中,用来请求对象执行某一操作或回答某些信息的要求称为【】。
随机试题
乳牙最适宜进行根管治疗的时间是
在以社会化大生产为基础的商品经济中,价值规律对商品经济的三方面调节作用,可以归结为一点是:
期货经营机构的相关期货业务许可被注销的,由中国期货业协会注销该机构中从事相应期货业务的期货从业人员的从业资格。()
以下操作系统中,不是网络操作系统的是()。
不能完全辨认自己行为的精神病人是无民事行为能力人。()
ThedaysofthehunterarealmostoverinIndia.Thisispartlybecausethereispracticallynothinglefttokill,andpartlybe
从__________到______是认识过程的第二次飞跃。
Anysufficientlyadvancedtechnology,notedArthurC.Clarke,aBritishscience-fictionwriter,isindistinguishablefrommagic.
下列组件中不能用addItemListener()方法注册ItemListener监听器的是()。
Thestoryofthe【S1】______Titaniccontinuesto【S2】______peopletodaypartlybecauseofthe1998Hollywoodmovies,Titanic.Peopl
最新回复
(
0
)