ab.com コミュニティ

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()

あるクラスのメソッド内で、そのクラスに属するメソッドと同名の関数を使おうとすると、
「パラメータ指定が間違っています」とエラーメッセージが出てコンパイルできません。
修正のほどよろしくお願いいたします。

[code]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()[/code]