VB.NET中,现有一多行TXT文件,想按行读取全部内容,然后显示在一文体框中,代码如下

2024-11-29 02:36:09
推荐回答(3个)
回答1:

a = ""
TextBox1.Text =""
    
FileOpen(1, Application.StartupPath() & "\file\t1.txt", OpenMode.Input)      
Do While Not EOF(1)
   Input(1, a)
   TextBox1.Text =TextBox1.Text  & a & vbcrlf
Loop      
        
一次性读取
a=File.ReadAllText(Application.StartupPath() & "\file\t1.txt")

回答2:

全部一次性读取

Imports System.IO

Dim a As String = File.ReadAllText(Application.StartupPath() & "\file\t1.txt")

回答3:

Do While Not EOF(1)
Input(1, a)
TextBox1.Text += a
Loop