很简单，用left、right、mid几个函数
我们提供的服务有：成都网站建设、做网站、微信公众号开发、网站优化、网站认证、林周ssl等。为千余家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务，是有科学管理、有技术的林周网站制作公司
比如left("123456789",5),就是取前五位，得12345
right("123456789",5)，就是以后五位，得56789
mid也类似，具体可以看帮助。
Dim fs As New System.IO.FileStream("D:\1.txt", IO.FileMode.Open, IO.FileAccess.Read)
Dim buffer(3) As Char
Dim re As New System.IO.BinaryReader(fs)
re.Read(buffer, 0, 4)'表示从0位开始读4位
MsgBox(buffer)
将16进制数存在变量 a 中
b=mid(a,1,2) c = mid (a,3,2)
b就是AA c就是55
如果是固定格式的，
str=34X+45Y=67Z
x=split(str,"X")(0) ‘以X分割，取第0段，即：34
y=split(split(str,'+')(1),'Y')(0) '以+分割，取第1段即：45Y=67Z，再以Y分割，取0段得45
z=split(split(str,'=')(1),'Y')(0) '同上
把字符串分割，查找，截取这些常用字符串处理函数掌握了，
就差不多能随心所欲的处理了...
以上是vb6.0代码,
