Mam następujący kod.

Przez całe życie nie potrafię tego zrozumieć.

Chcę wywołać inny sub zależnie od wartościi.

Na przykład, jeślii = 1 powinien zadzwonićsale_call1 i jeślii = 2 powinien zadzwonićsale_call2.

Private Sub test_Click()
    Dim i As String
    Dim pro As String

    i = Me.tb1.Value
    pro = "sale_call" + i

    If i = "1" Then
        Call pro
    Else
        Call pro
    End If
End Sub

Sub sale_call1()
    MsgBox "Hello"
End Sub

Sub sale_call2()
    MsgBox "goodbye"
End Sub