「パラメータ指定が間違っています」とエラーメッセージが出てコンパイルできません。
修正のほどよろしくお願いいたします。
コード: 全て選択
Class CTest
Private
AStr As String
Public
Sub CTest(Str As String)
AStr = Str
End Sub
Function StrPtr() As VoidPtr
StrPtr = StrPtr(AStr)
End FUnction
End Class
#prompt
Dim A As CTest("hoge")
Print A.StrPtr()