VB.NET ingresa dos números positivos desde el teclado y encuentra el máximo común denominador ~ ¿Qué debo hacer? ¡Es mejor dar una explicación en chino!
La depuración del programa pasó, se adjuntan capturas de pantalla. El código es el siguiente, bienvenido a comunicarse.
El método utilizado es la división rodante.
'------------------------------------------
¿Público?Clase?Form1
Privado?Sub?prueba()
Dim?a?As?Integer
Dim?b ?Como?Integer
Pruebe
a?=?CInt(TextBox1.Text)
b?=?CInt(TextBox2.Text)
¿Capturar? ex?Como excepción
MsgBox(ex.Message)
¿Salir?Sub
¿Fin?Intentar
Atenuar ?r?As?Integer?=?findTheNumber(a,?b)
TextBox3.Text?=?r.ToString
End?Sub
¿Privado?Integer)? ¿Como?Entero p>
Si?a?
Dim?temp?As?Integer?=?a
a?=?b
b?=?temp
End?If
'Ejecutar división
Dim?temp_a?As?Integer
¿Mientras?b ?<>?0
temp_a?=?a?Mod?b
a?=?b
b?=?temp_a
¿Fin?Mientras
Regresar?a
Fin?Función
Privado?Sub?Botón1_Click( ByVal?Remitente?Como?Sistema .Objeto, ByVal?e?As?System.EventArgs)?Handles?Button1.Click
test()
Fin?