ByRef引数を持つ関数のオーバーロードができない

返信する


答えを正確に入力してください。答えられるかどうかでスパムボットか否かを判定します。
BBCode: ON
[img]: ON
[flash]: OFF
[url]: ON
スマイリー: OFF
トピックのレビュー
   

展開ビュー トピックのレビュー: ByRef引数を持つ関数のオーバーロードができない

by k.kiyo » 2006年5月29日(月) 02:03

> 配列でないものに添え字演算子を使うのが気持ち悪いですが，
> このバグが修正されるまではとりあえずこれで我慢してはどうでしょう。
はい、そうします。

by イグトランス » 2006年5月27日(土) 21:40

Test(b[0])とすればコンパイルできオーバーロードも正しく解決されます。
配列でないものに添え字演算子を使うのが気持ち悪いですが，
このバグが修正されるまではとりあえずこれで我慢してはどうでしょう。

個人的には間接参照演算子(C/C++の単項 * )のようなものがあればいいのにと思います。（しかも後置演算子として）

Re: ByRef引数を持つ関数のオーバーロードができない

by 7 » 2006年5月27日(土) 21:34

> 引数にByRefが指定されている関数のオーバーロードができません。
> ポインタ引数の場合は正常にオーバーロードできます。
たぶんですけど、すでにLong型変数へのポインタを引数とする関数が同じ名前で定義されてるからじゃないでしょうか。

コード: 全て選択

Class CTest
Public
	' Long型変数へのポインタ p を引数とする
	Sub Test(ByVal p As *Long)
	End Sub

	' Long型変数へのポインタ p を引数とする
	Sub Test(ByRef p As Long)
	End Sub
End Class
あ。普通の関数でオーバーロード(ライド？)できるようになってたんですね。気付かなかった。

返信＠yu0627

by yu0627 » 2006年5月27日(土) 21:28

　あまりオーバーロードに詳しくありませんが、元々無理だと思います。
なぜなら、同じ名前の関数が３つもあるからです。

コード: 全て選択

Sub Test() 
End Sub 

Sub Test2(p As *Long) 
End Sub 

Sub Test3(ByRef p As Long) 
End Sub 

Dim a As Long, b As *Long 
b = VarPtr(a) 
Test()        'OK 
Test2(b)       'OK 
Test3(ByVal b)
こうだとうまくいくと思いますが...。
ほんと関数のオーバーロードは知らないので、間違っていたらすみません...。

ByRef引数を持つ関数のオーバーロードができない

by k.kiyo » 2006年5月08日(月) 02:57

引数にByRefが指定されている関数のオーバーロードができません。
ポインタ引数の場合は正常にオーバーロードできます。

コード: 全て選択

Sub Test()
End Sub

Sub Test(p As *Long)
End Sub

Sub Test(ByRef p As Long)
End Sub

Dim a As Long, b As *Long
b = VarPtr(a)
Test()        'OK
Test(b)       'OK
Test(ByVal b) '"Test" オーバーロードを解決できません

ページトップ