这样可以打开大文件，速度快！
Dim FNum As Integer Dim TextByte() As Byte '存放文件读出来的字节 FNum = FreeFile Open "c:\aaa.txt " For Binary As #FNum ReDim TextByte(LOF(FNum)) Get #FNum, , TextByte Close #FNum text1.text=StrConv(TextByte, vbUnicode) '关键的一步
上一篇：VB API教程
下一篇：一篇关于借钱的文章！很现实！
您的昵称：*
QQ登录(无需注册直接登录可进行回复)
您的邮箱：(填写邮箱，如有回复可进行邮件通知)
验证码：
随机推荐