| |||
Respuesta: otraves problemas con condicionales 1º tenes que dar mas informacion sobre tu problema y sobre tu programa. 2º puede ser que al ejecutarlo o al hacer click por primera vez, las variables que hayas asignado no las vuelvas a su estado original. |
| ||||
Respuesta: otraves problemas con condicionales Cita: Private Sub cmdconvertir_Click()If Txt1.Text = "" Then frmd.Visible = True ElseIf IsNumeric(Me.Txt1.Text) Then frmm.Visible = True Else frmn.Visible = True End If (estoy haciendo un conversor y en el boton de convertir quiero que al darle clip aparesca una ventana de acuerdo a lo que el usuario halla puesto en txt1.text ,si no puso nada que se habra una ventana solicitandole que debe coloquar al menos un valor numerico y otra ventana por si le le ocurre coloquar letras y finalmente la que aparece cuando coloqua el numero.(agradesco su ayuda ) |
| ||||
Respuesta: otraves problemas con condicionales Te pongo dos formas...
Código:
La segunda forma con if anidados.If Trim(Text1) = "" then MsgBox "Por favor, ingrese un numero" Exit Sub End If If IsNumeric(Text1) = False Then MsgBox "Solamente estan permitido el ingreso de numeros" Else FormX.show End if
Código:
If Trim(Text1) = "" then MsgBox "Por favor, ingrese un numero" else If IsNumeric(Text1) = False Then MsgBox "Solamente estan permitido el ingreso de numeros" else FormX.Show End If End If |
| ||||
gracias....... me falta solo una cosa es que nose cumplen sino 2 de las tres opciones osea la que deje de ultimo,sea la del pedir numero ola de pedir valor que no sea letra o la del numero... Última edición por David; 18/06/2009 a las 12:52 Razón: Combinar mensajes |