VB 中CopyMemory的用法
Private Sub Form_Load()
Dim A(15) As Byte, B(15) As Byte
B(0) = &HAF
B(1) = &H82
B(2) = &H25
B(3) = &H74
CopyMemory A(0), B(0), 4 '目標，源，大小-字節
Debug.Print Hex(A(0)), Hex(A(1)), Hex(A(2)), Hex(A(3)), Hex(A(4))
End Sub
Private Sub Command1_Click()
Dim B(15) As Byte
B(0) = &HAF
B(1) = &H82
B(2) = &H25
B(3) = &H74
iLength = 0
CopyMemory B(4), iLength, 4
Debug.Print B(0), B(1), B(2), B(3), Hex(B(4)), Hex(B(5)), Hex(B(6)), Hex(B(7))
dwOrdinal = 0
CopyMemory B(8), dwOrdinal, 4
Debug.Print B(0), B(1), B(2), B(3), Hex(B(4)), Hex(B(5)), Hex(B(6)), Hex(B(7)), Hex(B(8)), Hex(B(9)), Hex(B(10)), Hex(B(11))
Dim dwCheckSum As Long
dwCheckSum = 0
CopyMemory B(12), dwCheckSum, 4
End Sub
這樣應該容易理解了吧~妳源內存地址寫的是0 該地址上的第壹個字節就是2 所以以妳上面的代碼來看B數組中的4,8,12元素都是2