In questo pezzo di codice, in base ad alcune medie ed alcuni calcoli assegno un diverso numero di "stelle" ad un tipo di corso.
'Calcolo delle medie per domanda ARROTONDATE a 2 cifre decimali con FormatNumber e conversione in NUMERO double con CDbl (altrimenti media_domanda rimane una stringa non sommabile)
media_domanda1 = CDbl(FormatNumber (somma1/numero_campi,2))
'IF AND ELSE IF
if media_corso >= 0 And media_corso <= 1 Then
stelle_corso = stella1
elseIf media_corso > “1,34” AND media_corso <=2 Then
stelle_corso = stella2
elseIf media_corso > 2 AND media_corso <=”3,5” Then
stelle_corso = stella3
elseIf media_corso > 3 AND media_corso <=4 Then
stelle_corso = stella4
elseIf media_corso > 4 AND media_corso <=5 Then
stelle_corso = stella5
elseIf media_corso > 5 AND media_corso <=6 Then
stelle_corso = stella6
end if
Nessun commento:
Posta un commento