首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有文件in5.txt,文件中有几行汉字。请在窗体Forml上绘制一个文本框,名称为Text 1,能显示多行;再绘制一个命令按钮,名称为Commandl,标题为“保存”。并编写适当的事件过程,使得在加载窗体时,把in5.txt文件的内容显示在文
在考生文件夹下有文件in5.txt,文件中有几行汉字。请在窗体Forml上绘制一个文本框,名称为Text 1,能显示多行;再绘制一个命令按钮,名称为Commandl,标题为“保存”。并编写适当的事件过程,使得在加载窗体时,把in5.txt文件的内容显示在文
admin
2009-03-26
24
问题
在考生文件夹下有文件in5.txt,文件中有几行汉字。请在窗体Forml上绘制一个文本框,名称为Text 1,能显示多行;再绘制一个命令按钮,名称为Commandl,标题为“保存”。并编写适当的事件过程,使得在加载窗体时,把in5.txt文件的内容显示在文本框中,然后在文本的最前面手工插入一行汉字:“全国计算机等级考试”,如图36—5所示。最后单击“保存”按钮,可以把文本框中修改过的内容存到文件out5.txt中。
注意:只能在最前面插入文字,不能修改原有文字。文件必须存放在考生文件夹中,以sj5.vbp为文件名存储工程文件,以sj5.fm为文件名存储窗体文件。
选项
答案
根据题意,在窗体上添加一个文本框控件,其名称为Textl、MultiLine属性为True,一个命令按钮,其名称为Commandl、标题为“保存”。设置完成后,双击Commandl命令按钮进入代码窗口,编写如下代码: Private Sub Form Load() Open"App.Pathg&\in5.txt"For Input As#1 Do While NOt EOF(1) Input#1.mystring Textl.Text=Textl.Text+mystring Loop Close#1 Textl.Text="全国计算机等级考试"+Textl.Text End Sub Private Sub Commandl_Click() Open App.Path&"\out5.txt"For Output As#2 Print#2,Textl.Text Close#2 End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://jikaoti.com/ti/aLq0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
多线程是Java程序的【】机制,它能同步共享数据、处理不同事件。
下列不属于更新数据库操作步骤的是()。
下列方法中设置Swing容器JFrame大小为20×30的语句是()。
已知:int[]a=newint[100];在下列给出的数组元素中,非法的是()。
如果一个JavaApplet源程序文件只定义有一个类,该类的类名为MyFirstApplet,则存储该源程序的文件名必须为【】。
当数据的物理结构(存储结构、存取方式等)改变时,不影响数据库的逻辑结构,从而不致引起应用程序的变化,这是指数据的【】。
在编写JavaApplication程序时,若需要使用到标准输入输出语句,则必须在程序的开头写上______语句。()
数据结构作为计算机的一门学科,主要研究数据的逻辑结构、对各种数据结构进行的运算,以及()
结构化程序设计的一种基本方法是()。
E-R模型可以转换成关系模型。当两个实体间联系是M:N联系时,它通常可转换成关系模式的个数是()。
随机试题
下列各项,不是胃溃疡并发症的是
IftheEuropeansthoughtadrought—alongperiodofdryweather—wassomethingthathappenedonlyinAfrica,theyknowbetternow
A.酌情停药B.完全消失C.无原发病D.终生E.半年到1年用药继发的巨幼红细胞贫血患者应
下列解表药中,兼有化湿功效的是
治疗心源性哮喘可选用
甲、乙、丙、丁拟设立一家商贸公司,就设立事宜分工负责,其中丙负责租赁公司运营所需仓库。因公司尚未成立,丙为方便签订合同,遂以自己名义与戊签订仓库租赁合同。关于该租金债务及其责任,下列哪些表述是正确的?
根据《中华人民共和国会计法》的规定,下列各项中,单位出纳人员不得兼任的工作有()。
根据下表,则下列说法正确的是()。Ⅰ.来自东亚的游客数量小于来自东欧、南美洲、北美洲、东南亚的游客数量和Ⅱ.游客中除了来自东亚与其他之外的外国游客数量,小于来自国内的游客数量
以下属于客户端脚本语言的是__________________。
Extraordinarycreativityhasbeencharacterizedasrevolutionary,flyinginthefaceofwhatisestablishedandproducingnotwh
最新回复
(
0
)