Visual Basic - Problema básico 2

Life is soft - evento anual de software empresarial
   
Vista:

Problema básico 2

Publicado por ferr.ox96 (5 intervenciones) el 17/01/2010 22:40:13
Hola a todos. Estoy haciendo ahora mismo una aplicación que multiplique un número por 3, ya lo conseguí, ahora lo que necesito saber es como hacer que cuando se ponga algo que no sea un número (por ejemplo, una palabra), salga diciendo "no es un número", en vez de dejar el programa inestable y tener que cerrarlo. Saludos y ahí va el código:

Public Class Form1


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Label1.Text = TextBox1.Text * 3


End Sub
End Class

----------------------------------------
(Esto es algo que he probado, pero no me vale)

Public Class Form1


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If CType(TextBox1.Text, Integer) Then
Label1.Text = TextBox1.Text * 3
Else
Label1.Text = "no es un numero"

End If

End Sub
End Class
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Problema básico 2

Publicado por Javier (1 intervención) el 18/01/2010 00:40:59
Puedes usar la función IsNumeric(), te dejo un ejemplo:

If IsNumeric(TextBox1.Text) Then
MsgBox("Es un número " & TextBox1.Text)
Else
MsgBox("NO es un número " & TextBox1.Text)
End If

Más sobre programación: www.foro.lospillaos.es
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar