Este blog tiene el fin de facilitar el aprendizaje y dar información de informática y tecnología
jueves, 29 de marzo de 2012
11° TALLER CLASE VISUAL BASIC
Realice el siguiente ejercicio en visual basic, al terminar publique en su blog el codigo y la imagen del resultado.
Yo le proporciono el codigo, su tarea consiste en saber como implemetarlo según el gráfico
Codigo:
Private Sub cmddivision_Click()
lbloperacion.Caption = "/"
End Sub
------------------------------------------------------
Private Sub cmdmultiplicacion_Click()
lbloperacion.Caption = "*"
End Sub
-------------------------------------------------------
Private Sub cmdresta_Click()
lbloperacion.Caption = "-"
End Sub
----------------------------------------------------------
Private Sub cmdresultado_Click()
If lbloperacion.Caption = "+" Then
lblresultado.Caption = Val(txtval1.Text) + Val(txtval2.Text)
Else
If lbloperacion.Caption = "-" Then
lblresultado.Caption = Val(txtval1.Text) - Val(txtval2.Text)
Else
If lbloperacion.Caption = "*" Then
lblresultado.Caption = Val(txtval1.Text) * Val(txtval2.Text)
Else
If lbloperacion.Caption = "/" Then
lblresultado.Caption = Val(txtval1.Text) / Val(txtval2.Text)
End If
End If
End If
End If
End Sub
------------------------------------------------------
Private Sub cmdsuma_Click()
lbloperacion.Caption = "+"
End Sub
----------------------------------------------------------
Suscribirse a:
Enviar comentarios (Atom)
No hay comentarios:
Publicar un comentario