Programación General > Visual Basic 6.0 e inferiores
Cancelar=inputbox
Soultaker:
--- Cita de: "Tania_D" ---
--- Código: Text ---variable = InputBox("Introduzca texto", "Titulo")'en el caso de que se presione cancelar entonces variable es igual a ""If variable = "" Then'mandas hacer lo que quieres tu que hagaEnd If
--- Fin de la cita ---
Pero al hacer eso en el caso que el InputBox este vacio y se hace clic en Aceptar va hacer lo mismo que al presionar Cancelar.
Pdta: En lugar de comparar la variable con las "", tambien la puedes comparar con el Empty
:comp:
Toph:
--- Cita de: "Soultaker" ---
--- Cita de: "Tania_D" ---
--- Código: Text ---variable = InputBox("Introduzca texto", "Titulo")'en el caso de que se presione cancelar entonces variable es igual a ""If variable = "" Then'mandas hacer lo que quieres tu que hagaEnd If
--- Fin de la cita ---
Pero al hacer eso en el caso que el InputBox este vacio y se hace clic en Aceptar va hacer lo mismo que al presionar Cancelar.
Pdta: En lugar de comparar la variable con las "", tambien la puedes comparar con el Empty
--- Fin de la cita ---
Si tienes razon Soultaker pero compararla con EMPTY da los mismos resultados que compararla con "" ya lo probe.
ArKaNtOs:
--- Citar ---Pdta: En lugar de comparar la variable con las "", tambien la puedes comparar con el Empty
--- Fin de la cita ---
Qe no es exactamente lo mismo :P jejejeje ademas un dato vacio que te indica que no quizo contestar o que posiblemente cancelo :P
[Modificado]
Pd Perdon ya lo habia contestado Tania_D :P
Soultaker:
--- Cita de: "ArKaNtOs" ---
--- Citar ---Pdta: En lugar de comparar la variable con las "", tambien la puedes comparar con el Empty
--- Fin de la cita ---
Qe no es exactamente lo mismo :P jejejeje ademas un dato vacio que te indica que no quizo contestar o que posiblemente cancelo :P
[Modificado]
Pd Perdon ya lo habia contestado Tania_D :P
--- Fin de la cita ---
Si ya lose, tienes razon por eso digo tambien la puedes comprar con Empty y no digo la solucion es compararla con Empty, creo que nunca esta demas saber que hay distintas formas de hacer una comparacion.
Bueno quizas por ahora te pueda servir esta solucion.
--- Código: Text --- If (InputBox("mensaje", titulo, " ")) Then MsgBox "cancelar"Else MsgBox "aceptar"End If
Leer bien digo por ahora, se que esta no es la solucion indicada pero algo es algo mientras no se pueda hallar otra solucion.
:comp:
Navegación
[*] Página Anterior
Ir a la versión completa