ab.com コミュニティ

ご報告ありがとうございます。次回のバージョンアップで修正しますので、今しばらくお待ちください。

Function hogeFunc(ByRef A As Long) As Long
  Print Str$(A)
  hogeFunc = 1
End Function
Dim A As Long
Dim B As *Function(ByRef A As Long) As Long
B = AddressOf(hogeFunc)
B(A)

[code]
Function hogeFunc(ByRef A As Long) As Long
Print Str$(A)
hogeFunc = 1
End Function
Dim A As Long
Dim B As *Function(ByRef A As Long) As Long
B = AddressOf(hogeFunc)
B(A)
[/code]
上記ののように針引数がポインタ参照の関数ポインタを使用するコードをコンパイルしようとすると、
「配列ポインタを引渡すときは、値参照（ByVal）にしてください」
とエラーメッセージが出ます。