用旧方法文件读写

        Dim kaka As String
        FileOpen(1, "f:\test.txt", OpenMode.Input)
        While EOF(1) = False
            Input(1, kaka)
            TextBox1.AppendText(kaka)
            TextBox1.AppendText(Chr(13) + Chr(10))
        End While
        FileClose(1)

没想到沦落到用.net还要用vb6的方法……不过……可以用就好。

函数	说明
CurDir	返回表示当前目录的 String 值。
Dir	返回 String 值，表示与指定模式或文件属性相匹配的文件名、目录名或文件夹名，或者表示驱动器的卷标。
EOF	当为随机输入或顺序输入而打开的文件到达末尾时，返回 Boolean 值 True。
FileClose	将 I/O 写入到使用 FileOpen 函数打开的文件。
FileCopy	复制文件并保留原文件。
FileDateTime	返回 Date 值，表明最近一次修改文件的日期和时间。
FileLen	返回 Long 值，表明文件的长度（字节）。
FileOpen	打开用于输入或输出的文件。
FreeFile	返回 Integer 值，指定 FileOpen 函数可以使用的下一个文件的编号。
GetAttr	返回 FileAttribute 值，表示文件、文件夹或目录的属性。
Input	从打开的顺序文件读取数据并将该数据分配给变量。
InputString	返回 String 值，包含在 Input 或 Binary 模式下打开的文件中的字符。
LineInput	从打开的顺序文件中读取一行并将其分配给 String 变量。
Loc	返回 Long 值，指定在打开的文件中的当前读/写位置。
LOF	返回 Long 值，表示使用 FileOpen 函数打开的文件的大小（字节）。
Print	将显示格式的数据写入顺序文件。
PrintLine	将显示格式的数据写入顺序文件，并以回车符结束。
Seek	返回 Long 值，指定在使用 FileOpen 函数打开的文件中的当前读/写位置；或为使用 FileOpen 函数打开的文件中的下一个读/写操作设置位置。
SetAttr	设置文件的属性信息，如 ReadOnly、Hidden、Directory、Archive 等等。
Write	将数据写入顺序文件。通常使用 Input 函数从文件中读取使用 Write 函数写入的数据。
WriteLine	将数据写入顺序文件，并以回车符结束。