vb怎样把一个txt中所有内容(多行)显示在一个text中?

2024-11-20 13:36:35
推荐回答(2个)
回答(1):

Private Sub Command2_Click()
text2.text=""
a = "C:\reg\shit.txt" '你要读取的TXT文件路径
Open a For Input As #1
Do While Not EOF(1)
Input #1, b
text2.text=text2.text & b
Loop
close #1 ‘打开文本后记得关闭
end Sub

回答(2):

将Text1的MultiLine属性设置为TRUE就可以了!