【VB技巧】VB Hex 十六进制值保存写入文件

  • A+
所属分类:lcx

    VB Hex 十六进制值保存写入文件,VB Hex 十六进制保存写入文件,VB Hex 十六进制值保存文件,VB Hex 十六进制值写入文件,VB Hex 十六进制写入文件,VB Hex 十六进制保存文件,VB 十六进制保存写入文件,VB 十六进制写入文件,VB 十六进制保存文件,VB Hex保存写入文件,VB 十六进制文件,VB Hex写入文件,VB Hex保存文件,VB 十六进制,VB Hex文件,VB Hex。

VB Hex 十六进制值保存写入文件:

Dim S() As String, B() As Byte, I As Long, L As Long
S = Split("00 76 69 64 65 6F 00 7F 0F C1 04 00 00 00 00 00", " ")
L = UBound(S)
ReDim B(L) As Byte

For I = 0 To L
    B(I) = CByte(Val("&h" & S(I)))
Next

Open "C:A.TXT" For Binary As #1
    Put #1, , B
Close #1

文章来源于lcx.cc:【VB技巧】VB Hex 十六进制值保存写入文件

相关推荐: 【批处理】批处理、Bat 中的环境变量参数详解

批处理、Bat 中的环境变量参数详解: 批处理、Bat 中各种环境变量大全: 用户名:%username% 系统盘:%systemDrive% 电脑名称:%COMPUTERNAM% 文件和设置:%userprofile% Windows目录:%windir% …

发表评论

:?: :razz: :sad: :evil: :!: :smile: :oops: :grin: :eek: :shock: :???: :cool: :lol: :mad: :twisted: :roll: :wink: :idea: :arrow: :neutral: :cry: :mrgreen: