Использование функции «IsNumeric» в vb.net

Question

У меня вопрос об использовании функции IsNumeric() в VB.NET.
Мне нужно сделать программу, которая говорит, если значение в текстовом поле является числовым или нет.

Когда я оставляю TextBox, он должен отображать в Label, «ваш ввод не является числовым».
При вводе TextBox текст должен быть удален из TextBox.

Я не знаю, как начать с этого:/
Где я могу поместить код, если я использую приложение Windows Forms и имею только кнопку закрытия?

Я пробовал обо всем, что знаю.

Answer 1

Вы хотите установить код в поле « Оставьте « Проверка »вашего текстового поля.

В Visual Studio выберите свое текстовое поле, перейдите к его свойствам, в событиях (молнии), перейдите к « Оставьте Проверка», дважды щелкните его. Это свяжет событие и создаст функцию заглушки. Вы хотите использовать «IsNumeric» оттуда. не

Answer 2

у вас есть три варианта

в зависимости от ваших потребностей, я думаю, проверка будет один из лучших одной

Private Sub TextBox1_Leave(sender As Object, e As EventArgs) Handles TextBox1.Leave 
    If Not String.IsNullOrWhiteSpace(TextBox1.Text) AndAlso Not IsNumeric(TextBox1.Text) Then 
     TextBox1.Text = "" 
     MessageBox.Show("Invalid text") 
    End If 
End Sub 

Private Sub TextBox1_LostFocus(sender As Object, e As EventArgs) Handles TextBox1.LostFocus 
    If Not String.IsNullOrWhiteSpace(TextBox1.Text) AndAlso Not IsNumeric(TextBox1.Text) Then 
     TextBox1.Text = "" 
     MessageBox.Show("Invalid text") 
    End If 
End Sub 

Private Sub TextBox1_Validating(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles TextBox1.Validating 
    If Not String.IsNullOrWhiteSpace(TextBox1.Text) AndAlso Not IsNumeric(TextBox1.Text) Then 
     TextBox1.Text = "" 
     MessageBox.Show("Invalid text") 
    End If 
End Sub