miércoles, 26 de mayo de 2010

SOLUCION DE EXAMEN PARA SEGUNDO A-B



Private Sub CommandButton1_Click()
A = Val(TextBox1)
N = Val(TextBox2)
RAIZ = A ^ (1 / N)
MsgBox (RAIZ)
End Sub

Private Sub CommandButton2_Click()
TextBox1 = " "
TextBox2 = " "
End Sub

Private Sub CommandButton3_Click()
End
End Sub

2 comentarios: