首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在窗体上建立一个名称为Textl的文本框,然后建立两个主菜单,其标题分别为“编程语言”和“帮助”。名称分别为vbLanguage和vbHelp,其中“编程语言”菜单包括“C++”、“Basic”和“JAVA”三个子菜单,名称分别为vbLanguage
(1)在窗体上建立一个名称为Textl的文本框,然后建立两个主菜单,其标题分别为“编程语言”和“帮助”。名称分别为vbLanguage和vbHelp,其中“编程语言”菜单包括“C++”、“Basic”和“JAVA”三个子菜单,名称分别为vbLanguage
admin
2009-08-26
31
问题
(1)在窗体上建立一个名称为Textl的文本框,然后建立两个主菜单,其标题分别为“编程语言”和“帮助”。名称分别为vbLanguage和vbHelp,其中“编程语言”菜单包括“C++”、“Basic”和“JAVA”三个子菜单,名称分别为vbLanguagel、VbLanguage2和vbLanguage3。程序运行后,如果在“编程语言”的下拉菜单中选择“C++”,则在文本框内显示“指针”;如果选择“Basic’’,则在文本框内显示“对话框”;如果选择“JAVA”,则在文本框内显示“对象”。程序中不能使用任何变量,直接显示
字符串。程序运行后,选择“编程语言”的“C++”选项,则界面如图46—3所示。
注意:保存时必须存放在考生文件夹下,窗体文件名为sj3.frm,工程文件名为sj3.Vbp。
(2)在考生文件夹中有文件sj4.vbp及其窗体文件sj4.frm,该程序是不完整的。窗体上有一个名称为Textl的文本框;两个复选框,名称分别为Check1和Check2,标题分别为“足球”和“篮球”。要求程序运行后,如果只选中Checkl,单击窗体,则在文本框中显示“我的爱好是足球”;如果只选中Check2,然后单击窗体,则在文本框中显示“我的爱好是篮球”;如果同时选中Checkl和Check2,单击窗体,则在文本框中显示“我的爱好是足球和篮球”;如果Checkl和Check2都不选取,在单击窗体后,则在文本框中什么都不显示。如程序运行选中两项时,界面如图46—4所示。
注意:请在有“?”的地方填入正确内容,然后删除“?”及所有注释符(即“’”号),但不能修改其他部分。存盘时不得改变文件夹和文件名。
选项
答案
(1)在Visual Basic中,菜单也被看做控件,具有属性和事件。菜单的建立在菜单编辑器中完成,菜单的级数通过内缩符号来表示,第一级菜单没有内缩符号,第二级菜单的内缩符号为1;文本框的内容由Text属性设置。根据题意,按“Ctrl+E”组合键打开菜单编辑器,在其中添加如下菜单项: [*] 单击“确定”按钮,完成菜单编辑。再将一个文本框控件添加到窗体中,将其名称设为Textl,在代码窗口中编写如下代码: Private Sub vbLanguagel_Click(Index As Integer)’C++选项 Textl.Text="指针" End Sub Private Sub vbLanguage2_Click(Index As Integer) ’Basic选项 Textl.Text="对话框" End Sub Private Sub vbLanguage3_Click(Index As Integer) ’JAVA选项 Textl.Text="对象" End Sub 单击[*]按钮运行程序,并按要求保存。 (2)在Visual Basic中,复选按钮的标题由Caption属性设置,Value属性用来表示复选框的状态,复选框的Value属性有0.1或2三种取值,0表示未选中;1表示选中该复选框;2表示该复选框被禁止(灰色)。 根据题意,将一个文本框控件和两个复选框添加到窗体中.文本框控件的名称设为Textl,复选框的名称分别设为Checkl和Check2,Caption属性分别设为“足球”和“篮球”。双击复选框进入代码窗口.补充后的具体代码如下: Private Sub Checkl Click() Form_Load End Sub Private Sub Check2 Click() Form_Load End Sub Private Sub Form Load() Dim str As String If Checkl.
Value
=1 Or Check2.
Value
=1 Then str="我的爱好是" If Checkl.
Value
=l Then str=str+Checkl.
Caption
End If If Check2.
Value
=1 Then If Checkl.
Value
=1 Then str=str+"和"+Check2.
Caption
Else str=str+Check2.
Caption
End If End If Else str="" End If Textl.Text=str End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/cc1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
程序如下:∥计算两个整数的乘法Java_1.javaimportjavax,swing.JOptionPane;publicclassJava_1{publicsta
有一个学生选课的关系,其中学生的关系模式为:学生(学号,姓名,班级,年龄),课程的关系模式为:课程(课号,课程名,学时),其中两个关系模式的键分别是学号和课号,则关系模式选课可定义为:选课(学号,______,成绩)。
【】是Java程序的并发机制,它能同步共享数据,处理不同事件。
阅读下列代码publicclassTest{publicstaticvoidmain(Stringargs[]){Strings="Test";
编译下面源程序会得到哪些文件()?ClassA4{}ClassA2{}publicclassB{publicstaticvoidmain(Stringargs[]){}}
关系数据库的概念模型是()的集合。
已知二叉树后序遍历序列是dabec,中序遍历序列是debac,它的前序遍历序列是()。
在算法正确的前提下,评价一个算法的两个标准是【】。
实体之间的联系可以归结为一对一的联系、一对多的联系与多对多的联系。如果一个学校有许多学生,而一个学生只归属于一个学校,则实体集学校与实体集学生之间的联系属于【】的联系。
随机试题
下列哪项与多囊卵巢不相关
A.远端掌屈位复位B.远端后伸位复位C.远端旋前位复位D.远端旋后位复位E.远端外层位复位下列病例手法复位时应采用以上哪种方式:男性,30岁,右前臂被机器碾压伤,X线摄片提示尺桡骨中上段骨折
A.VdB.ClC.CmaxD.AUCE.Css评价指标“药峰浓度”可用英文缩写为()。
公路水运检测机构要申请换证复核必须是()信用等级为B级。
根据《城市排水工程规划规范》,城市污水收集、输送不能采用的方式是()。
被绝热的设备与管道外表温度大于1000C时,绝热层材料应符合不燃类()材料性能要求。
要求发包人补偿费用损失,调整合同价格的索赔是()。
乙公司是一家图书销售企业,目前在全国拥有200多家图书销售实体店。随着网络电商参与图书经营,使销售图书的实体店受到严重冲击。为此,乙公司决定也在网上设立虚拟店铺,专门对图书进行销售。但因乙公司未有过进行信息技术运营的资源和经验,因此,乙公司将网络销售的相关
[2012年多选]关于共产主义理想实现的必然性,马克思主义除了从社会形态更替规律上作了一般性的历史观论证外还通过对资本主义社会的深入实证的剖析,科学地论证了()
PassaaeThreeIn70C.E.theRomanarmyinvadedJerusalemandexpelledtheJewsfromJudeaandSamaria.SomeoftheseJew
最新回复
(
0
)