第一次用VB写程序,有很多错,请大家指点
我想实现将一个.INI文件内容读取出来,并将内容写到一个TEXTBOX里,但是运行后TEXTBOX里显示不出来
代码如下:
Private Sub Form_Load()
    Dim filename     As String
    Dim StrArr()     As String
    Dim TmpStr()     As String
    Dim WritStr     As String
    Dim I     As Long
    
    filename = "d:\msitest\cfgchk\v10523\N011.ini"
    StrArr = ReadFile(filename)
End Sub
Private Sub Text1_Change()
    Text1.Text = StrArr
End Sub
Public Function ReadFile(filename As String) As String()
Dim TempFile As Long
Dim LoadBytes() As ByteTempFile = FreeFile
Open filename For Binary As #TempFile
ReDim LoadBytes(1 To LOF(TempFile)) As Byte
Get #TempFile, , LoadBytes
Close TempFile
End Function
请大家帮忙指点下,谢谢!!!新手没有多少分送了,不好意思.