En matemáticas la suma de divisores implica la inserción de un sinfín de formular tanto para como números pares e impares pero por fortuna en Visual Basic y al igual que otros lenguajes de programación esto no es necesario dado que aplicación nociones básicas se puede concluir a un único resultado para hallar la suma de divisores.
Para iniciar con la creación de suma de divisores en Visual Basic Excel lo primero a tener considerar es la creación de los formularios correspondientes:
La imagen de correspondiente.
Acto seguido pasamos con la inserción del siguiente código
Private Sub CommandButton1_Click()
Dim num As Integer
num = Val(TextBox1)
For i = 1 To num
If (num Mod i = 0) Then
respuesta = respuesta + i
End If
Next
TextBox2 = respuesta
End Sub
Nota: El código aun no ha sido insertado
No hay comentarios.:
Publicar un comentario