首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个文本框,名称分别为Textl、Text2,都可以多行显示。还有三个命令按钮,名称分别为C1、C2、C3,标题分别为“取数”、“排序”、“存盘”。“取数”按钮的功能是将考生文件夹下的in5.dat文件中
考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个文本框,名称分别为Textl、Text2,都可以多行显示。还有三个命令按钮,名称分别为C1、C2、C3,标题分别为“取数”、“排序”、“存盘”。“取数”按钮的功能是将考生文件夹下的in5.dat文件中
admin
2020-04-08
68
问题
考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个文本框,名称分别为Textl、Text2,都可以多行显示。还有三个命令按钮,名称分别为C1、C2、C3,标题分别为“取数”、“排序”、“存盘”。“取数”按钮的功能是将考生文件夹下的in5.dat文件中的50个整数读到数组中,并在Textl中显示出来;“排序”按钮的功能是对这50个数按升序排序,并显示在Text7.中;“存盘”按钮的功能是把排好序的50个数存到考生目录下的out5.dat文件中,如图所示。在窗体中已经给出了全部控件和部分程序代码,要求阅读程序并去掉程序中的注释符,把程序中的?改为正确的内容,并编写“排序”按钮的Click事件过程,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性。最后将修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“′”,将问号改为正确的内容,并编写代码。 参考答案(阴影部分是需考生填入的内容) Dim a(50)As Integer Private Sub C1_Click() Dim k As Integer,ch As String Open"in5.dat"For Input As#1 ch="" For k=1 To 50 Input#1,
a(k)
’将取出的数据存入数组a中 ch=ch+Str(a(k))+""’将数 据存入ch Next k Close#1 Textl.Text=
ch
′在Textl文本框中显示文件内容 End Sub Private Sub C2_C1ick() End Sub Private Sub C3 Click() Open"out5.dat"For Output As#1 Print#1,Text2.Text Close#1 End Sub 需编写的“排序”按钮的代码 Private Sub C2_Click() Dim t As Integer Dim i As Integer Dim j As Integer Dim ch As String ch="" For i=50 To 2 Step一1′使用冒泡算法从小到大排序 For j=1 To 49 If a(j)>a(j+1)Then′两两比较 t=a(3+i) a(j+1)=a(j) a(j)=t End If Next j Next i For j=l To 50′将排序后的数组重新赋给ch ch=ch+Str(a(j))+"" Next j Text2.Text=ch End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 【易错提示】注意冒泡排序的用法,理解位置交换的含义和方法,在交换时要有一个中间变量来起到传递的作用,否则会使其中一个值丢失而产生错误。
解析
str函数用于数值转化为字符串,语法为:Str(number)。
转载请注明原文地址:https://kaotiyun.com/show/lATp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果将命令按钮的访问键设置为"D",以下不会触发命令按钮Click事件的操作是
窗体如图1所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击"删除"按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:PrivateSubCommand1_Click() Dimn%
设已经在窗体上添加了一个通用对话框控件CommonDialogl,以下语句正确的是()。
A、选择B、差C、交D、并B关系T是关系R的一部分,并且是关系R去掉R和S相同的元素,符合差操作。
下面关于数据库三级模式结构的叙述中,正确的是()。
计算机软件包括
表达式12/2\4的值是( )。
设A、B、C是三角形的3条边,则以下表示"任意两边之和大于第三边"的布尔表达式是
双精度浮点数的类型说明符为
数据流图由一些特定的图符构成。下列图符名标以的图符不属于数据流图合法图符的是()。
随机试题
使献血者产生不良反应的精神因素不包括
甲状腺功能减退患者的临床表现不包括
2019年5月,某小汽车生产厂将一辆自产成本为80万元的超豪华小汽车以不含增值税140万元的价格销售给了刘女士,已知小汽车生产环节的消费税税率为9%,超豪华小汽车在零售环节的消费税税率为10%。该小汽车生产厂就此项业务应该缴纳消费税()
某公司正在采用成本模型和存货模型确定其最佳现金持有量,相关资料如下:资料一:利用成本模型预测,企业有四种现金持有方案,各方案有关成本资料如下表所示。资料二:利用存货模型进行预测,假设公司现金收支平衡,预计全年(按360天计算)现金需要量为250000
加工一种轴承,其规格为10±0.08mm,要求过程能力指数CpK≥1。收集25组数据绘分析用控制图,未显示异常。计算得到:μ≈10.04mm,σ≈O.02mm。CpK为()。
医务社会工作的功能中,寻求与整合资源包括()。
最近,英国研究人种智商的学者理查德.林恩得出了一个令亚洲人感到既惊讶又高兴的研究结论:中国人、日本人、朝鲜人是全世界最聪明的人,拥有全世界最高的平均智商,平均值为105。之后的排位是欧洲人(100)、爱斯基摩人(91)等。人种智商最低的地区是南非沙漠高原的
(2007年)
Mostconsumersfounditimpossibleto______bottledwaterfromtapwaterduringtheexperimentaltastetests.
Althoughinteriordesignhasexistedsincethebeginningofarchitecture,itsdevelopmentintoaspecializedfieldisreallyqui
最新回复
(
0
)