首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
1. 在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为F1和 F2,标题分别为“交通工具”和“到达目标”。在F1中画两个单选按钮,名称分别为Op1和 Op2,标题分别为“飞机”和“火车”。在F2中画两个单选按钮,名称分别为O
1. 在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为F1和 F2,标题分别为“交通工具”和“到达目标”。在F1中画两个单选按钮,名称分别为Op1和 Op2,标题分别为“飞机”和“火车”。在F2中画两个单选按钮,名称分别为O
admin
2009-03-17
42
问题
1. 在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为F1和 F2,标题分别为“交通工具”和“到达目标”。在F1中画两个单选按钮,名称分别为Op1和 Op2,标题分别为“飞机”和“火车”。在F2中画两个单选按钮,名称分别为Op3和Op4,标题分别为“广州”和“昆明”。然后画一个命令按钮,其名称为C1,标题为“确定”。再画一个文本框,其名称为Text1。编写适当事件过程。程序运行后,选择不同单选按钮时产生的显示结果见下表1。
存盘时,工程文件名为sjt3.vbp,窗体文件名为sjt3.frm。
2.在窗体上画2个单选按钮(名称分别为Op1和Op2,标题分别为“加法”和“乘法”)、3个文本框(名称分别为Text1、Text2、Text3,高度和宽度均为400和1500)和1个命令按钮(名称为C1,标题为“汁算”,高度为400,宽度为1000),如图2—1所示,编写适当的事件过程。程序运行后,在text1和Text2中分别输入12和22两个整数,并选择一个单选按钮,单击“计算”按钮后,可根据所选择的单选按钮进行加法或乘法运算,并把结果在Text3中显示出来,同时把加法结果存入文件out4—3—1.txt中,乘法结果存入文件out4—3—2.txt中。程序的运行情况如图2—2所示。
存盘时,工程文件名为sit4.vbp,窗体文件名为sit4.frm。
在考生文件夹中有一个标准模块m1.bas,该模块中提供了保存文件的过程putdata1和 putdata2,可用来把加法结果和乘法结果分别存入文件out4—3—1.txt和out4—3—2.txt中,考生可以直接装入该标准模块,然后调用putdata1和putdata2过程保存文件。两个过程的代码如下:
Sub putdata1(x As Integer)
Open".\out4—3—1.txt"For Output As #1
Print #1,x
Close #1
End Sub
Sub putdata2(x As Integer)
Open".\out4—3—2.txt"For Output As #1
Print #1,x
Close #1
End Sub
选项
答案
① 打开题目提供的工程文件,建立控件和设置控件属性。 程序中用到的控件如下表3所示 [*] ② 编写程序代码 题目提供的程序代码: Private Sub Form Unload(Cancel As Integer) Open"out.txt"For Output As #1 Print #1,Op1.Value,Op2.Value, Op3. Value, Op4. Value, Text1. Text Close #1 End Sub 参考代码: Private Sub C1_Click() Dim str1 As String Dim str2 As String If Op1 Then str1=Op1.Caption Else str1=Op2.Caption End If If Op3 Then str2=Op3.Caption Else str2=Op4.Caption End If Text1.Text="坐" & str1 & "去" & str2 End Sub ③ 按题目要求存盘并进行相应的操作。 2.按以下步骤操作: ① 启动Visual Basic,在窗体上面3个文本框、2个单选按扭和1个命令按钮。 ② 按F4键激活属性窗口,在属性窗口中设置各控件的属性,见表4。 [*] ③ 执行“工程”菜单中的“添加文件”命令(或按Ctrl+D),打开“添加文件”对话框,在当前目录下找到m1.bas,把它添加到当前工程中。该模块中 putdata过程的代码如下: Sub putdata1(x As Integer) Open"0\out4—3—1.txt"For Output As #1 Print #1,x Close #1 End Sub Sub putdata2(x As Integer) Open".\out4—3—2.txt"For Output As #1 Print #1,x Close #1 End Sub 两个过程的操作基本相同,只是输出的文件名不一样。 ④ 编写命令按钮的Click事件过程: Private Sub C1_Click() Dim a As Integer,b As Integer a=Text1.Text b=Text2.Text If Op1.Value=True Then Text3.Text=a+b putdata1 Text3.Text Else Text3.Text=a*b putdata2 Text3.Text End If End Sub
解析
转载请注明原文地址:https://kaotiyun.com/show/qk1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果一个JavaApplet源程序文件中只定义了一个类,该类的类名为MyApplet,则存储该源程序文件的文件名应为【】。
类中限定为()的成员变量和成员方法可以被除了不同包中的非子类访问。
下列各项中不是JDBCAPI向JDBCDriverManager发出请求的内容的是()。
下列关于栈的描述中错误的是()。
结构化程序设计所规定的3种基本控制结构是循环结构、选择结构和【】。
数据库设计有两种方法,它们是()。
下列叙述中正确的是
软件开发的结构化生命周期方法将软件生命周期划分成()
一个结点的子结点个数称为该结点的【】。
一棵二叉树第六层(根结点为第一层)的结点数最多为【】个。
随机试题
十进制数126转换成二进制数等于
确定尘肺及其分期的主要方法是()。
成年人脊柱强直固定,多见于
水利水电工程建设过程中的验收包括()验收。
赵毅在学习过程中缺乏独立性,易受同学影响。当他发现自己的意见和同学们不一致时,往往不能坚持己见。这表明他的认知方式属于()。
我国经济发展带动全局的战略重点,是()
某网上商城按下述方式促销商品:一年中任何时候,或者有季节性促销,或者有节日促销,或两者都有。每一种促销都会持续一个月。在任何一个月,如果该网上商城想要把某一类商品清仓,就宣布季节性促销;如果某个月份有节日并且仓库中有剩余商品,就宣布节日促销。不过,8月份没
抗日战争时期进步势力主要是指()
辩证唯物主义和旧唯物主义虽然都坚持反映论,认为认识是主体对客体的反映,但是两者之间又有着性质上的区别,旧唯物主义的认识论的主要缺陷在于()
SlanginEnglishTodaywe’lldiscussacommonlinguisticphenomenoninEnglish—slang.Thefeaturesofslangarelisteda
最新回复
(
0
)