首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为F1和F2,标 题分别为“交通工具”和“到达目标”。在F1中画两个单选按钮,名称分别为Op1和Op2,标题分别为“飞机”和“火车”。在F2 中画两个单选按钮,名称分别为
(1)在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为F1和F2,标 题分别为“交通工具”和“到达目标”。在F1中画两个单选按钮,名称分别为Op1和Op2,标题分别为“飞机”和“火车”。在F2 中画两个单选按钮,名称分别为
admin
2018-10-29
49
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为F1和F2,标 题分别为“交通工具”和“到达目标”。在F1中画两个单选按钮,名称分别为Op1和Op2,标题分别为“飞机”和“火车”。在F2 中画两个单选按钮,名称分别为 Op3和 Op4,标题分别为“广州”和“昆明”。画一 个文本框,其名称为Text1。编写适当事件过程。程序运行后,选择不同单选按钮并单击窗体后在文本框中显示结果见表1-3。
程序的运行情况如图1-105所示。存盘时以原文件名存盘。注意:考生不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须至少进行上面的一种操作。退出程序时必须通过单击窗体右上角的关闭按钮。
(2)在考生文件夹下有一个工程文件sjt4.vbp,请在窗体上画三个文本框,其名称分别为Text1、Text2和 Text3,文本框内容分别设置为“计算机”、“等级考试”和空白。然后画两个单选按钮,其名称分别为Op1和Op2,标题分别为“交换”和“连接”(如图1-106所示),编写适当的事件程序。程序运行后,如果选中“交换”单选按钮并单击Text3文本框,则Text1文本框中的内容与Text2文本框中的内容进行交换,并在Text3文本框中显示“交换成功”;如果选中“连接”单选按钮并单击Text3文本框,则把Text1和Text2 的内容按Text1、Text2的顺序连接起来,并在ext3文本框中显示连接后的内容。存盘时,按原文件名存盘。
注意:不得修改已经给出的程序。在结束程序运行之前,必须选中一个单选按钮,然后单击Text3。退出程序时必须通过单击窗体右上角的关闭按钮,否则无成绩。
选项
答案
第1小题 【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjt3.vbp。 步骤2:在窗体Form1中加入两个框架和一个文本框,然后在每个框架中各加入两个单选按钮,分别设置它们的相关属性,其属性及值如表2-34所示。 [*] 步骤3:打开代码编辑窗口输入如下代码: 参考代码: Private Sub Form_Click() If Op1 And Op3 Then Text1.Text = "坐飞机去广州" ElseIf Op1 And Op4 Then Text1.Text = "坐飞机去昆明" ElseIf Op2 And Op3 Then DblClick事 Text1.Text = "坐火车去广州" ElseIf Op2 And Op4 Then Text1.Text = "坐火车去昆明" End If End Sub 步骤4:按要求将文件保存至考生文件夹中。 步骤5:按<F5>键运行程序,选择一种交通工具和一个到达目标,并单击窗体,最后单击窗体右上角的关闭按钮退出程序。 第2小题 【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjt4.vbp。 步骤2:在窗体Form1中加入三个文本框和两个单选按钮,分别设置它们的相关属性,其属性及值如表2-35所示。 [*] 步骤3:打开代码编辑窗口输入如下代码: 参考代码: Private Sub Text3_Click() If Op1 Then Text3.Text = Text1.Text Text1.Text = Text2.Text Text2.Text = Text3.Text Text3.Text = "交换成功" ElseIf Op2 Then Text3.Text=Text1.Text&Text2.Text End If End Sub 步骤4:按要求将文件保存至考生文件夹中。 步骤5:按<F5>键运行程序,选择一个单选按钮,并单击 Text3,最后单击窗体右上角的关闭按钮退出程序。
解析
转载请注明原文地址:https://www.kaotiyun.com/show/R3Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimnAsInteger,tAsLongStaticsAsIntegert=1Forn=1To3t=
编写如下程序:PrivateSubCommand1_Click()DimscoreAsIntegerscore=86Ifscore>85Thenr=1ElseIfscore>
窗体上已有1个名称为Picture1的图片框,要求实现下面2个功能之一:(1)在窗体上移动鼠标时,立即将Picture1显示在鼠标位置(2)在窗体上单击鼠标时,立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
输入VisualBasic源程序时,若一个命令行中包含两个语句,则两个语句之间的分隔符应使用
A、选择B、投影C、交D、并D关系T中的元素与关系R和关系S中不同元素的总和,因此为并操作。
为了将"联想电脑"作为数据项添加到列表框List1的最前面,可以使用语句()。
为计算an的值,某人编写了函数power如下:PrivateFunctionpower(aAsInteger,nAsInteger)AsLong DimsAsLong p=a Fork=1Ton p=p*a Next
假定在窗体上添加了一个通用对话框控件,其名称为CD1,并有如下程序段:CD1.ShowOpenCD1.DefaultExt="doc"在打开文件的对话框中选择了"c:\file1.txt"文件,则FileTitle属性的值是
能够用于标识对象名称的属性是( )。
如果把命令按钮的Cancel属性设置为True,则程序运行后( )。
随机试题
患者,男性,50岁。在心脏手术后住进ICU,查体双侧肺底有细小湿啰音,胸部X线提示肺水肿,值班医师给予一种药物后监测血流动力学改变见下:参数给药之前给药之后BP(mmHg)99/67
A.会翻身B.能独坐C.会爬行D.会独立行走E.会上下台阶2l_正常6个月婴儿应会的动作是正常3个月婴儿应会的动作是
治疗子肿肾虚证,应首选的方剂是
设备承揽合同的定作人违约时,承揽人可以采取的措施有( )。
( )的主要缺点是由于容器的体积较蛇管的体积大得多,故管外流体的对流换热系数较小,因而总传热系数K值也较小。
砂浆饱满度检测中,取()块砖的底面灰缝砂浆的饱满度平均值,作为该处灰缝砂浆的饱满度。
王某2014年年末取得全年一次性奖金120000元,企业为王某定额负担4000元的个人所得税,王某每月工资15000元,王某年终奖自己实际负担的税额为()元。
以下关于贷款抵押额表述不正确的是()。
在下列作业动因中,有关精确度与执行成本间关系表述正确的有()。
Untilsuchtimeasmankindhasthesensetoloweritspopulationtothepointswhereastheplanetcanprovideacomfortablesupp
最新回复
(
0
)