Foros del Web » Programación para mayores de 30 ;) » .NET »

Usar Ciclo For en Codigo de Do

Estas en el tema de Usar Ciclo For en Codigo de Do en el foro de .NET en Foros del Web. Hola tengo un programa para sacar el maximo comun divisor en visual.net y estoy usando un ciclo DO lo que pasa esque me pidieron que ...
  #1 (permalink)  
Antiguo 29/05/2012, 12:37
 
Fecha de Ingreso: mayo-2012
Mensajes: 2
Antigüedad: 9 años, 6 meses
Puntos: 0
Usar Ciclo For en Codigo de Do

Hola tengo un programa para sacar el maximo comun divisor en visual.net y estoy usando un ciclo DO lo que pasa esque me pidieron que usara un ciclo for para esta aplicacion y no se como me podrian ayudar? aqui les dejo lo que hice como ciclo DO

Código:
ublic Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim a As Double
        Dim b As Double
        Dim c As Double
        Dim resto As Double

        a = Val(TextBox1.Text)
        b = Val(TextBox2.Text)

        If b > a Then
            c = a
            a = b
            b = c
        End If
        If a = 0 Or b = 0 Then MsgBox("Debes introducir dos enteros positivos")


        If (a Mod b) <> 0 Then

            Do While a >= b And b <> 0
                resto = (a Mod b)
                a = b
                b = resto
            Loop

            Label1.Text = "El máximo común divisor es " & a

        Else : Label1.Text = "El máximo común divisor es " & b

        End If

    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        Me.Close()

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        TextBox1.Text = ""
        TextBox2.Text = ""
        Label1.Text = ""


    End Sub
End Class

Etiquetas: textbox, usar, visual, aplicaciones, ciclos
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 16:56.