Operaciones basicas
Public Class Form1
Private Sub rdsumar_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdsumar.CheckedChanged
If rdsumar.Checked = True Thentxtresultado.Text = Val(txtn1.Text) + Val(txtn2.Text)
End If
End Sub
Private Sub rdrestar_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles rdrestar.CheckedChanged
If rdrestar.Checked = True Then
txtresultado.Text = (txtn1.Text - txtn2.Text)
End If
End Sub
Private Subrdmultiplicar_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rdmultiplicar.CheckedChanged
If rdmultiplicar.Checked = True Then
txtresultado.Text = (txtn1.Text *txtn2.Text)
End If
End Sub
Private Sub rddividir_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles rddividir.CheckedChanged
Ifrddividir.Checked = True Then
txtresultado.Text = (txtn1.Text / txtn2.Text)
End If
End Sub
Private Sub cmdsalir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles cmdsalir.Click
End
End Sub
Private Sub cmdlimpiar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdlimpiar.Click
txtn1.Clear()txtn2.Clear()
txtresultado.Clear()
End Sub
End Class
l uso de la cuenta de usuario es responsabilidad de la persona a la que está asignada. La cuenta es para usopersonal e intransferible.
La cuenta de usuario se protegerá mediante una contraseña. La contraseña asociada a la cuenta de usuario, deberá seguir los Criterios para la Construcción de ContraseñasSeguras descrito más abajo.
Las cuentas de usuario (usuario y contraseña) son sensibles a mayúsculas y minúsculas, es decir que estas deben ser tecleadas como están.
No compartir la cuenta...
Regístrate para leer el documento completo.