Public oForm1 As Form1
 
Sub main(ByVal args As String())
   For i1 = 0 To args.Length - 1
      If Regex.IsMatch(args(i1), "^/admin", RegexOptions.IgnoreCase) Then
         bIsAdmin = True
         oForm1 = New Form1()
         oForm1.Show()
      End If
   Next i1
End Sub