VB 二进制保存问题,求大神
TXTBOX框里面的内容是“大家好”把这个框里面的内容按二进制保存到文本文件“123.txt”中
代码应该怎么写呢?
我在网上找了两天了,没有发现好的办法啊 VB 二进制 --------------------编程问答--------------------
f=freefile()--------------------编程问答-------------------- 推荐使用WinHex软件查看硬盘或文件或内存中的原始字节内容。
open "123.txt" for output as #f
print #f,TXTBOX.Text
close #f
--------------------编程问答-------------------- 猜你意思
是不是想把文本转为二进制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 --------------------编程问答-------------------- 我是新人学习喽 --------------------编程问答--------------------
--------------------编程问答-------------------- 下面这个文章中有一个自定义函数名为SaveTextFile,你可以看一下
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
http://blog.csdn.net/supermanking/article/details/5989227
补充:VB , 非技术类