Code:
Dim intResult As Integer
If Integer.TryParse("LINE TO CHECK", intResult) Then
    'Do Something
End If