2 ''' Demonstrates various uses of GListServers() and GSetServer().
4 ''' <remarks>This example requires no command line arguments.</remarks>
5 Module Remote_Client_Example
8 ''' Main function for the Remote Client example.
10 ''' <returns>The success status Or error code of the function.</returns>
11 ''' <remarks>This example requires no command line arguments.</remarks>
12 Function Main() As Integer
13 Dim rc As Integer = Examples.GALIL_EXAMPLE_OK
15 rc = Examples.Remote_Client()
17 Console.WriteLine(ex.Message)
18 rc = Examples.GALIL_EXAMPLE_ERROR
21 Console.Write(vbCrLf + "Press any key to close the example.")