首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在名称为Form1的窗体上画一个文本框,其名称为Text1,可以多行显示,并有垂直滚动条;然后再画三个命令按钮,其名称分别为Command1、Command2 和Command3,标题分别为“取数”、“排序”和“存盘”,如图1-297(a)所示,编写适当的
在名称为Form1的窗体上画一个文本框,其名称为Text1,可以多行显示,并有垂直滚动条;然后再画三个命令按钮,其名称分别为Command1、Command2 和Command3,标题分别为“取数”、“排序”和“存盘”,如图1-297(a)所示,编写适当的
admin
2019-05-14
61
问题
在名称为Form1的窗体上画一个文本框,其名称为Text1,可以多行显示,并有垂直滚动条;然后再画三个命令按钮,其名称分别为Command1、Command2 和Command3,标题分别为“取数”、“排序”和“存盘”,如图1-297(a)所示,编写适当的事件过程。程序运行后,如果单击“取数”命令按钮,则将in5.txt 文件中的100个整数读到数组中,并在文本框中显示出来,如图1-297(b)所示;如果单击“排序”命令按钮,则对这100个整数按从大到小的顺序进行排序,并把排序后大于500 的数在文本框中显示出来;如果单击“存盘”命令按钮,则把文本框中所有 的数(即排序后大于500的数)保存到考生文件夹下的文件out5.txt 中。
注意:1)必须把排序后大于500的所有整数保存到文件out5.txt 中,否则没有成绩。2)存盘时必须存放在考生文件夹下,工程文件名为sjt5.vbp,窗体文件名为sjt5.frm。
选项
答案
【操作步骤】 步骤1:新建一个“标准EXE”工程。 步骤2:在窗体Form1中加入一个文本框和三个命令按钮,并分别设置它们的相关属性,属性及值如表2-159所示。 [*] 步骤3:打开代码编辑窗口,编写三个命令按钮的单击事件代码。 参考代码: Private N(100) As Integer Private Sub Command1_Click() Open "in5.txt" For Input As #1 For i = 1 To 100 Input #1, N(i) Text1 = Text1 & " " & N(i) Next i Close #1 End Sub Private Sub Command2_Click() Dim i, j As Integer For i = 1 To 100 For j = i To 100 If N(i) < N(j) Then tmp = N(i) N(i) = N(j) N(j) = tmp End If Next j Next i Text1.Text = "" For i = 1 To 100 If N(i) > 500 Then Text1 = Text1 & " " & N(i) End If Next i End Sub Private Sub Command3_Click() Open "out5.txt" For Output As #1 Write #1, Text1.Text Close #1 End Sub 步骤4:按要求将文件保存在考生文件夹中。 步骤5:运行程序,先单击“取数”按钮,然后单击“排序”按钮,最后单击“存盘”按钮。
解析
转载请注明原文地址:https://kaotiyun.com/show/BHUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为ShapeI的圆角矩形,高、宽分别为1000、2000。请利用属性窗口设置适当的属性满足以下要求:①圆角矩形中填满绿色(颜色值为&
请根据以下各小题的要求设计’VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml、标题为“框架”的窗体上画一个名称为Framel,且没有标题的框架。框架内含有两个单选按钮,名称分别为Opt1和Opt2、标题分别为“字体”、“大小”
(1)考生文件夹下的工程文件sjt3.vbp中有一个初始内容:为空、且带有垂直滚动条的文本框,其名称为Text1;两个标题分别为“读数据”和“查找”的命令按钮,其名称分别:勾Cmd1、Cmd2。请画一个标题为“查找结果”的标签Label1,再画一个名称为T
请根据以下各小题的要求设计visualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFF&
随机试题
膨胀土高边坡应按“()”的原则进行防护,其综合坡率应满足稳定性要求。
A、 B、 C、 D、 B
男,独坐稳,头围43cm,前囟0.5cm×1.0cm,乳牙2颗。下列反射哪项已不存在
男,5岁,高热2小时,抽搐3次,意识不清,初步诊断“中毒性痢疾”,应首先做的检查是
某项目初始投资1000元,年利率8%,期限为1年,每季度付息一次,按复利计算则其1年后本息和为()元。
下列固定资产在企业所得税前不得计算扣除折旧的有()。
下列关于营业税税收优惠的说法,正确的有()。
设n阶矩阵
ElizabethWillard,themotherofGeorgeWillard,wastallandgauntandherfacewasmarkedwithsmallpoxscars.Althoughshewa
Althoughmostpeoplereturnfrompackageholidaysreasonablysatisfied,thisisnotalwaysthe【C1】______TakeforInstance,the
最新回复
(
0
)