Запретить ввод строки в виде целого числа в VB

Question

Итак, я действительно не знаю, как это сделать, но как я могу предотвратить сбой, когда он запрашивает целочисленное значение, и пользователь дает ему строку?

Вот пример кода;

private sub userInput() 
    dim userInputNum As Integer 
    userInputNum = InputBox("Enter a number.") 
end sub 

И если пользователь вводит текст, он просто падает. Поэтому мне было интересно, есть ли у кого-нибудь решение?

Спасибо, я был бы очень признателен.

Answer 1

Применение Integer.TryParse

Dim userInputNum As Integer 

Dim noInput = Console.ReadLine 

If Integer.TryParse(noInput, userInputNum) Then 
    Console.WriteLine("Integer accepted") 
Else 
    Console.WriteLine("Please don't enter non integer values") 
End If