|
分類:[VB.NET/VB2005 以降]
（開発環境）
・VB2010
・OS：Windows7
USP通信用のアプリを作成し、EXEファイルで2つ以上起動させたいのですが、
2つ目を起動できません。
ポートが同じだとできないのでしょうか？
以下、概要のプログラムです。
Public Class Form1
' ソケット生成
Private objSck As New System.Net.Sockets.UdpClient(60000)
Private Sub Form1_Load( _
ByVal sender As System.Object, ByVal e As System.EventArgs) _
Handles MyBase.Load
' ソケット接続
objSck.Connect("192.168.1.100", 60000)
End Sub
Private Sub Form1_FormClosed( _
ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) _
Handles MyBase.FormClosed
' ソケットクローズ
objSck.Close()
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
' ソケット送信
Dim dat As Byte() = _
System.Text.Encoding.GetEncoding("SHIFT-JIS").GetBytes("abc123")
objSck.Send(dat, dat.GetLength(0))
End Sub
End Class
|