首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
打开考生文件夹下的sj5.vbp。在名称为Forml的窗体上建立一个名为Textl的文本框和两个命令按钮,名称分别为commandl和Command2,命令按钮上分别显示“读入”和“排序”。程序运行时,单击“读入”按钮,将in.txt文件中的50个数读入,
打开考生文件夹下的sj5.vbp。在名称为Forml的窗体上建立一个名为Textl的文本框和两个命令按钮,名称分别为commandl和Command2,命令按钮上分别显示“读入”和“排序”。程序运行时,单击“读入”按钮,将in.txt文件中的50个数读入,
admin
2009-03-26
30
问题
打开考生文件夹下的sj5.vbp。在名称为Forml的窗体上建立一个名为Textl的文本框和两个命令按钮,名称分别为commandl和Command2,命令按钮上分别显示“读入”和“排序”。程序运行时,单击“读入”按钮,将in.txt文件中的50个数读入,.单击“排序”则把数组a中的数值按照降序排列。请在有“?”号的地方填正确内容,然后删除“?”及代码前的所有注释符(即“’”号),但不能修改其他部分。
注意:存盘时不得改变文件名和文件夹。
选项
答案
根据题意,在窗体上添加一个Text控件和两个Command控件,Text的名称为Textl、Text属性为空、MultiLine属性为True、ScrollBar属性为2,Command的名称分别为Commandl和Command2、Caption属性分别为‘‘读入’’和‘‘排序”。双击Commandl命令按钮,编写如下代码: Dim a(50)As Long’全局变量 Private Sub Commandl Click() Textl.Text="" Open App.Path&"\in.txt"For Input
As
#1’打开"in.txt"文件 Dim i As Integer Dim temp As Integer For i=1 To 50 Input#l,temp a(i)=temp’按顺序读入到数组中 Next i For i=1 To 50 Textl.Text=Textl.
Text
+CStr(a(i))+vbCrLf’将数组中的数放人Text中显示 Next i CIose#1 End Sub Private Sub Command2_Click() Dim i As Integer Dim j As Integer Dim k As Integer Dim temp As Integer Dim str As String str="" For i=1 To 50 ’降序排列 temp=a(i) For j=1 To i If a(j)
str ’在Textl中显示 End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/eV1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
若a是float型变量,且a=6,则表达式a/2+(int)(a+1)%2的值为【】。
Java中对Applet设置了严格的安全限制。下列关于Applet在Java2中的安全限制叙述正确的是()。
下列叙述中正确的是()。
关于J2SDK的基本命令,下列叙述正确的是______。
下面______组件可以不添加到容器中。
按运算符操作数的数目划分,运算符?:的类型是()。
在对一个复杂表达式进行运算时,要按运算符的优先顺序从高到低进行,同级的运算符则按照【】进行。
以下过程设计工具不属于图形工具的是()。
若x、a、b和c均是int型变量,则执行表达式x=(a=1,b=2)后的结果是()。
使得线程放弃当前分得的CPU时间,但不使线程阻塞,即线程仍处于可执行状态,随时可能再次分得CPU时间的方法是【】。
随机试题
计算机硬件系统中运算器的主要功能是执行________。
医学心理学的研究对象不包括
某女,55岁,面色萎黄,唇甲色淡,头晕眼花,脉细。医师辨证后处方为四物合剂。为减少服药品种,针对气血两虚之证,宜选用的中成药是()
吐温类溶血作用由大到小的顺序为
关于财产租赁的转租问题,下列说法中,正确的是()。
下列各项业务中,属于增值税征收范围的是()。
按职业性质区分,国际入境旅游导游员又可分为()。
与只操纵单个变量的实验设计相比,能同时操纵多个自变量的实验设计的优点有
Acontrastisoftenmadebetweenbusiness,whichiscompetitive,andgovernment,whichisamonopoly.
Astherecentcourgette(密生西葫芦)crisisandshortagesoflettuce,eggplantsandbroccoli(绿花椰菜)haveshown,Spain’sfameastheveget
最新回复
(
0
)