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
----------------------------------------------------------

No hay comentarios:

Publicar un comentario