Você pode melhorar significativamente o desempenho do seu aplicativo Visual Basic por não ter que verificar cada caractere digitado pelo usuário. Em VB, você pode usar a função " IsNumeric " para determinar se os dados inseridos é numérico. Esta função retorna um valor booleano que indica se uma expressão pode ser avaliada como um número. Você pode usar uma variável String para capturar o texto digitado pelo usuário e usar a função " IsNumeric " para verificar a variável. Instruções
1

Abra o Microsoft Visual Basic Express e clique em " New Project" no painel esquerdo da tela do computador . Clique em " Visual Basic" abaixo " Modelos instalados ", clique em " Windows Forms Application " e clique em "OK" para iniciar um novo projeto.
2

Clique duas vezes no controle " TextBox " na " caixa de ferramentas " painel para adicionar um a sua forma . Adicionar um "Button" usando a mesma técnica
3

Dê um duplo clique no botão para criar um evento de clique de botão e adicione o seguinte código para criar duas variáveis ​​: .

Dim numericCheck as Boolean Dim

inputTxt as String
4

Digite o seguinte código para obter o valor digitado na caixa de texto e verificar se é numérico utilizando a função " IsNumeric " :

inputTxt = Me.TextBox1.Text

numericCheck = IsNumeric ( inputTxt )
5

Adicione o seguinte código utilizando a variável booleana e que o usuário saiba se o valor foi numérico :

Se numericCheck Então

MsgBox (" . Você digitou um valor numérico " )

Else

MsgBox (" Você não digitou um valor numérico. " )

End If
6

Pressione" F5 " para executar o código e clique em" Button1 ".