怎样将二进制文件转成上面乱七八糟的字符的形式而又不会破坏原来的文件的保存在一个文本文件中(起码可以还原的)

raeck 2001-08-02 11:16:51
怎样将二进制文件转成上面乱七八糟的字符的形式而又不会破坏原来的文件的保存在一个文本文件中(起码可以还原的)
...全文
104 4 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
raeck 2001-08-03
  • 打赏
  • 举报
回复
up
raeck 2001-08-03
  • 打赏
  • 举报
回复
怎么无效的?
littleholly 2001-08-03
  • 打赏
  • 举报
回复
Dim bByte as Byte
Dim nFreeNum as Integer
Dim lFileLength as Long
nFreeNum=FreeFile
Open sFile For Binary As nFreeFile
lFileLength=LOF(nFreeFile)
Dim i As Long
For i=1 To lFileLength
Get #nFreeNum,i,bByte
Text1.Text="Code=" & Str(bByte) & " And Char=" & Chr(bByte)
Next i
Close nFreeFile
'bByte就2进制文件一个字节的内容
Chr(bByte)就是显示的字符,有时候不可见


raeck 2001-08-02
  • 打赏
  • 举报
回复
还有分在http://www.csdn.net/expert/topic/221/221130.shtm中

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧