Public Class MainForm
Private Sub btnCalcular_Click(sender As Object, e As EventArgs) Handles [Link]
' Obtener los números ingresados por el usuario
Dim num1 As Integer = [Link]([Link])
Dim num2 As Integer = [Link]([Link])
Dim num3 As Integer = [Link]([Link])
' Encontrar el mayor número usando la función Max
Dim mayor As Integer = [Link](num1, [Link](num2, num3))
' Mostrar el resultado en un mensaje
[Link]("El mayor número es: " & mayor, "Resultado")
' Limpiar los campos de entrada
[Link]()
[Link]()
[Link]()
End Sub
End Class
¡Claro! Aquí tienes un ejemplo de código en Visual Basic que acepta tres números enteros a través
de un formulario y luego imprime el mayor de ellos:
```vb
Public Class MainForm
Private Sub btnCalcular_Click(sender As Object, e As EventArgs) Handles [Link]
‘ Obtener los números ingresados por el usuario
Dim num1 As Integer = [Link]([Link])
Dim num2 As Integer = [Link]([Link])
Dim num3 As Integer = [Link]([Link])
‘ Encontrar el mayor número usando la función Max
Dim mayor As Integer = [Link](num1, [Link](num2, num3))
‘ Mostrar el resultado en un mensaje
[Link](“El mayor número es: “ & mayor, “Resultado”)
‘ Limpiar los campos de entrada
[Link]()
[Link]()
[Link]()
End Sub
End Class
```
En este ejemplo, se asume que tienes un formulario llamado `MainForm` con tres cuadros de texto
(`txtNum1`, `txtNum2` y `txtNum3`) y un botón (`btnCalcular`). Cuando el usuario hace clic en el
botón “Calcular”, se ejecuta el evento `btnCalcular_Click`.
Dentro del evento, se obtienen los números ingresados por el usuario desde los cuadros de texto y
se almacenan en las variables `num1`, `num2` y `num3`. Luego, se utiliza la función `[Link]()`
para encontrar el número máximo entre los tres y se guarda en la variable `mayor`. Finalmente, se
muestra el resultado en un cuadro de mensaje utilizando `[Link]()`.
Recuerda que debes agregar este código a tu proyecto de Visual Basic y vincular el evento
`btnCalcular_Click` al botón “Calcular” en el formulario.
Espero que esto te sea útil. ¡Si tienes alguna otra pregunta, estaré encantado de ayudarte!
