Which of the following functions accepts a parameter named dblSales and returns the commission to the calling statement? Assume that the commission should equal the sales multiplied by the commission rate. Use the following table as a guide to the calculation of the commission rate.

Question

a.```

Function Calc(ByVal dblSales As Double, ByRef dblComm As Double)

Dim dblRate As Double

Select Case dblSales

Case Is < 2000

dblRate = .1

Case Is >= 2000

dblRate = .15

End Select

DblComm = dblRate

End Function

```



b.```

Function Calc(ByVal dblSales As Double) As Double

Dim dblRate, dblComm as Double

Select Case dblSales

Case Is < 2000

dblRate = .1

Case Is >= 2000

dblRate = .15

End Select

dblCommission = dblRate * dblSales

End Function

```



c.```

Function Calc(ByVal dblSales As Double) As Double

Dim dblRate As Double

Select Case dblSales

Case Is < 2000

dblRate = .1

Case Is >= 2000

dblRate = .15

End

Answer 1

c.```
Function Calc(ByVal dblSales As Double) As Double
Dim dblRate As Double
Select Case dblSales
Case Is < 2000
dblRate = .1
Case Is >= 2000
dblRate = .15
End Select
Return dblRate * dblSales
End Function
```