fork download
copy 
  1. Option Explicit On
  2. Option Strict On
  3. Option Compare Binary
  4. Option Infer Off
  5.  
  6. Imports System
  7. Imports System.Net
  8. Imports System.Net.Sockets
  9.  
  10.  
  11. Public Class Q7527636
  12.  
  13.         Public Shared Sub Main()
  14.                 Try
  15. 			REM READ THE FUCKING MANUAL
  16. 			REM http://msdn.microsoft.com/en-us/library/system.net.sockets.tcpclient.aspx
  17. 			REM http://msdn.microsoft.com/en-us/library/3bsb3c8f.aspx
  18. 			REM http://msdn.microsoft.com/en-us/library/system.net.ipendpoint.aspx
  19. 			REM http://msdn.microsoft.com/en-us/library/k17zbw22.aspx
  20. 			REM http://msdn.microsoft.com/en-us/library/system.net.ipaddress.aspx
  21. 			REM http://msdn.microsoft.com/en-us/library/system.net.ipaddress.parse.aspx
  22.  
  23.                         Dim client As System.Net.Sockets.TcpClient = New System.Net.Sockets.TcpClient(new IPEndPoint(IPAddress.Parse("192.168.3.2"),50000))
  24.                         client.Connect("www.google.com",80)
  25.  
  26. 			REM 2012-06-12
  27. 			REM エラーメッセージ見たい/ブレークポイント仕掛けたいだけだったから説明の都合上いい加減にここに置いちゃったけど、
  28. 			REM 本来CloseはFinally句にあるべきコードなんだよなー本題には支障ないけど。
  29.                         client.Close()
  30.                 Catch e As SocketException
  31.                         System.Console.WriteLine(e.ToString())
  32.                 End Try
  33.                 System.Console.WriteLine("fin")
  34.         End Sub
  35. End Class
Not running #stdin #stdout 0s 0KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
https://ideone.com/Ngrxh
language:
VB.NET (mono-3.10)
created:
13 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!