MoveMemoryの使い方 (ID:102497)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 花ちゃん様、ありがとうございます。 うまくいきました。 僕の最初の書き方のようにしようとすると一度byte型で受ける必要があると考えましたがあってますでしょうか？ Private Declare Sub MoveMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long) Private Sub test3() Dim a As String, b As String Dim c() As Byte, d() As Byte a = "あああaaa" ReDim c(0 To LenB(a) - 1) ReDim d(0 To LenB(a) - 1) c() = a MoveMemory d(0), c(0), UBound(c) + 1 MsgBox d End Sub