首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为F1和F2,标题分别为“交通工具”和“到达目标”。在F1中画两个单选按钮,名称分别为Op1和Op2,标题分别为“飞机”和“火车”。在F2中画两个单选按钮,名称分别为Op3
(1)在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为F1和F2,标题分别为“交通工具”和“到达目标”。在F1中画两个单选按钮,名称分别为Op1和Op2,标题分别为“飞机”和“火车”。在F2中画两个单选按钮,名称分别为Op3
admin
2018-10-29
24
问题
(1)在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为F1和F2,标题分别为“交通工具”和“到达目标”。在F1中画两个单选按钮,名称分别为Op1和Op2,标题分别为“飞机”和“火车”。在F2中画两个单选按钮,名称分别为Op3和Op4,标题分别为“广州”和“昆明”。然后画一个命令按钮,其名称为C1,标题为“确定”。再画一个文本框,其名称为Text1。编写适当事件过程。程序运行后,选择不同单选按钮并单击“确定”按钮后在文本框中显示的结果见表1-7。
程序的运行情况如图1-171所示。存盘时,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。
注意:考生不得修改窗体文件中已经存在的程序,在结束程序运行之前,必须至少进行上面的一种操作。退出程序时必须通过单击窗体右上角的关闭按钮。
(2)在考生文件夹下有一个工程文件sjt4.vbp,如图1-172所示,请在窗体上画三个文本框,其名称分别为Text1、Text2 和Text3,文本框内容分别设置为“等级考试”、“计算机”和空白。然后画两个单选按钮,其名称分别为Op1 和Op2,标题分别为“交换”和“连接”,编写适当的事件程序。要求在程序运行时,先单击“交换”单选按钮,使Text1文本框中内容与Text2文本框中的内容进行交换,并使“交换”单选按钮消失;然后单击“连接”单选按钮,则把交换后的Text1和Text2的内容以Text1在前、Text2在后的顺序连接起来,并在Text3文本框中显示连接后的内容。存盘时,工程文件名为sjt4.vbp,窗体文件名为sjt4.frm。
注意:不得修改已经给出的程序。在结束程序运行之前,必须先单击“交换”单选按钮,后单击“连接”单选按钮。退出程序时必须通过单击窗体右上角的关闭按钮,否则无成绩。
选项
答案
第1小题 【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjt3.vbp。 步骤2:在窗体Form1中加入两个框架和一个文本框以及一个命令按钮,然后在每个框架中各加入两个单选按钮,分别设置他们的相关属性,其属性及值如表2-76所示。 [*] 步骤3:打开代码编辑窗口输入如下代码: 参考代码: Private Sub C1_Click() If Op1 And Op3 Then Text1.Text = "坐飞机去广州" ElseIf Op1 And Op4 Then Text1.Text = "坐飞机去昆明" ElseIf Op2 And Op3 Then Text1.Text = "坐火车去广州" ElseIf Op2 And Op4 Then Text1.Text = "坐火车去昆明" End If End Sub 步骤4:按要求将文件保存至考生文件夹中。 步骤5:按<F5>键运行程序,选择一种交通工具和一个到达目标,并单击命令按钮,最后单击窗体右上角的关闭按钮退出程序。 第2小题 【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjt4.vbp。 步骤2:在窗体Form1中加入三个文本框和两个单选按钮,分别设置它们的相关属性,其属性及值如表2-77所示。 [*] 步骤3:打开代码编辑窗口输入如下代码: 参考代码: Private Sub Op1_Click() a$ = Text1.Text Text1.Text = Text2.Text Text2.Text = a$ Op1.Visible = False End Sub Private Sub Op2_Click() Text3.Text = Text1.Text & Text2.Text End Sub 步骤4:按要求将文件保存至考生文件夹中。 步骤5:按<F5>键运行程序,选择一个单选按钮,最后单击窗体右上角的关闭按钮退出程序。
解析
转载请注明原文地址:https://kaotiyun.com/show/L3Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()DimscoreAsIntegerscore=86Ifscore>85Thenr=1ElseIfscore>
窗体上已有1个名称为Picture1的图片框,要求实现下面2个功能之一:(1)在窗体上移动鼠标时,立即将Picture1显示在鼠标位置(2)在窗体上单击鼠标时,立即将Picture1显示在鼠标位置下面不能实现上述任何功能的事件过程是
下列不属于计时器控件属性的是
为了将"联想电脑"作为数据项添加到列表框List1的最前面,可以使用语句()。
为了用键盘打开菜单和执行菜单命令,第一步应按的键是( )。
为计算an的值,某人编写了函数power如下:PrivateFunctionpower(aAsInteger,nAsInteger)AsLong DimsAsLong p=a Fork=1Ton p=p*a Next
阅读程序:OptionBase1PrivateSubForm_Click()Dima(3,3)AsIntegerFori=1To3Forj=1To3a(
以下关于文件的叙述中,错误的是( )。
编写如下程序:PrivateSubCommand1_Click() DimmAsInteger,nAsInteger n=2 Form=1To3 Printproc(n); NextmEndSubF
用语句Open"C:\teac.txt"ForInputAs#1打开文件后,就可以编程序
随机试题
“别上校徽。”“别走了。”“别了,我的祖国。”三句话中的“别”是()。
已知A气体含量为80%时,其峰高为100mm,现进一等体积待测样品,得到峰高为70mm,使用单点校正法可知该样品中A气体的体积百分含量是
张家村和李家村毗邻,李家村的用水取自流经张家村的小河,多年来两村经常因用水问题发生冲突。2001年春,为解决根本问题,县政府决定将这条小河的水流交给乡水站统一调配。张家村人认为:小河历史上就属于张家村所有,县政府无权将这条河流的水流交乡水站统一调配,遂将县
避雷针采用不锈钢钢管制作时,其管壁厚度应不小于()。
当高倍数泡沫灭火系统设置在液化天然气集液池或储罐围堰区时,下列说法不符合规定的是()。
国家助学贷款的利率执行中国人民银行规定的同期贷款基准利率,不上浮。()[2012年6月真题]
证券按其收益的决定因素不同,可分为( )。
近年来的高考作文命题,在朝材料作文方向转变,旨在鼓励学生独立思考,自由表达,这是一个积极的改革方向,可是,材料作文却遭遇学生缺乏思考能力的_______。去年高考作文,不独全国卷Ⅰ的作文,其他一些省市的作文也被_______。填入画横线部分最恰当
若将班上每一个人的数学成绩上都增加10分,那么与原来的平均数和标准差相比,变化是
下列要素中,不能作为商标申请注册的是()。
最新回复
(
0
)