二进制文件中特征16进制编码的查找和比较(注意,中间有00的字符)

[crystalmoon]

现有一二进制文件,需要查找十六进制编码为"50 00 52 00 4F 00 4A 00 45 00 43 00 54 00 77 00 6D 00",如果找到了则给出其位置.

在具体编程时 出现458错误"不支持此Automatic类型".
请高手给一个不会出错的代码样片.
谢谢.

[crystalmoon]

自己已经解决了.不过还是想不明白为什么会这样
我写成
Dim A1,A2 As String *18
没会出错,但写成
Dim A1 As String * 18
Dim A2 As String * 18
解答仍然有分....

[ZOU_SEAFARER]

a1 是变体类型,A2是18长度的字符传!!
把你的代码贴出来才知道为什么错?

[viena]

Dim A1,A2 As String *18
VB中不能这样连续定义的

也许可以这样写
Dim A1 As String *18,A2 As String *18

[ZOU_SEAFARER]

Option Explicit
Dim a, m As String * 18 可以这样定义,不过 a 是Variant类型的
Private Sub Command1_Click()
a = "Hello"
m = "Good"
End Sub