Programacion
¿Quieres reaccionar a este mensaje? Regístrate en el foro con unos pocos clics o inicia sesión para continuar.

un ejemplo de form

Ir abajo

un ejemplo de form Empty un ejemplo de form

Mensaje  loren Dom Abr 26, 2009 2:33 am

Private Sub CommandButton1_Click()
Dim x As Double

para elevar un numero


Dim Y As Double
x = Val(TextBox1.Text)
Y = Val(TextBox2.Text)

TextBox3.Text = ELEVAR(x, Y)

End Sub
Function ELEVAR(a As Double, b As Double) As Double
ELEVAR = a ^ b


End Function

loren

Mensajes : 2
Fecha de inscripción : 01/04/2009

Volver arriba Ir abajo

Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.