Imports System
Imports System.Drawing
Imports System.Collections
Imports System.ComponentModel
Imports System.Windows.Forms

Namespace JapiTest

    '/// <summary>
    '/// FormReceiveEvent ̊Tv̐łB
    '/// CxgMƂɌʂ\_CAOłB
    '/// </summary>
    Public Class FormReceiveEvent
        Inherits System.Windows.Forms.Form

#Region " Windows tH[ fUCiŐꂽR[h "


        Private m_RecvEventID As String
        Private m_ServerName As String
        Private m_MachineName As String
        Private m_UserName As String
        Private m_Message As String
        Private m_ReceivedEventID As String

        Property ThisProperty1() As String
            Get
                ThisProperty1 = m_RecvEventID
            End Get
            Set(ByVal Value As String)
                m_RecvEventID = Value
            End Set
        End Property

        Property ThisProperty2() As String
            Get
                ThisProperty2 = m_ServerName
            End Get
            Set(ByVal Value As String)
                m_ServerName = Value
            End Set
        End Property

        Property ThisProperty3() As String
            Get
                ThisProperty3 = m_MachineName
            End Get
            Set(ByVal Value As String)
                m_MachineName = Value
            End Set
        End Property

        Property ThisProperty4() As String
            Get
                ThisProperty4 = m_UserName
            End Get
            Set(ByVal Value As String)
                m_UserName = Value
            End Set
        End Property

        Property ThisProperty5() As String
            Get
                ThisProperty5 = m_Message
            End Get
            Set(ByVal Value As String)
                m_Message = Value
            End Set
        End Property

        Property ThisProperty6() As String
            Get
                ThisProperty6 = m_ReceivedEventID
            End Get
            Set(ByVal Value As String)
                m_ReceivedEventID = Value
            End Set
        End Property

        Public Sub New( _
            ByVal RecvEventID As String, _
            ByVal ServerName As String, _
            ByVal MachineName As String, _
            ByVal UserName As String, _
            ByVal Message As String, _
            ByVal ReceivedEventID As String)
            MyBase.New()

            ' ̌Ăяo Windows tH[ fUCiŕKvłB
            InitializeComponent()

            ' InitializeComponent() Ăяǒɏǉ܂B
            tbResultRecvEventID.Text = RecvEventID.ToString
            tbResultRecvEventServerName.Text = ServerName.ToString
            tbResultRecvEventMachineName.Text = MachineName.ToString
            tbResultRecvEventUserName.Text = UserName.ToString
            tbResultRecvEventMessage.Text = Message.ToString
            tbResultRecvEventRecvedEventID.Text = ReceivedEventID.ToString

        End Sub

        ' Form  dispose I[o[ChăR|[lgꗗ܂B
        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

        ' Windows tH[ fUCiŕKvłB
        Private components As System.ComponentModel.IContainer

        '  : ȉ̃vV[ẂAWindows tH[ fUCiŕKvłB
        ' Windows tH[ fUCigĕύXĂB  
        ' R[h GfB^͎gpȂłB
        Friend WithEvents tbResultRecvEventID As System.Windows.Forms.TextBox
        Friend WithEvents label1 As System.Windows.Forms.Label
        Friend WithEvents label2 As System.Windows.Forms.Label
        Friend WithEvents tbResultRecvEventServerName As System.Windows.Forms.TextBox
        Friend WithEvents label3 As System.Windows.Forms.Label
        Friend WithEvents tbResultRecvEventMachineName As System.Windows.Forms.TextBox
        Friend WithEvents label4 As System.Windows.Forms.Label
        Friend WithEvents tbResultRecvEventUserName As System.Windows.Forms.TextBox
        Friend WithEvents tbResultRecvEventMessage As System.Windows.Forms.TextBox
        Friend WithEvents label5 As System.Windows.Forms.Label
        Friend WithEvents tbResultRecvEventRecvedEventID As System.Windows.Forms.TextBox
        Friend WithEvents label6 As System.Windows.Forms.Label
        <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
            Me.tbResultRecvEventID = New System.Windows.Forms.TextBox()
            Me.label1 = New System.Windows.Forms.Label()
            Me.label2 = New System.Windows.Forms.Label()
            Me.tbResultRecvEventServerName = New System.Windows.Forms.TextBox()
            Me.label3 = New System.Windows.Forms.Label()
            Me.tbResultRecvEventMachineName = New System.Windows.Forms.TextBox()
            Me.label4 = New System.Windows.Forms.Label()
            Me.tbResultRecvEventUserName = New System.Windows.Forms.TextBox()
            Me.tbResultRecvEventMessage = New System.Windows.Forms.TextBox()
            Me.label5 = New System.Windows.Forms.Label()
            Me.tbResultRecvEventRecvedEventID = New System.Windows.Forms.TextBox()
            Me.label6 = New System.Windows.Forms.Label()
            Me.SuspendLayout()
            '
            'tbResultRecvEventID
            '
            Me.tbResultRecvEventID.Location = New System.Drawing.Point(136, 16)
            Me.tbResultRecvEventID.Name = "tbResultRecvEventID"
            Me.tbResultRecvEventID.TabIndex = 11
            Me.tbResultRecvEventID.Text = ""
            '
            'label1
            '
            Me.label1.Location = New System.Drawing.Point(24, 24)
            Me.label1.Name = "label1"
            Me.label1.Size = New System.Drawing.Size(96, 16)
            Me.label1.TabIndex = 6
            Me.label1.Text = "wCxgID"
            '
            'label2
            '
            Me.label2.Location = New System.Drawing.Point(24, 56)
            Me.label2.Name = "label2"
            Me.label2.Size = New System.Drawing.Size(96, 16)
            Me.label2.TabIndex = 7
            Me.label2.Text = "MT[o"
            '
            'tbResultRecvEventServerName
            '
            Me.tbResultRecvEventServerName.Location = New System.Drawing.Point(136, 56)
            Me.tbResultRecvEventServerName.Name = "tbResultRecvEventServerName"
            Me.tbResultRecvEventServerName.Size = New System.Drawing.Size(152, 19)
            Me.tbResultRecvEventServerName.TabIndex = 10
            Me.tbResultRecvEventServerName.Text = ""
            '
            'label3
            '
            Me.label3.Location = New System.Drawing.Point(24, 88)
            Me.label3.Name = "label3"
            Me.label3.Size = New System.Drawing.Size(96, 16)
            Me.label3.TabIndex = 3
            Me.label3.Text = "M}V"
            '
            'tbResultRecvEventMachineName
            '
            Me.tbResultRecvEventMachineName.Location = New System.Drawing.Point(136, 88)
            Me.tbResultRecvEventMachineName.Name = "tbResultRecvEventMachineName"
            Me.tbResultRecvEventMachineName.Size = New System.Drawing.Size(152, 19)
            Me.tbResultRecvEventMachineName.TabIndex = 13
            Me.tbResultRecvEventMachineName.Text = ""
            '
            'label4
            '
            Me.label4.Location = New System.Drawing.Point(24, 120)
            Me.label4.Name = "label4"
            Me.label4.Size = New System.Drawing.Size(96, 16)
            Me.label4.TabIndex = 2
            Me.label4.Text = "M[U"
            '
            'tbResultRecvEventUserName
            '
            Me.tbResultRecvEventUserName.Location = New System.Drawing.Point(136, 120)
            Me.tbResultRecvEventUserName.Name = "tbResultRecvEventUserName"
            Me.tbResultRecvEventUserName.Size = New System.Drawing.Size(152, 19)
            Me.tbResultRecvEventUserName.TabIndex = 12
            Me.tbResultRecvEventUserName.Text = ""
            '
            'tbResultRecvEventMessage
            '
            Me.tbResultRecvEventMessage.Location = New System.Drawing.Point(136, 152)
            Me.tbResultRecvEventMessage.Name = "tbResultRecvEventMessage"
            Me.tbResultRecvEventMessage.TabIndex = 8
            Me.tbResultRecvEventMessage.Text = ""
            '
            'label5
            '
            Me.label5.Location = New System.Drawing.Point(24, 152)
            Me.label5.Name = "label5"
            Me.label5.Size = New System.Drawing.Size(96, 16)
            Me.label5.TabIndex = 4
            Me.label5.Text = "MbZ[W"
            '
            'tbResultRecvEventRecvedEventID
            '
            Me.tbResultRecvEventRecvedEventID.Location = New System.Drawing.Point(136, 184)
            Me.tbResultRecvEventRecvedEventID.Name = "tbResultRecvEventRecvedEventID"
            Me.tbResultRecvEventRecvedEventID.TabIndex = 9
            Me.tbResultRecvEventRecvedEventID.Text = ""
            '
            'label6
            '
            Me.label6.Location = New System.Drawing.Point(24, 184)
            Me.label6.Name = "label6"
            Me.label6.Size = New System.Drawing.Size(96, 16)
            Me.label6.TabIndex = 5
            Me.label6.Text = "MCxgID"
            '
            'FormReceiveEvent
            '
            Me.AutoScaleBaseSize = New System.Drawing.Size(5, 12)
            Me.ClientSize = New System.Drawing.Size(304, 221)
            Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.tbResultRecvEventID, Me.label1, Me.label2, Me.tbResultRecvEventServerName, Me.label3, Me.tbResultRecvEventMachineName, Me.label4, Me.tbResultRecvEventUserName, Me.tbResultRecvEventMessage, Me.label5, Me.tbResultRecvEventRecvedEventID, Me.label6})
            Me.Name = "FormReceiveEvent"
            Me.Text = "CxgM܂"
            Me.ResumeLayout(False)

        End Sub

#End Region

    End Class

End Namespace
