文本打开的问题

Question

我的程序如下：
Private Sub mune_open_Click()
Dim T As String
Text1.Text = ""
CommDiag1.Filter = "文本文件|*.txt"
CommDiag1.ShowOpen
Open CommDiag1.FileName For Binary As #1
Get #1, , T
Close #1
Text1.Text = text1.text & T
End Sub
程序可以运行，但是text1文本框里没有任何东西 ，请问各位高手怎么样将文件打开并将其送给text
文本框呢？？

Answer 1

T需要初始化,如:Open CommDiag1.FileName For Binary As #1
T=SPACE(LOF(1)
Get #1, , T
Close #1
Text1.Text = text1.text & T
End Sub

Answer 2

少个括号:T需要初始化,如:Open CommDiag1.FileName For Binary As #1
T=SPACE(LOF(1))
Get #1, , T
Close #1
Text1.Text = text1.text & T
End Sub