首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
1. 在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为F1和 F2,标题分别为“交通工具”和“到达目标”。在F1中画两个单选按钮,名称分别为Op1和 Op2,标题分别为“飞机”和“火车”。在F2中画两个单选按钮,名称分别为O
1. 在考生文件夹下有一个工程文件sjt3.vbp,请在窗体上画两个框架,其名称分别为F1和 F2,标题分别为“交通工具”和“到达目标”。在F1中画两个单选按钮,名称分别为Op1和 Op2,标题分别为“飞机”和“火车”。在F2中画两个单选按钮,名称分别为O
admin
2009-03-17
46
问题
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全国计算机二级
相关试题推荐
运行下面程序后,正确的输出结果是()。publicclassSun{publicstaticvoidmain(Stringargs[]){intx=6;if(x
创建一个名为MyPackage的包的语句是【】。
将整个软件划分成若干单独命名和可编址的部分,称之为【】。
多线程是Java程序的【】机制,它能同步共享数据、处理不同事件。
在编写JavaApplet程序时,若需要对发生的事件作出响应和处理,一般需要在程序的开头写上()语句。
面向对象程序设计有许多特性,下列选项中用来尽可能隐蔽对象的内部细节的是()。
如果一个JavaApplet源程序文件只定义有一个类,该类的类名为MyFirstApplet,则存储该源程序的文件名必须为【】。
下列______包封装抽象窗口工具包,提供管理用户图形界面功能。()
一棵二叉树中共有70个叶子结点与80个度为1的结点,则该二叉树中的总结点数为
表达式(10*49.3)的类型是______型。
随机试题
A.四级结构形成B.四级结构破坏C.一级结构破坏D.一级结构破坏E.二、三级结构破坏蛋白酶水解蛋白质时会出现
女性,48岁。5年前患右上肺结核,痰菌阳性,经异烟肼、链霉素和乙胺丁醇治疗6个月,痰菌转阴,病灶明显吸收,自行停药,未再随访。近1月来感乏力,2天前起咳嗽,痰中带血就诊。X线胸片示右上肺大片致密影,边缘不清,密度不均,高密度病灶部分约见有钙化。侧位病变位于
患者,女,40岁。双手指及腕关节肿痛3个月,伴晨僵。查血沉56mm/h,类风湿因子1:80。必要的检查首先是
图5-64所示正方形截面等直杆,抗弯截面为W,在危险截面上,弯矩为M,扭矩为Mn,A点处有最大正应力σ和最大切应力τ。若材料为低碳钢,则其强度条件为()。
计划性风险自留的计划性主要体现在( )方面。
会计核算软件按服务层次和提供信息的深度可分为单用户会计核算软件和多用户(网络)会计核算软件。()
根据规定,投资人申请设立个人独资企业,应当向登记机关提交的文件有()。
有权制定税收部门规章的税务主管机关是财政部、国家税务总局。()
在弗洛伊德的心理发展阶段理论中,“恋母情结”现象出现在()
Themainideaofthispassageis______.
最新回复
(
0
)