我用是的vb.net怎样将文本文件里面的内容快速的写到文本框中,

DoWhileNotEOF(1)ch=InputString(1,1)TextBox1.Text=TextBox1.Text+chloop这个可以就是处理大文本的时候很慢... Do While Not EOF(1)

ch = InputString(1, 1)
TextBox1.Text = TextBox1.Text + ch
loop
这个可以就是处理大文本的时候很慢,帮忙改下谢谢。
展开
 我来答
FabKiller
2010-12-02 · TA获得超过586个赞
知道小有建树答主
回答量:676
采纳率:0%
帮助的人:482万
展开全部
根本不用那么麻烦!

界面中添加一个Button和RichTextBox控件(自带的),双陵烂击后添加以下代码:
RichTextBox1.LoadFile("F:\临时文件\123.txt", RichTextBoxStreamType.PlainText)

就这么简单的一句,比用缺汪氏什么EOF去伏散判断文件尾巴好多了
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
zhaobuping
2010-12-04 · TA获得超过340个赞
知道小有建树答主
回答量:195
采纳率:0%
帮助的人:268万
展开全部
Dim myStreamReader As StreamReader = File.OpenText(My.Application.Info.DirectoryPath & "橡饥灶\123.txt"梁扮肢返)
txtResult.Text = myStreamReader.ReadToEnd()
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
solidco2
2010-12-02 · 知道合伙人软件行家
solidco2
知道合伙人软件行家
采纳数:126 获赞数:539

向TA提问 私信TA
展开全部
用斗备 line input。
Open "e:\rec.txt"空宽毁 For Input As #1
Dim s As String
Text1.Text = "巧滚"
While Not EOF(1)
Line Input #1, s

Text1.Text = Text1.Text & s & vbNewLine
Wend
Close #1
本回答被提问者和网友采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式