Without Option Strict Off, the compiler wouldn't even let you try to stuff three different return values into a boolean value, as Jeff Atwood's colleague likes to do ...

Friend ReadOnly Property CheckUserRole() As Boolean 
  Get
    Dim user As SystemUser = SystemUser.CurrentUser
    If user.AssertRole(RoleTypes.Admin) Then
      Return 0
    Else
      If user.AssertRole(RoleTypes.Training) Then
       Return 1
      Else
        If user.AssertRole(RoleTypes.Supervisor) Then
          Return 2
        End If
      End If
    End If
  End Get
End Property
[Advertisement] BuildMaster allows you to create a self-service release management platform that allows different teams to manage their applications. Explore how!