当前位置:编程学习 > VB >>

VB 二进制保存问题,求大神

TXTBOX框里面的内容是“大家好”
把这个框里面的内容按二进制保存到文本文件“123.txt”中
代码应该怎么写呢?
我在网上找了两天了,没有发现好的办法啊 VB 二进制 --------------------编程问答--------------------
f=freefile()
open "123.txt" for output as #f
print #f,TXTBOX.Text
close #f
--------------------编程问答-------------------- 推荐使用WinHex软件查看硬盘或文件或内存中的原始字节内容。
--------------------编程问答-------------------- 猜你意思
是不是想把文本转为二进制ASCII代码再明文保存到TXT里?

比如输入A
Ascii(A)= Hex(41)=Bin(1000001)
TXT文本里保存的就是1000001 --------------------编程问答-------------------- “按二进制保存”是什么意思?

所有的数据都是以二进制代码保存和传输的。无非是记事本等软件在打开 .txt 文件时缺省地将数据按 ASCII 编码解释而已,所以我们看到了文字。

你用 UltraEdit 等软件打开它,选择二进制编码显示,就看到它的真面目了。
--------------------编程问答-------------------- Open "123.txt" For Binary As #1
Put #1, , TXTBOX.Text
Close #1 --------------------编程问答-------------------- 我是新人学习喽 --------------------编程问答--------------------

    Dim fd As Integer, _
        byArray() As Byte
    '// 将字符串转换到字节数组中
    byArray = StrConv(text1.Text, vbFromUnicode)
    '// 取得有效的文件号
    fd = FreeFile()
    '// 以二进制方式打开指定文件,文件不存在则创建文件
    Open "yourfile.txt" For Binary As #fd
    '// 输出字节数组的数据到文件当前读写的位置(默认为文件开始处)
    Put #fd, , byArray
    '// 关闭文件
    Close #fd
--------------------编程问答-------------------- 下面这个文章中有一个自定义函数名为SaveTextFile,你可以看一下
http://blog.csdn.net/supermanking/article/details/5989227
补充:VB ,  非技术类
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,