首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上画一个文本框,名称为Text1,MultiLine属性为True,ScrollBars属性为2;两个命令按钮.名称分别为Cmdl和Cmd2,标题分别为“读人数据”和“排序并保存”,如图4—6所示。程序运行后,如果单击“读人数据”按
在名称为Form1的窗体上画一个文本框,名称为Text1,MultiLine属性为True,ScrollBars属性为2;两个命令按钮.名称分别为Cmdl和Cmd2,标题分别为“读人数据”和“排序并保存”,如图4—6所示。程序运行后,如果单击“读人数据”按
admin
2009-03-26
32
问题
在名称为Form1的窗体上画一个文本框,名称为Text1,MultiLine属性为True,ScrollBars属性为2;两个命令按钮.名称分别为Cmdl和Cmd2,标题分别为“读人数据”和“排序并保存”,如图4—6所示。程序运行后,如果单击“读人数据”按钮,则读入in.txt文件中的100个整数,放入一个数组中(数组下界为1):如果单击“排序并保存”按钮,则对这100个整数按从小到大进行排序,并把排序后的全部数据在文本框Text1中显示出来,然后存入考生文件夹中的文件result.txt中(在程序中的标准模块prog.bas过程可以把指定个数的数组元素存入result.txt文件中)。
注意:文件必须存放在考生文件夹下,窗体文件名为sj5.frm.工程文件名称为sj5.vbp,排序结果存入result.txt文件,否则没有成绩。
选项
答案
除了基本的操作外,本题涉及到的知识点主要有循环和数组的使用两个方面。先在窗体上建立控件,再设置控件属性,然后研读提供的代码,正确分析并完成程序。文本框显示的内容通过Text属性设置;按钮的标题通过Caption属性设置,单击命令按钮触发Click事件;在本题中涉及到文件的操作,读人文件并以顺序的方式打开,用“Input#”语句读取数据,另外需要注意的是对文件操作结束后,一定要关闭文件。 ①文本框显示的内容通过Text属性设置,Multiline属性决定文本框是否可多行显示。若需要多行显示,则必须将Multiline属性设置为True,同时将Scrollbars属性设置为2。 ②建立界面并设置控件属性。按钮的标题通过Caption属性设置,单击命令按钮触发Click事件。程序中用到的控件及属性设置见下表: [*] ③打开工程资源管理器,在其空白处右键添加模块prog.bas(此文件已在考生文件夹里),模块代码如下: Option Explicit Sub putdata(a()As Integer,n As Integer) Dim sFile As String sFile="\result.txt" Open App.Path&sFile For Output As#1 For i=1 To n Print#l,a(i); Next i Close#1 End Sub ④打开工程资源管理器,右击窗体,选择查看代码项,在弹出的代码窗口输入代码如下: 窗体代码 Option Explicit Dim i(1 To 100)As Integer Private Sub Crodl Click() Dim j As Integer Open App.Path&"\"&."in.txt"For Input As#l For i=1 To 100 Input#l,i(j) Textl.Text=Textl.Text&i(j)&.Space(5) Next i Close#l End Sub Private Sub Crod2 Click() Dim j As Integer Dim k As Integer Dim l AS Integer Dim temp As Integer For k=l TO 99 For 1=k+1 To 100 If i(k)>i(1)Then temp=i(k):i(k)=i(1):i(1)=temp Next i Next k Textl.Text="" For i=1 To 100 Textl.Text=Textl.Text&i(j)&Space(5) Next j End Sub ⑤调试并运行程序。 ⑥按题目要求存盘。
解析
转载请注明原文地址:https://jikaoti.com/ti/VLq0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
联接运算是将两个或两个以上的关系根据联接条件生成一个【】。
下列方法中设置Swing容器JFrame大小为20×30的语句是()。
下列语句段将输出字符’*’的个数为()。inti=100;while(1){i--;if(i==0)break;cout<<’*’;}
面向对象程序设计有许多特性,下列选项中用来尽可能隐蔽对象的内部细节的是()。
Java语言支持【】协议,从而使得Java程序在分布式环境中能够很方便地访问处于不同地点的对象。
算法的时间复杂度是指()
如果对一个关系实施了一种关系运算后得到了一个新的关系,而且新的关系中属性个数少于原来关系中属性个数,这说明所实施的运算关系是()
下列常见的系统定义的异常中,______是输入、输出异常。
设x=1,y=2,z=3,则表达式y+=z--/++x的值是()。
线程控制方法中,yield()的作用是()。
随机试题
心壁由内向外分为三层,分别为________、________和________;其中最内层又可分为________、________和________。
肝功能不患患者应避免使用
营业线轨道施工中,曲线外轨最大超高不得大于()。
下列关于商业银行业务的表述,正确的是()。[2013年11月真题]
大学毕业生小云长得漂亮,身材高挑,刚入职就被已婚的部门领导表白。之后的两年该领导不断骚扰她,甚至在单位的公开场合也不避讳。这让小云非常烦恼,同事的议论更让她羞愧难当,为此她向社会工作者小汪求助。在与小云的会谈中,小汪运用了影响性技巧。下列回应中,属于该技巧
草鱼原产于东北到华南各大水系,后来被引入到云南的滇池中高密度地喂养,结果使很多当地水生植物(如滇池的海菜花)被消耗殆尽,一些水生动物如滇池蝾螈也随之灭绝等。这是因为()。
秦穆公请伯乐推荐继任者,伯乐说九方皋可堪此任。九方皋奉秦穆公之命外出寻找千里马,三月后复命说,马已找到。穆公问:何马也?九方皋答道:黄色的公马。穆公派人去取马,取马的人回报说是匹黑母马。穆公不悦,责问伯乐:你推荐的这位相马者连马的黄黑公母都不辨,怎能鉴别其
李某,男,17岁,系某市国有百货文化用品公司工人。王某,男,系李某结拜兄弟。王某16岁生日将至,多次向李某要生日礼物。2005年9月10日,被告人李某在本公司营业厅盗得该公司空白提货单2份(五联单)并乘收款员刘某不备,在提货单上偷盖了该公司付款专用章。而后
某二叉树的先根遍历序列为CEDBA,中根遍历序列为DEBAC,则其后根遍历序列为【】。
Twomodesofargumentationhavebeenusedonbehalfofwomen’semancipationinWesternsocieties.Argumentsinwhatcouldbecal
最新回复
(
0
)