I'm running the following code:

    If DashBoardUF.SNOptBut.Value = 1 Then Criteria = "Serial Number"
    ElseIf DashBoardUF.POOptBut.Value = 1 Then Criteria = "Prod Order"
    Else: Criteria = "Date Range"
    End If
The part in red is what's highlighted with the error. What am I missing?