1. VB怎么把二进制数转化为文本
这个要看你的二进制数是以什么格式存储的,最简单的就是ASCII码,以字节为单位,主要是英文字符和阿拉伯数字。如果你只有2进制这样的00110000原始数据,那就麻烦些,需要把2进制转换为10进制,然后用chr(ASCII码)函数就可以转换成字符。如果你的二进制数据里有汉字,那就需要知道数据的编码格式,如GB2312,是以2个字节表示一个汉字,具体算法可以自己查下。
上述的前提是2进制数据是明文的,即没有被加密的,如果加密了,需要解密为明文才可以再转换。
2. VB里如何提取文本文件指定数字
这个比较简单。以=号为标志进行分割,取后面的数字即可。下面提供一段示例:
新建一个窗体,添加一个文本框控件Text1,将Text1的MultiLine属性设置为True。然后将以下代码粘贴到代码区即可。但文件目录要更换成你的文本文件所在的目录和文件名。
Option Explicit
'请将Text1的MultiLine属性设置为True
Private Sub Form_Load()
Dim TLine As String
Dim I As Long
Text1.Text = ""
Open "d:/文本文档.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, TLine '读一行文本文件里的数据
I = InStr(1, TLine, "=") '找=号位置
TLine = Trim(Mid(TLine, I + 1)) '取等号后面的字符,并将前面空格去掉
Text1.Text = Text1.Text & TLine & vbCrLf
Loop
Close #1
End Sub