首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个上程文件sjt3.vbp,窗体上已经有一个标签Label1,清添加一个单选按钮数组,名称为Op1,含三个单选按钮,它们的Index属性分别为0、1、2,标题依次为“飞机”、“火车”、“汽牟”,再添加一个名称为Text1的文本框。窗
(1)在考生文件夹下有一个上程文件sjt3.vbp,窗体上已经有一个标签Label1,清添加一个单选按钮数组,名称为Op1,含三个单选按钮,它们的Index属性分别为0、1、2,标题依次为“飞机”、“火车”、“汽牟”,再添加一个名称为Text1的文本框。窗
admin
2016-09-06
36
问题
(1)在考生文件夹下有一个上程文件sjt3.vbp,窗体上已经有一个标签Label1,清添加一个单选按钮数组,名称为Op1,含三个单选按钮,它们的Index属性分别为0、1、2,标题依次为“飞机”、“火车”、“汽牟”,再添加一个名称为Text1的文本框。窗体文件中已经给出了Op1的Click事什过程,但不完整,要求去掉程序中的注释符,把程序中的?改为正确的内容,使得在程序运行时单击“飞机”或“火车”单选按钮时,在Text1中显示“我坐飞机去”或“我坐火车去”,单击“汽车”单选按钮时,在Text1中显示“我开汽车去”,如图所示。
注意:不能修改程序中的其他部分。最后将修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工工程文件sjt4.vbp,Form1窗体中有一个文本框.名称为Text1;请先在窗体上添加两个框架控件,名称分别为F1、F2,标题分别为“性别”、“身份”;然后在F1中添加两个单选按钮控件Op1、Op2,标题分别为“男”、“女”;其次在心中添加两个单选按钮控件Op3、Op4,标题分别为“学生”、“教师”;最后再添加一个命令按钮,名称为C1,标题为“确定”,如图所爪。请编写适当的事件过程,使得运行时,在F1、F2中各选一个单选按钮,然后单击“确定”按钮,就可以按照下表把结果显示在文本框中。
最后把修改后的文件以原米的文件名存盘。
注意:考生不得修改窗体文件中已经存在的程序和Texll的属性,在结束程序运行之前,必须进行能够产生上表中一个结果的操作。必须用窗体右上角的关闭按钮结束程序,否则无成绩。
选项
答案
(1)【操作步骤】 步骤1:打开本题工程文件,按照题目要求建立单选按钮数组,如图3.9所示。 [*] 步骤2:按照题目要求建立其他控件并设置其属性,见表3.4。 [*] 步骤3:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考答案 Private Sub Op1_Click(Index As Integer) Dim a As String,b As String,c As String a="我坐" b="我开" Select Case Index ’通过Index值决定响应哪一个控件教组 Case 0 Text1.Text=a+Me.opl(0).Caption+"去" Case 1 Text1.Text=a+Me.op1(1).Caption+"去" ’当Index值为1时,选择"我坐" Case 2 Text1.Text=b+Me.Op1(2).Caption+"去" End SeleCt End SUb 步骤4:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:打开本题工程文件,按照题目要求建立框架控件并设置其属性,如图3.10所示。 [*] 步骤2:按照步骤1建立其他控件并设置相关属性,程序中用剑的控件及属性见表3.5和表3.6。 [*] 步骤3:打开代码编辑窗口,在指定位置编写如下代码。 参考答案 Private Sub C1 C1ick() Text1.Text="我是"’首先确定不论选什么情况Textl的内容一定以”我是”开头 If Op1.Value Then Textl.Text=Text1.Text&op1.Caption Else Text1.Text=Text1.Text&Op2.Caption End If ’通过单选按钮的Value值(选择为true,否则为false)确认性别,最后把其Caption值接至Text1后 If Op3.Value Then Text1.Text=Text1.Text&Op3.Caption E1se Text1.Text=Text1.Text&Op4.Caption End If’确认身份,思路同上 End Sub 步骤4:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/1ZLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
函数过程Fun1的功能是:如果参数b为奇数,则返回值为1,否则返回值为0。FunctionFun1(bAsInteger) if______Then Fun1=0 Else Fun1=1
在窗体上添加一个R命令按钮,名称为Command1,然后为该命令按钮编写如下事件过程,该过程的执行结果为OptionBase1PrivateSubCommand1_Click()DimaAsVariant a
在窗体上画一个文本框(其Name属性为Text1),然后编写如下事件过程:PrivateSubForm_Load()Text1.Text=""Text1.SetFocusFori=1To9Sum=Sum+i
为了在列表框中使用Ctrl和Shift键进行多个列表项的选择,应将列表框的Multi-select属性设置为()。
对于图书管理数据库,将图书表中“人民邮电出版社”的图书的单价涨价5%。请对下面的SQL语句填空:UPDATE图书______WHERE出版单位="人民邮电出版社"
VisualBasic是一种面向对象的程序设计语言,构成对象的三要素是()。
在VisualBasic中语句的续行符采用()。
鼠标移动经过控件时,将触发控件的()事件。
下面不能在信息框中输出“VisualBasic”的是()。
下列运算符中,优先级别最低的是
随机试题
硬盘驱动器____________。
前列腺癌最常见的组织学类型是
男,30岁,高热、咳嗽3天,咳铁锈色痰。体温39.4℃。胸片示右上肺片状阴影。血白细胞20×109/L,中性粒细胞0.91。给予青霉素治疗后体温降至正常,两天后体温再次升高。体温再次升高的原因可能为
A.激素借轴浆流动运送至末梢而释放B.激素经由组织液扩散而作用于邻近细胞C.激素经血液运输作用于远距离的靶细胞D.激素在局部扩散又返回作用于该内分泌细胞E.激素通过淋巴液运输作用于靶细胞旁分泌是指
HSV-2可引起
A、苦寒B、苦温C、辛温D、辛凉E、苦涩平浙贝母的性味是()
关于变动制造费用标准成本,下列说法中正确的有()。
左图折开以后可以得到选项中的哪一个?
根据信息保持时间长短可以将记忆分为()。
Whichpassage(s)say(s)that….adultsputtoomuchemphasisonchildren’sintellectualdevelopment?
最新回复
(
0
)