Manual de Visual Basic Intermedio

Autor: Jorge Alvarez
Curso:

4,79/5 (19 opiniones) |12831 alumnos|Fecha publicación: 17/03/2006

Capítulos del curso

Capítulo 10:

Ejercicio 10: Inter Compras Net

Crea un formulario con siete etiquetas, cinco cuadros image, un botón y escribe el siguiente código:

Dim total As Double

Private Sub Form_DragDrop(Source As Control, X As Single, Y As Single)

Source.Move X, Y

End Sub

El botón Cuenta Nueva

Private Sub Command1_Click()

Label7 = ""

total = o

End Sub

Private Sub Image5_DragDrop(Source As Control, X As Single, Y As Single)

If Source = Image1 Then

total = total + 250#

ElseIf Source = Image2 Then

total = total + 375#

ElseIf Source = Image3 Then

total = total + 400#

ElseIf Source = Image4 Then

total = total + 500#

End If

Label7 = "$" & total & ".00"

End Sub

	Cursos	Valoración	Alumnos	Vídeo
Curso Básico de VRML Un curso que te enseña lo mas básico del VRML, con ses cuatro figuras básicas esfera, caja, cilindro y cono... [06/05/05]			986
Photoshop. Hacer cómic con fotografía Photoshop. Hacer cómic con una fotografía, mediante el programa Photoshop, aprenderás a crear [20/10/09]			1.015
Programar con Flash MX Macromedia creo Flash 3, y con el introdujo un, hasta entonces, desconocido concepto en el mundo Flash, la programación. Primitivos play, stop y gotoAndPlay poblaron ento... [16/03/05]			15.625