1801
C, C++, C#, Java, Visual Basic, HTML, PHP, CSS, Javascript, Ajax, Joomla, MySql y más / form show, hide y focus en Visual Basic
« en: 15 de Abril 2012, 20:19 »
La consulta recibida es la siguiente:
Mensaje: Hola estoy estudiando programacion en visual basic 5, me cuesta porque no tuvimos una buena base los años anteriores por diferentes causas de los profesores.
Tengo un ejercicio con cuatros pantallas, los dos primeros me dan bien estos se tratan de colocar el apellido, nombre y dni en la primera pantalla con la venta de cada mes del primer semestre de un vendedor con un boton comamd buton "siguiente" con este debe pasar los tres primeros datos deben aparecer en la segunda pantalla con laventa de cada mes del vendedor cuyos resultados deben aparecer en el formulario3 en donde debemos colocar una comision. Damos en siguiente para pasar al formulario 4 en donde nos debe aparecer el Apellido, Nombre y el resultado de la operacion en el formulario3, puse los siguientes codigos:
Private Sub cmdCancelar_Click()
txt3.Text = " "
CancelUpdate
End Sub
Private Sub cmdSiguiente_Click()
Dim Porcentaje As Double
Porcentaje = Text3.Text
Comisionanual = (RPS + RSS) * Porcentaje / 100
Comisionanual.Show
End Sub
Private Sub Form_Load()
Text1.Text = RPS
Text2.Text = RSS
End Sub
pero me da un error en Comisionanual = (RPS + RSS) * Porcentaje / 100 lo que no me permite pasar al formulario4
ah en el formulario4 puse lo siguiente:
Private Sub Form_Load()
Text1.Text = Apellido
Text2.Text = Nombre
Text3.Text = Comisionanual
End Sub
Por favor ayudenme a comprender mejor leo todos lo que tienen y me ayudan a comprender un poco mejor desde ya muchisimas gracias
Respuesta: Hola, las cuestiones a comprobar son varias:
- La primera, ¿qué es RPS Y RSS? Suponemos que son variables numéricas y que tienen como ámbito el adecuado, pero habría que comprobarlo.
- La segunda cosa que llama la atención es la línea Porcentaje = Text3.Text
El tipo que devuelve un control text es tipo texto, mientras que tú necesitas un tipo numérico.
Te recomiendo que te leas esta entrega del curso de Visual Basic: La función Val con Visual Basic para transformar texto en valores numéricos. Ejemplo de uso (CU00318A), que tienes en esta URL: https://www.aprenderaprogramar.com/index.php?option=com_content&view=article&id=203:la-funcion-val-con-visual-basic-para-transformar-texto-en-valores-numericos-ejemplo-de-uso-cu00318a&catid=37:curso-qprogramacion-en-visual-basic-nivel-iq&Itemid=61
Lo que parece más lógico sería poner:
Porcentaje = Val(Text3)
Con esto podrías probar, pero aún así deberías introducir alguna validación o mecanismo de comprobación de que el valor que te introduzca el usuario es válido.
Pruébalo y si das más detalles quizás te podamos orientar algo más. Saludos.
Mensaje: Hola estoy estudiando programacion en visual basic 5, me cuesta porque no tuvimos una buena base los años anteriores por diferentes causas de los profesores.
Tengo un ejercicio con cuatros pantallas, los dos primeros me dan bien estos se tratan de colocar el apellido, nombre y dni en la primera pantalla con la venta de cada mes del primer semestre de un vendedor con un boton comamd buton "siguiente" con este debe pasar los tres primeros datos deben aparecer en la segunda pantalla con laventa de cada mes del vendedor cuyos resultados deben aparecer en el formulario3 en donde debemos colocar una comision. Damos en siguiente para pasar al formulario 4 en donde nos debe aparecer el Apellido, Nombre y el resultado de la operacion en el formulario3, puse los siguientes codigos:
Private Sub cmdCancelar_Click()
txt3.Text = " "
CancelUpdate
End Sub
Private Sub cmdSiguiente_Click()
Dim Porcentaje As Double
Porcentaje = Text3.Text
Comisionanual = (RPS + RSS) * Porcentaje / 100
Comisionanual.Show
End Sub
Private Sub Form_Load()
Text1.Text = RPS
Text2.Text = RSS
End Sub
pero me da un error en Comisionanual = (RPS + RSS) * Porcentaje / 100 lo que no me permite pasar al formulario4
ah en el formulario4 puse lo siguiente:
Private Sub Form_Load()
Text1.Text = Apellido
Text2.Text = Nombre
Text3.Text = Comisionanual
End Sub
Por favor ayudenme a comprender mejor leo todos lo que tienen y me ayudan a comprender un poco mejor desde ya muchisimas gracias
Respuesta: Hola, las cuestiones a comprobar son varias:
- La primera, ¿qué es RPS Y RSS? Suponemos que son variables numéricas y que tienen como ámbito el adecuado, pero habría que comprobarlo.
- La segunda cosa que llama la atención es la línea Porcentaje = Text3.Text
El tipo que devuelve un control text es tipo texto, mientras que tú necesitas un tipo numérico.
Te recomiendo que te leas esta entrega del curso de Visual Basic: La función Val con Visual Basic para transformar texto en valores numéricos. Ejemplo de uso (CU00318A), que tienes en esta URL: https://www.aprenderaprogramar.com/index.php?option=com_content&view=article&id=203:la-funcion-val-con-visual-basic-para-transformar-texto-en-valores-numericos-ejemplo-de-uso-cu00318a&catid=37:curso-qprogramacion-en-visual-basic-nivel-iq&Itemid=61
Lo que parece más lógico sería poner:
Porcentaje = Val(Text3)
Con esto podrías probar, pero aún así deberías introducir alguna validación o mecanismo de comprobación de que el valor que te introduzca el usuario es válido.
Pruébalo y si das más detalles quizás te podamos orientar algo más. Saludos.