Помогите пожалуйста с информатикой! 14 задание,язык VBA - вопрос №1712832

Function fPremia(stazh As Integer, volume As Long) As Double

If (stazh < 2) And (volume > 80000) Then
 fPremia = 1.5
ElseIf (stazh >= 2) And (stazh <= 5) And (volume > 100000) Then
 fPremia = 5
ElseIf (stazh > 5) And (volume > 100000) Then
 fPremia = 7
Else
 fPremia = 1
 
End If

MsgBox («Стаж: » & stazh & " объем: " & volume & ": " & fPremia & "%")

End Function

И проверка функции (как вариант):
Sub test()
Dim f As Double
f = fPremia(1, 1)
f = fPremia(1, 90000)
f = fPremia(2, 1)
f = fPremia(2, 90000)
f = fPremia(2, 110000)
f = fPremia(3, 50000)
f = fPremia(3, 150000)
f = fPremia(4, 50000)
f = fPremia(4, 150000)
f = fPremia(6, 50000)
f = fPremia(6, 150000)
f = fPremia(8, 50000)
f = fPremia(8, 150000)
End Sub

«» замените на "