Foros aprenderaprogramar.com
Aprender a programar => C, C++, C#, Java, Visual Basic, HTML, PHP, CSS, Javascript, Ajax, Joomla, MySql y más => Mensaje iniciado por: Am_S en 07 de Septiembre 2011, 04:52
-
Señores! Estoy haciendo un ejercicio que dice así:
Si el usuario selecciona minilaptops en el picturebox deberá mostrarse la imagen de la minilaptop y el precio unitario en dólares. Lo mismo deberá suceder para cada equipo.
Cuando el usuario haga click en comprar el programa deberá solicitar cantidad y calcular el IVA y el total a pagar.
Ya diseñé los radiobuttos para cada equipo de ventas, son 4.. Minilaptops, tablets, etc en el picturebox ya he colocada la imagen para cada producto, he agregado los siguientes botones. COMPRAR, LIMPIAR y SALIR.
He puesto el códio para el botón LIMPIAR Y SALIR.
Luego sale precio/Unitario en US:
Cantidad:
IVA:
TOTAL:
Subtotal=cantidad x precio
Iva=subtotal x 0.15
Total=subtotal + iva
Lo único que me falta es el botón comprar, para que me muestre los resultados, en precio, cantidad, iva y total..
¿Cómo le hago?
Agradecería de antemano.
-
Hola Am, por lo que te he entendido el código podría ser algo como lo que te pongo aquí más abajo. Lo que he hecho es crear un picturebox dentro del cual tengo un label. El label esta inicialmente oculto y aparece solo cuando se pulsa el botón comprar para mostrar el precio, iva, etc. De todas formas si no coincide con lo que buscabas ponme algún detalle más del código o aspecto que tiene tu aplicación. Saludos,
Visualmente:
(http://photos4.pix.ie/61/AC/61AC4B43EDB14C9E8C0301284D4B25D2-0000338499-0002530494-00500L-765C0B6876114D11B74082B0465BAAEA.jpg)
Nota: ten en cuenta que parte de los atributos los establecemos en la ventana de propiedades.
Private Sub Form_Load()
Label1.Visible = False
Label1.Caption = ""
Form1.Caption = "Aplicación de compra"
End Sub
Private Sub Option1_Click()
Label1.Visible = False
Label1.Caption = ""
' -- Le indicamos al método LoadPicture la ruta del gráfico
With Picture1
.Picture = LoadPicture("C:\ProyectosCursoJava\minilaptop.jpg")
End With
End Sub
Private Sub Option2_Click()
Label1.Visible = False
Label1.Caption = ""
' -- Le indicamos al método LoadPicture la ruta del gráfico
With Picture1
.Picture = LoadPicture("C:\ProyectosCursoJava\tablet.jpg")
End With
End Sub
Private Sub Command1_Click()
Dim precioMinilaptop As Single
Dim precioTablet As Single
Dim iva As Single
precioMinilaptop = 442.55
precioTablet = 242#
'Código que hemos de ejecutar cuando el usuario pulsa comprar
'Si está seleccionado el Option1 se ejecuta la siguiente condición
If Option1.Value = True Then
Label1.Visible = True
Label1.Caption = "El precio del minilaptop es " & precioMinilaptop & " euros"
iva = 0.15 * precioMinilaptop
Label1.Caption = Label1.Caption & vbCrLf & "IVA: " & iva
Label1.Caption = Label1.Caption & vbCrLf & "TOTAL: " & precioMinilaptop + iva
End If
If Option2.Value = True Then
Label1.Visible = True
Label1.Caption = "El precio del tablet es " & precioTablet & " euros"
End If
End Sub
-
Excelente amigo, es así.
NO sé si es mucho pedir, pero podrías agregarle lo que le falta HP All in one y PC de Escritorio como buttons, el orden:
Minilaptops
HP All in One
Tablets
PC de Escritorio
y si me puedes pasar el link comprimido para solo correrlo directamente con el programa.
Y de paso quiero aprender paso a paso como se hizo.
Gracias amigo.
-
Hola Am, te lo explico sin problema aunque poco a poco porque no tengo demasiado tiempo. De todas formas, permíteme hacerte una sugerencia: en aprenderaprogramar.com tenemos un curso de Visual Basic (pincha en la sección cursos y luego en el menú de la derecha en "Programación Visual Basic nivel I". Este curso es paso a paso: si lo sigues aprenderás no solo a resolver un programa, sino a tener fundamentos que te servirán para desarrollar cualquier programa. Es solo una sugerencia: en vez de hacerte con un pescado aprende a pescar, a la larga es más útil.
Empiezo con la explicación: en Visual Basic cuando abres el programa con la opción "exe stándar" tienes dos vistas principales: la vista de formulario y la vista de código. El formulario es un objeto más dentro de los objetos posibles. Si pinchas sobre él y en el menú ver tienes activada la "Ventana propiedades", podrás ver las propiedades del formulario. Si pinchas en Caption y cambias el texto Form1 por Aplicación de compra verás que cambia el título del formulario. Esto también se puede hacer mediante código, pero algunas cosas son más rápidas hacerlas directamente sobre los objetos gráficos y la ventana propiedades. A continuación teniendo activada la opción Ver --> Cuadro de herramientas, debes seleccionar los controles (objetos) que vas a situar sobre el formulario. Pinchas sobre el icono de picture box y luego situado sobre el formulario clickas con el ratón y creas el picturebox en grande. Luego haces lo mismo sobre un label y lo posicionas dentro del picture box en la parte de abajo. Si pinchas sobre el picture box, en la ventana de propiedades puedes ir a la opción Text y borrar el contenido para que no aparezca Text1 por defecto. Finalmente haces lo mismo eligiendo OptionButton, y lo haces varias veces. Luego vas pinchando en cada option button y en propiedades estableces como Caption los valores adecuados: Minilaptops, Tablets, etc. Si has llegado hasta aquí ya tienes el diseño gráfico completado.
Ahora pasa a la vista de código (menú Ver --> Código) y pega el código que te puse en el otro post. En la ruta C:/... debes poner las imágenes con un tamaño adecuado. Finalmente pulsando ejecutar debes de ser capaz de correr una pequeña prueba.
Dime si sigues con problema todo lo expuesto... Más tarde continuo con algo más. Saludos.
-
Me ha sido muy útil la información, muchísimas gracias le echaré un vistazo al curso.
Se te agradece César. :)
-
ooops! Se me quedó atrás que para completar el diseño gráfico había que incluir 3 botones. En modo gráfico (menú Ver --> Objeto) hacer lo mismo: pinchar sobre el botón y luego hacer click sobre el formulario y arrastrar para colocar tres botones. Luego a cada botón se le pone en la ventana de propiedades el título adecuado.
Cada control gráfico (objeto) que hayamos añadido tiene un nombre que podemos ver en la ventana de propiedades. Generalmente p.ej. si son tres botones los nombres por defecto serán Command_1, Command2 y Command3 (estos nombres los podemos cambiar si queremos.
Si hacemos doble click sobre un botón se nos abre la vista de código con el siguiente contenido:
Private Sub Command1_Click()
'Acciones a ejecutar cuando se produzca un evento click sobre el botón
End Sub
Este código lo que dice es "cuando se haga click sobre el botón Command1, deberán ejecutarse las siguientes acciones.
Decimos que esta programación está basada en eventos porque las acciones se ejecutan en respuesta a eventos como clicks, pulsaciones de enter, recepción de información, etc.