Cómo usar VB.NET para escribir un bucle Do While para generar el factorial del 1 al 10. Soy un novato, agregue una explicación en texto, jaja, ¡gracias a todos!
Primero dibuje dos controles en el formulario: TextBox1 y Button1
TextBox1 se usa para ingresar el factorial del número que necesita calcularse
Haga doble clic Button1 para ingresar el código El código es el siguiente
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Probar
p>
Dim Factorial As Integer = 1 'Define una variable para registrar el resultado factorial
Dim count As Integer 'Define una variable para registrar el factorial del número a calcular
Dim i As Integer = 1 ' Define un número para el bucle
count = Int(Val(Me.TextBox1.Text)) 'Asigna el valor de TextBox1 para contar
Hacer Mientras que i <= contar 'Empezar debajo Calcular factorial
Factorial = Factorial * i 'Calcular factorial
i += 1 'Incrementar en 1
Bucle p>
MessageBox.Show (Int(Val(Me.TextBox1.Text)) & "El factorial es:" & Factorial, "Complete", MessageBoxButtons.OK) 'Aparece los resultados del cálculo
Captura ex como mensaje de error de excepción p>
MessageBox.Show(Err.Description, "Ocurrió un error", MessageBoxButtons.OK, MessageBoxIcon.Error)
Finalizar intento
Fin del subtítulo