求教文本的读写问题

李寻欢

为何非法操作我也搞不清楚，我用的是win98+officeXP，文件格式是2000，读取只有短短几句，自已找原因吧：
    Dim EachLine As String   '定义变量准备存放读取的信息
    Open CurrentProject.Path & "\" & "lhl.txt" For Input As #1 '打开文件
    Line Input #1, EachLine  '读取一行数据到变量
    Me.txtRead = EachLine  '把变量赋值给文本框
    Close #1   '关闭1号文件（上面指定了是1号）
至于改变读取的内容，那不是很容易吗？内容已在变量里，你想怎改就怎改，改完再写回文件里，这不难吧？比如我已读出“李寻欢”到变量EachLine里，然后：
    EachLine=Right(EachLine,2) & "不敢"
这就改变了变量，再把这变量写回文件就行了。

eio

一言惊醒，但对超出文本单位的，如FF（16进制）码，应怎样读和写？－－要求越来越多。

jiangyi

原来你们是同事呀，怪不得

李寻欢

不能显示为文本的就用二进制读写嘛
在officefans的源码下载里有二进制文件读写的示例源代码

eio

officefans是什么？你的论坛打不开

jiangyi

www.officefans.net

他的联接要更新了

eio

好像是文件的复制，不是读写到文件里面啊！

李寻欢

jiangyi在Accxp给你提供的语法已足够了。