Zobacz poniższy kod:

Public Class TypeTest
    Public variable1 As String
End Class

Public Class Form1

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim t1 As TypeTest = New TypeTest
        Test(t1)
        MsgBox(t1.variable1)
    End Sub

    Public Sub Test(ByVal t1 As TypeTest)
        t1.Variable1 = "Thursday"
    End Sub

End Class

Okno komunikatu na wydrukach form_load: czwartek, co oznacza, że ​​obiekt (TypeTest) jest przekazywany przez odwołanie. Jaka jest różnica między użyciem ByVal i ByRef dla argumentu t1 w funkcji o nazwie: Test.