C# と VB.NET の質問掲示板

ByValの動作についてですが、例えば

Public Function Func(ByVal obj As SomeObject) As Int32
    ' 本体
End Function

のようにした場合、参照の値渡しが行われるのでしょうか？
それとも、中身がコピーされたものが渡されるのでしょうか？

よろしくお願いします。

■No12635 (hammer さん) に返信
> ■No12634 (Azulean さん) に返信
> >>何かいい方法があるのなら教えてもらえないでしょうか？
>>メソッド（関数）の中でその引数を書き換えて、呼び出し元でも同様に変化しているかを確認すれば良いのでは？
>>クラスと構造体で動きの違いを見れば良いと思います。
> 
> なるほど、試してみます。
> ありがとうございます。

やってみたところ、参照の値渡しのようです。
回答してくださったお二方、ありがとうございました。

<TestFixture()> _
Public Class KlassTest
    Class Klass
        Dim a As Int32

        Sub New()
            a = 100
        End Sub

        Shared Sub S(ByVal k As Klass)
            s.a = 200
        End Sub

        Function F() As Int32
            Return a
        End Function
    End Class

    <Test()> _
    Public Sub Test()
        Dim k As Klass = new Klass
        Klass.S(k)
        Assert.AreEqual(200, k.F())
    End Sub
End Class