' Sample for the Environment.UserInteractive property
Imports System
Class Sample
Public Shared Sub Main()
Console.WriteLine()
Console.WriteLine("UserInteractive: {0}", Environment.UserInteractive)
End Sub 'Main
End Class 'Sample
'
'This example produces the following results:
'
'UserInteractive: True
'