MoveMemoryの使い方 (ID:102505)

名前

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

本文 学習のためですと↓のもご参考になるかと。 余計でしたらすみません。 Dim a As String, c() As Byte Dim i As Long a = "あああaaaあああaaaa" 'LenB(a)の代わり... MoveMemory i, ByVal StrPtr(a) - 4, 4 MsgBox "文字列のバイト長=" & i ReDim c(1 To i) MoveMemory c(1), ByVal StrPtr(a), i MsgBox c