VBA verketten von Variablen bei If-Prüfung

Sub testmsgboxmain()
Dim con As String
Dim tra As Integer
Dim contra As String
con = "hallo"
tra = 9999
contra = con & "_" & tra
If hallo_9999 = (con & "_" & tra) Then
MsgBox (con & "_" & tra)
End If
End Sub