首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画1个文本框(名称为Text1,初始内容为空白,字体大小为12,允许多行显示)和1个命令按钮(名称为C1,标题为“存盘”),编写适当的事件过程。程序运行后,把考生文件夹下in.txt文件的内容读入内存,并在文本框中显示出来,如图3—1所示;然后在文
在窗体上画1个文本框(名称为Text1,初始内容为空白,字体大小为12,允许多行显示)和1个命令按钮(名称为C1,标题为“存盘”),编写适当的事件过程。程序运行后,把考生文件夹下in.txt文件的内容读入内存,并在文本框中显示出来,如图3—1所示;然后在文
admin
2009-03-17
76
问题
在窗体上画1个文本框(名称为Text1,初始内容为空白,字体大小为12,允许多行显示)和1个命令按钮(名称为C1,标题为“存盘”),编写适当的事件过程。程序运行后,把考生文件夹下in.txt文件的内容读入内存,并在文本框中显示出来,如图3—1所示;然后在文本的最前面手工插入一行汉字:“枫桥夜泊”,如图3—2所示。如果单击“存盘”命令按钮,则把文本框中修改过的内容保存到文件ont.txt中。
注意:只能在最前面插入文字,不能修改原有文字,存盘时,工程文件名为sjt5.vbp,窗体文件名为sjt5.frm。文件in.txt的内容如下:
选项
答案
按以下步骤操作: ① 启动Visual Basic,在窗体上画1个文本框和1个命令按钮。 ② 按F4键,激活属性窗口,在属性窗口中设置文本框和命令按钮的属性,见表4。 [*] ③ 编写窗体的Load事件过程; Private Sub Form_Load() Open"in.txt"For Input As #1 Text1.Text="" Do While Not EOF(1) Line Input # 1,a$ Text1.Text=Text1.Text+a$+ Chr(13)+Chr(10) Loop Close #1 End Sub 在该过程中,从头到尾依次把in.txt文件中的每一行读到内存,然后在文本框中显示出来。在显示时,通过Chr(13)+Chr(10)实现回车换行,也可以通过vbGrLf常量实现换行。 ④ 编写“存盘”命令按钮的Click事件过程: Private Sub C1_Cliek() Open"out.txt"For output As #1 Print #1,Text1.Text Close #1 End Sub 该过程把当前文本框的内容写入文件out.txt。 ⑤ 运行程序,在文本框中显示读入的文本,此时在文本框的顶部输入“枫桥夜泊”,单击“存盘”命令按钮。然后查看当前目录下是否已建立out.txt文件,其内容是否正确。
解析
转载请注明原文地址:https://kaotiyun.com/show/vk1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列叙述中正确的是()。
下列方法中设置Swing容器JFrame大小为20×30的语句是()。
设执行下面的赋值语句a=Float.valueOf("34").floatValue()之后,a的值是()。
在一个长度为n的线性表中插入一个元素,最坏情况下需要移动的数据元素数目为()。
下列语句段将输出字符’*’的个数为()。inti=100;while(1){i--;if(i==0)break;cout<<’*’;}
在软件生存周期中,能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是
下列注释使用原则的叙述,正确的是()
线性表若采用链式存储结构时,要求内存中可用存储单元的地址()
下列表达式中正确的是
一个结点的子结点个数称为该结点的【】。
随机试题
不朽的失眠他落榜了!一千两百年前。榜纸那么大那么长,然而,就是没有他的名字。啊!竟单单容不下他的名字“张继”那两个字。考中的人,姓名一笔一画写在榜单上,天下皆知。奇怪的是,在他的感觉里,考不上,才更是天下皆知,这件事令他羞惭沮丧。离
噎膈初期的治疗中,均应加入
细菌的代时一般为
按照作用和来源分类,氟尿嘧啶属于
当事人向人民法院申请保全证据的,应当在法定时间前以书面形式提出。根据行政诉讼法律制度的规定,该法定时间是()。
主要对与会议筹备方案的有关的大量文件进行全面审核的审核方法是()。
是()
工人阶级开始登上政治舞台的标志是()。
下列能最好评价肺通气功能的指标是( )
Haitianstrikersarerefusing
最新回复
(
0
)