...::Ciclo For::... "Exponente"
Página 1 de 1.
...::Ciclo For::... "Exponente"
Khev_N Miér Abr 22, 2009 2:59 am
Qe Onda! en vista qe, quieren ejemplos faciles les voy a postear ste..........
Dim base As Integer
Dim exponente As Integer
Dim resultado As Long
resultado = 1
exponente = Val(Text2.Text)
base = Val(Text1.Text)
For c = 1 To exponente
resultado = (base * resultado)
Next
Text3.Text = Str(resultado)
End Sub
Dim base As Integer
Dim exponente As Integer
Dim resultado As Long
resultado = 1
exponente = Val(Text2.Text)
base = Val(Text1.Text)
For c = 1 To exponente
resultado = (base * resultado)
Next
Text3.Text = Str(resultado)
End Sub
Khev_N- Mensajes : 38
Fecha de inscripción : 17/03/2009
Temas similares» ciclo o bucle for
» Ejemplo de ciclo For!
» un ejemplo de ciclo for
» Otro ejemplo del Ciclo For.
» Q onda Bacos, Un ejemplo del Ciclo For
» Ejemplo de ciclo For!
» un ejemplo de ciclo for
» Otro ejemplo del Ciclo For.
» Q onda Bacos, Un ejemplo del Ciclo For
Página 1 de 1.
Permisos de este foro:
No puedes responder a temas en este foro.|
|
|