| Fila B | |
|
H.U.P. que permita evaluar una nota. Si ésta es menor a 11 mostrar una imagen. De lo contrario, si es aprobatoria, evaluar si es mayor o igual a 14 y menor e igual a 20. De ser así, contar estos usuarios; de lo contrario si es mayor o igual a 11 y menor o igual a 13 adicionar un punto a la nota.
|
|
| Dim usuario As Integer ______________________________________________ Private Sub cmdaceptar_Click() |
|