Para realizar la suma de impares, lo primero a considerar es crear los formularios correspondientes, ello implica la creación de botones y el cuadro de inserción, en la publicación dejaremos la imagen correspondiente, acto seguido nos dirigimos al configurar el botón,
Imagen de referencia para la creación de formularios.
Inserción de código:
Private Sub CommandButton1_Click()
Dim num As Integer
num = Val(TextBox1)
For i = 1 To num
If (i Mod 2 <> 0) Then
respuesta = respuesta + i
End If
Next
TextBox2 = respuesta
End Sub
Nota: aun no se ha insertado el codigo
No hay comentarios.:
Publicar un comentario