如何将字符串倒入数组中？/

Question

Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (hpvDest As Any, ByVal hpvSource As Long, ByVal cbCopy As Long)
先定义一个字节数组： 
    Dim b() As Byte, Str1 As string
    发送时： 
    ReDim B(Len(Str1)) As Byte 
    CopyMemory B(0), Str1, Len(Str1)
为什么总是说类型不匹配 

Answer 1

hpvSource是地址！Long类型的。StrPtr(Strl)而非Strl还有注意： ReDim B(Len(Str1)) As Byte 这句中可能出现问题。
一般Byte数组不需要Redim。Len(Strl)和实际字节数不同。String是使用Unicode。一个字符对应四个字节。（赋到Byte数组中好像一对二个字节）而Len返回字符数，即使是汉字，也只返回一个字符位

Answer 2

我终于明白了——你走歪路了：这样即可Dim K() As Byte
Dim S As String
S="AAA"
K=S就可以了！