Mitsubishi Electric MELSEC System Q Bedienungsanleitung Seite 461

An hang
Pro gramm (Form1.vb)
Option Strict Off
Option Explicit ON
Imports Sys tem
Imports Sys tem.Text
Imports Sys tem.Net
Friend Class Form1
Inher its Sys tem. Win dows. Forms. Form
#Region „Win dows Form Designer gen er ated code"
Pub lic Sub New()
MyBase.New()
If m_vb6FormDefInstance Is Noth ing Then
End If
' This call is required by the Win dows form designer.
InitializeComponent()
End Sub
(Fort set zung auf der nächs ten Seite)
MELSEC System Q Ethernet-Module
If m_InitializingDefInstance Then
m_vb6FormDefInstance = Me
Else
Try
'For the start-up form, the first instance cre ated is the default instance.
If Sys tem. Reflec tion. Assem bly. GetExecutingAssembly. EntryPoint
.DeclaringType Is Me.GetType Then
m_vb6FormDefInstance = Me
EndIf
Catch
End Try
End If
Programmbeispiel für ein verbundenes Gerät
A - 71