首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个文本框,名称分别为Textl、Text2,都可以多行显示。还有三个命令按钮,名称分别为C1、C2、C3,标题分别为“取数”、“排序”、“存盘”。“取数”按钮的功能是将考生文件夹下的in5.dat文件中
考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个文本框,名称分别为Textl、Text2,都可以多行显示。还有三个命令按钮,名称分别为C1、C2、C3,标题分别为“取数”、“排序”、“存盘”。“取数”按钮的功能是将考生文件夹下的in5.dat文件中
admin
2020-04-08
44
问题
考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
窗体上有名称为Commandl的命令按钮和名称为Text1的文本框PrivateSubCommandl一Click()Text1.Text=“程序设计”Text1.SetFocusEndSubPriv
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
假定Picture1和Text1分别为图片框和文本框的名称,则下列错误的语句是( )。
数据库设计过程不包括
下面程序运行时,若输入395,则输出结果是()。PrivateSubCmd1_Click()Dima%a=InputBox("请输入一个3位整数")PrintaMod10,a\100,(aMod100)\10EndSub
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是( )。
(1)考牛文件夹下的工程文件sit3.vbp中有一个菜单、两个标签和两个文本框。程序运行时,用鼠标右键单击窗体会弹出一个弹出式菜单(如图3.160所示)。当选巾“计算100以内自然数之和”菜单项时,将计算100以内自然数之和并放入Text1中;当选中“计算
(1)考生文件夹下的工程文件sjt3.vbp中有2个标题分别是“产生范文”和“结束”的命令按钮;2个名称分别为text1和Text2,初始值为空的文本框。请再画1个名称为Label3、标题为“正确率”的标签,画1个名称为Text3、初始内容为空的文本框。效
与数学式子对应的VisualBasic表达式是
在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是()。
随机试题
手部胃反射区位于()正中,中轴线处。
患者男性,42岁,右下肢血栓性静脉炎3个月,早晨锻炼时突然发生右胸部剧烈疼痛,伴气短、咯血,心电图检查呈SⅠQⅢTⅢ。最具有诊断意义的检查是患者女性,28岁,既往健康,因剧烈咳嗽后出现呼吸困难、右侧胸痛,体格检查发现气管向左侧移位,听诊右侧呼吸音减弱,
A.医疗机构B.乡镇卫生院C.城镇个体行医人员和个体诊所D.药品经营企业E.药品零售企业()不得购进和销售医疗机构配制的制剂
企业所得税的纳税年度,自公历1月1日起至12月31日止。()
按照我国《保险法》的规定,财产保险的种类主要包括( )等。
有效市场假定意味着证券价格充分反映了所有可得信息,因此一般投资者不会发现未被利用的盈利机会。
设f(t)=∫01lndx,则f(t)在t=0处
C语言是一种______语言。
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是()。
下面显示的是查询设计视图的“设计网络”部分,从此部分所示的内容中可以判断出要创建的查询是()。
最新回复
(
0
)