Mitsubishi Electric FX3U-ENET-ADP, Руководство пользователя

Страница: 146 / 162

Appendix C: Program Examples
140
FX
3U
-ENET-ADP User's Manual
Appendix C-2 Program example for communication using MC protocol -2
5) Sample program (Form 1)
Parts in italic are created automatically by Visual Basic .NET, so no input is required.
Only input where written in bold.
Option Explicit On
Option Strict On
Imports System.Net.Sockets
Public Class Form1
Inherits System.Windows.Forms.Form
#Region " Windows Code created by Form Designer "
Public Sub New()
MyBase.New()
' This call is necessary for Windows Form Designer.
InitializeComponent()
' InitializeComponent() Initialization is added after the call.
End Sub
' The Form overwrites dispose to execute post-processing in the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
' Necessary for Windows Form Designer.
Private components As System.ComponentModel.IContainer
'Memo: The following procedure is necessary for Windows Form Designer.
'Change by using Windows Form Designer.
'Do not use code editor to change.
Friend WithEvents Start As System.Windows.Forms.Button
Friend WithEvents lstOutput As System.Windows.Forms.ListBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.Start = New System.Windows.Forms.Button
Me.lstOutput = New System.Windows.Forms.ListBox
Me.SuspendLayout()
'
'Start
'
Me.Start.Location = New System.Drawing.Point(16, 16)
Me.Start.Name = "Start"
Me.Start.Size = New System.Drawing.Size(88, 32)
Me.Start.TabIndex = 0
Me.Start.Text = "Start"
'