AGPELE92 - Promedio con beca

1.-Promedio con beca.

Realizar una aplicación que permita calcular el promedio de un alumno tomando dos calificaciones. Si el promedio es igual a 10 entonces mostrara el mensaje de que el alumno tiene derecho a beca. Si la calificación es menor de 10 entonces mostrara el mensaje de que el alumno se esfuerce.

Se abre un nuevo formulario (UserForm) en el editor de visual basic de Excel.

Seleccione la propiedad (Name) del primer botón de comando y escriba CommandButton2, y en lapropiedad Caption escriba: Aceptar.

Seleccione el segundo botón de comando, y en la propiedad (Name) escriba CommandButton1, y en la propiedad Caption escriba: Salir.

Seleccione la propiedad (Name) de la primera caja de texto y escriba cal1.

Seleccione la propiedad (Name) de la segunda caja de texto y escriba cal2.

Seleccione la propiedad (Name) de la tercera caja de texto y escriba res.

Haga doble clic en el botón Aceptar.

Aparecerá la ventana del Code Editor (Editor de código) con el cursor parpadeando dentro del procedimiento Click del botón de comando.

Dentro del procedimiento Click escriba las siguientes líneas de código:

res = (Val(cal1) + Val(cal2)) / 2

Select Caseres

Case 10

MsgBox "FELICIDADES, TIENES DERECHO A BECA "

Case Else

MsgBox "Echaleganas"

End Select

El procedimiento codificado quedaría de la siguiente manera:

Private Sub CommandButton2_Click()

res = (Val(cal1) + Val(cal2)) / 2

Select Case res

Case 10

MsgBox "FELICIDADES, TIENES DERECHO A BECA "

Case Else

MsgBox "Echaleganas"

End Select

End Sub

Haga doble clic en el botón Salir.

Dentro del procedimiento Click del botón Salir escriba la siguiente sentencia:

End

El procedimiento codificado quedaría de la siguiente manera:

Private Sub CommandButton1_Click()

End

End Sub

Pulse la tecla [F5] para correr la aplicación. Y podrá tener el formulario en función.