This Select Case statement isn't returing the desired results.  I'm trying
for, in case 1, when the expression evaluates to True, return "Direct Ops
Expense".  What am I doing wrong?

Function RowDesig2(AcctLvl1 As String, FuncGroup As String, Prod As String)

Select Case RowDesig2
   Case [AcctLvl1] <> "Revenue" And [FuncGroup] = "Operations" And [Prod]
<> "999"
       RowDesig2 = "DIRECT OPS EXPENSE"
   Case [AcctLvl1] <> "Revenue" And [FuncGroup] = "Products" And [Prod] =
"999"
       RowDesig2 = "INDIRECT OPS EXPENSE"
   Case [AcctLvl1] <> "Revenue" And [FuncGroup] <> "Operations" And
[FuncGroup] <> "Products"
       RowDesig2 = "OTHER SGA - SHARED SERVICES"
   Case Else
       RowDesig2 = "SOME OTHER DESIGNATION"
   End Select
   
End Function