急求:将一个图片转成2进制、8进制、16进制的好方法!我的方法太慢!!!

zhenjia007 2002-10-21 10:40:29
急求:将一个图片转成2进制、8进制、16进制的好方法!我的方法太慢!!!
Open "1.bmp"For Binary As #1
Do While Not EOF(1)
myChar = Input(1, #1)
codeT = Asc(myChar)
code.Text = code.Text& hex(codeT) 转成16进制
Loop
Close #1
这个方法太慢,是不是那里出错了,有什么好方法,请赐教!!!
急求!!!
...全文
53 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
zhenjia007 2002-10-21
  • 打赏
  • 举报
回复
手工up

7,759

社区成员

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

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