打开文本文件是不少程序必须处理的问题。如何更有效地打开文本文件应该是一个值得研究的课题。为此,笔者将自己搜集到的几种方法无私地奉献出来(-_-),供各位参考。同时期盼大家也来参与,借VB编程乐园这块宝地互相交流。如您有这份心,土人在这里先说声谢谢!
下面所举的例子均假设F盘下有一个名为d.txt的文本文件,若需要尝试这些例子请作相应的改动。
方法一:
用定长的String变量获取文本内容。由于定长String变量支持的下界为65400,所以在打开超过32K字节的文件时超出部分的字节将无法获取:
PrivateSubCommand1_Cliack()
DimsAAsString*65400'声明定长String变量
Open"F:d.txt"ForBinaryAs#1'用二进制打开文件
Get#1,,sA'用Get语句从文件中获取字节
Text1=sA'显示打开的文件
Close#1'关闭文件
EndSub
方法二:
先声明一字符串变量,然后用空格填充字符串,使变量大小与文件大小一致,再通过Get语句将文...[ 查看全文 ]