The Weird and The Wonderful

SELECT ISNULL(NULL,'') as [Email]

/// Get value that corresponds to menu name or menu id.
/// <param name="name"> Menu name. </param>
/// <param name="id"> Menu id. </param>
/// <returns> enum value. </returns>
public enumType GetValueByInfo(string name, string id)
{
    enumType result = enumDictionary[id];
    return result;
}

If UCase(SomeFunc("" & int_var, bool_var)) = "YES" Then
    F.chkBox.Value = 1
Else 
    F.chkBox.Value = 0
End If

Private Function SomeFunc(Result As Long, Optional cond As Boolean) As String
    If cond = True Then
        Select Case (Result)
            Case Is < 3
                SomeFunc = "No"
            Case Is > 2
                SomeFunc = "Yes"
        End Select
        
    Else
        Select Case (Result)
            Case 1
                SomeFunc = "No"
            Case Is >= 2
                SomeFunc = "Yes"
        End Select
    End If
End Function