Hi, use below code
If (LCase(Environment.UserName) = "sysadmin" Or LCase(Environment.UserName) = CStr("administrator") Or LCase(Environment.UserName) = "backup") Then
MessageBox.Show("You are an administrator")
Else
MessageBox.Show("You are not an authorised user!")
End If