Programación General > Visual Basic 6.0 e inferiores

 Re: Sumar valor de option Buttons

<< < (2/2)

Jaume:
Hola

Perdona, he ido tan deprisa que me he confundido de objeto.

Debes hacer el if con la propiedad Value

if optionButton1.Value= vbTrue then
label1.caption=val(label1.caption) + Val(OptionButton1.Tag)
end if

Miras si el valor es Verdadero o 1, ahora no me acuerdo. Si es verdadero quiere decir que lo has seleccionado, por lo tanto debes sumar.

Val() retorna el valor numérico al que corresponde un texto. de esta manera ya no te concatenará las cadenas, como te hacía hasta ahora.

Escribe tus dudas aquí en el foro, lo consulto muy amenudo. En el trabajo no puedo instalar aplicaciones, por lo que solo puedes contactar conmigo mediante el foro o los correos que aparecen en mis mensajes.

Esto no es muy complejo, así que tranquilo, entre los dos lo sacaremos

Salu2

Alan_J:
Hola, muchisimas gracias por tu atención y ayuda, ahora, la aplicación q' estoy diseñando es un tipo cotizador de equipo de computo ya q' soy dueño de un negocio de venta de equipo de computo y la aplicación la estoy diseñando para q' cotize equipo de computo según las necesidades del cliente, solo q' yo no se nada de programación ....

Adjunté una imagen de la aplicación para q' mas o menos te des una idea de lo q' trato de hacer y sea mas facil entendernos, el codigo q' me mandaste es justamente lo q' necesito solo q' hay un problema, cuando se marca varias veces el option button va sumando mas veces el tag del option button, y quisiera saber si hay alguna forma de evitar eso, osea q' aunq' le des varias veces al mismo option solo marque la cantidad una vez, ahora, otra cosa ... como podras ver en la imagen adjunta hay 3 opciones en cada Frame y lo q' quiero hacer es q' si se marca la opcion de "Xkalibur Sis 650" aparezca el precio abajo (en donde dice SubTOTAL), y si se marca la q' está a lado q' es "Intel BOXD845EBG2" se borre la cantidad del otro OptionButton (Xkalibur Sis 650) y sea reemplazada por la del segundo (Intel BOXD845EBG2) y así en cada frame, no se si se pueda hacer eso, espero tu respuesta y una vez más muchas gracias por tu ayuda, espero q' no sea una molestia

Jaume:
Hola

Si miras tu mensaje verás que parte de la pantalla no se ve.

En cuanto a tus dudas, creo que lo estamos planteando mal. Creo que la segunda opción que te di en el mensaje anterior es la correcta y mas senzilla.

No intentes calcular los precios a medida que vas seleccionando los componentes, puesto que como puedes comprobar te ocasiona multitud de problemas. Lo mas fácil es hacer el cálculo mediante un botón.

Como? muy senzillo. Créate un CommandButton que se llame "Calcular" (por ejemplo) y en el evento click del mismo pones todos los If que estás pociendo en los OptionButton, de manera que solo pulsando el botón compruebe el estado de todos los Option y vaya realizando la suma. De esta manera no te importa las veces que pulses un mismo botón, ni si cambias de opcion o componente, porque hasta que no pulses el botón de Calcular, no sabrás el precio.

Se me ocurren un par de cosas para mejorar el aplicativo en este apartado, como asignar este cálculo a una tecla (el F5 por ejemplo) o borrar el importe cuando selecciones un OptionButton, para eliminar un cálculo previo ...

Ya me contarás como te va

Salu2

Alan_J:
Muchisimas Gracias Jaume, es justo el código que necesitaba, gracias por tu ayuda

Navegación

[0] Índice de Mensajes

[*] Página Anterior

Ir a la versión completa