首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,请在窗体上画三个文本框,其名称分别为Textl、Text2和Text3,文本框内容分别设置为”等级考试”、”计算机”和空白。然后画两个单选按钮,其名称分别为Opl和Op2,标题分别为”交换”和”连接”(如图2-
在考生文件夹下有一个工程文件sjt4.vbp,请在窗体上画三个文本框,其名称分别为Textl、Text2和Text3,文本框内容分别设置为”等级考试”、”计算机”和空白。然后画两个单选按钮,其名称分别为Opl和Op2,标题分别为”交换”和”连接”(如图2-
admin
2013-10-18
32
问题
在考生文件夹下有一个工程文件sjt4.vbp,请在窗体上画三个文本框,其名称分别为Textl、Text2和Text3,文本框内容分别设置为”等级考试”、”计算机”和空白。然后画两个单选按钮,其名称分别为Opl和Op2,标题分别为”交换”和”连接”(如图2-189所示),编写适当的事件程序。程序运行后,如果选中”交换”单选按钮并单击窗体,则Textl文本框中内容与Text2文本框中的内容进行交换,并在Text3文本框中显示”交换成功”;如果选中”连接”单选按钮并单击窗体,则把Textl和Text2的内容按Textl在前、Text2在后的顺序连接起来,并在Text3文本框中显示连接后的内容。存盘时,工程文件名为sjt4.vbp,窗体文件名为sjt4.frm。
注意:不得修改已经给出的程序。在结束程序运行之前,必须选中一个单选按钮,并单击窗体。退出程序时必须通过单击窗体右上角的关闭按钮,否则无成绩。
选项
答案
步骤1:打开考生文件夹下的本题工程文件件sjt4.vbp。 步骤2:在窗体Forml中加入三个文本框和两个单选按钮,分别设置它们的相关属性,其属性及值如表3-108所示。 [*] 步骤3:打开代码编辑窗口输入如下代码: 参考代码: Private Sub Form_Click( ) If Opl Then Text3.Text=Textl.Text Text1.Text=Text2.Text Text2.Text=Text3.Text Text3.Text=“交换成功” ElseIf Op2 Then Text 3.Text=Text 1.Text&Text2.Text EndIf End Sub 步骤4:按要求将文件保存至考生文件夹中。 步骤5:按<F5>键运行程序,选择一个单选按钮,并单击窗体,最后单击窗体右上角的关闭按钮退出程序。
解析
转载请注明原文地址:https://kaotiyun.com/show/WHQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有下列循环:x=1Dox=x+2PrintxLoopUntil【】要求程序运行时执行3次循环体,请填空。
窗体上有一个名称为Picturel的图片框控件,一个名称为Label1的标签控件,如下图所示。现有如下程序:PublicSubdisplay(xAsControl)IfTypeOfxIsLabe
要使两个单选按钮属于同一个框架,正确的操作是()。
为了在运行时把d:\pic文件夹下的图形文件a.JPg装入图片框Picturel,所使用的语句为【】。
软件工程三要素包括方法、工具和过程,其中,【】支持软件开发的各个环节的控制和管理。
在设计窗体时双击窗体的任何地方,可以打开的窗口是
将代数式转换成程序设计中的表达式为【】。
下面不属于软件工程的3个要素的是______。
为了把寻个VisualBASIC应用程序装入内存,只要装入【】文件即可。
表达式Val(".123E2")的值是()。
随机试题
直觉思维最常用的形式是()
以下有关ERP软件的说法中错误的是()
具有强心作用的化合物是
除下列哪一项外,均为五脏具有的共同特点
会员未在期货交易所规定的时间内追加保证金或者自行平仓的,期货交易所应当将该会员的合约强行平仓,强行平仓的有关费用和发生的损失由()承担。
根据《合同法》的规定,下列情形中,买受人应承担标的物损毁、灭失风险的有()。(2013年)
孙犁属于哪一个文学流派?()
根据《婚姻法》及相关司法解释的有关规定,下列表述正确的是()。
在考生文件夹下,存在一个数据库文件“sampl.accdb”。试按以下操作要求,完成表的建立和修改:将“tEmployee”表中的“职称”字段的“默认值”属性设置为“副教授”。
Thetimetheone-daycoursebeganwas______.ThereasonshestayedinWesthamptonon10thwerethefollowingexcept______.
最新回复
(
0
)