vb新手求助:采用vb以十六进制的形式读取文本文档数据

一个文本文档以十六进制的形式存有数据,正常情况下打开是乱码的,想用vb读取文本中的数据,并显示出来。本人不是很懂vb,由于毕设中遇到。很是着急,各位懂vb的朋友请帮帮忙吧... 一个文本文档以十六进制的形式存有数据,正常情况下打开是乱码的,想用vb读取文本中的数据,并显示出来。
本人不是很懂vb,由于毕设中遇到。很是着急,各位懂vb的朋友请帮帮忙吧。。。
感谢万分。。
展开
 我来答
网海1书生
科技发烧友

2010-03-05 · 擅长软件设计、WEB应用开发、小程序
网海1书生
采纳数:12311 获赞数:26228

向TA提问 私信TA
展开全部
窗体上放入一个多行文本框(带纵向滚动条),一个命令按钮:

Private Sub Command1_Click()
Dim ss() As Byte, i As Long
Open "e:\tmp\123.txt" For Binary As #1
ss = InputB(LOF(1), #1)
Close #1
For i = 0 To UBound(ss)
If i > 0 And (i Mod 16) = 0 Then Text1.SelText = vbCrLf
Text1.SelText = Right("0" & Hex(ss(i)), 2) & " "
Next
End Sub
zdingyun
2010-03-05 · 知道合伙人软件行家
zdingyun
知道合伙人软件行家
采纳数:15429 获赞数:48177
1982年上海业余工业大学化工系毕业 现退休

向TA提问 私信TA
展开全部
用2进制方式读取文件,并将读到的字节(BYTE)数据转换为16进制字符形式显示于文本框.
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式