コード: 全て選択
Sub a(b As VoidPtr)
Dim d As String
d = "tttt"
memcpy(b, StrPtr(d), lstrlen(b))
End Sub
Dim c As String
c = "test"
a(c)
MsgBox 0, c, "", MB_OK
End
表示されます。「Ver4.20.00~」でコンパイルするとメッセージは"test"が
表示されます。a(StrPtr(c))とするか引数の型をBytePtrにすれば"tttt"と
表示されます。これはバグですか?