min tekst til tal. hvordan?

Jeg er stadig igang med mit budget skema og som sagt er jeg helt ny til vb så svar nu ikke med nogle helt vide koder som jeg ikke forstår alligevel ;o)

Nå men mit problem er at jeg har alle 12 måneder og så en listbox tilsidst hvor den skal regne alle mine udgifter sammen.
Så min kode ser sådan her ud.

total = jan + feb + mar + apr + maj + jun + jul + aug + sep + okt + nov + dec
totallst.AddItem (total)

Og jeg tror heller ikke det er den der er noget galt med.
Problemet er bare a når jeg siger 1+2+3 osv ender jeg op med 123

mine variabler ser sådan her ud

Dim jan As String
Dim feb As String
Dim mar As String
Dim apr As String
Dim maj As String
Dim jun As String
Dim jul As String
Dim aug As String
Dim sep As String
Dim okt As String
Dim nov As String
Dim dec As String
Dim total As String

men jeg er stærkt overbevist om min fejl ligger et eller andet sted i disse linjer.

jan1:
jan = InputBox("skriv udgiften for Januar måned")
If IsNumeric(jan) = False Then
MsgBox "HALLO!!! du kan kun skrive tal her og du skrev " & jan & " prøv igen."
GoTo jan1
Else
If jan = "" Then jan = "0"
januarlst.AddItem (jan)
End If

Dette er en vider udvikling fra et eks i en bog.
Har også lavet eksemplet i bogen.
Forskelen var bare at der virkede det.
Hvor er min fejl?