store-TDReportUploader/frmDBInput.Designer.vb

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class frmDBInput
    Inherits System.Windows.Forms.Form

    'Form은 Dispose를 재정의하여 구성 요소 목록을 정리합니다.
    <System.Diagnostics.DebuggerNonUserCode()> _
    Protected Overrides Sub Dispose(ByVal disposing As Boolean)
        Try
            If disposing AndAlso components IsNot Nothing Then
                components.Dispose()
            End If
        Finally
            MyBase.Dispose(disposing)
        End Try
    End Sub

    'Windows Form 디자이너에 필요합니다.
    Private components As System.ComponentModel.IContainer

    '참고: 다음 프로시저는 Windows Form 디자이너에 필요합니다.
    '수정하려면 Windows Form 디자이너를 사용하십시오.  
    '코드 편집기에서는 수정하지 마세요.
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmDBInput))
        Me.Label6 = New System.Windows.Forms.Label()
        Me.txbCurrent = New System.Windows.Forms.TextBox()
        Me.Label1 = New System.Windows.Forms.Label()
        Me.txbDateTime = New System.Windows.Forms.TextBox()
        Me.Label2 = New System.Windows.Forms.Label()
        Me.txbSN = New System.Windows.Forms.TextBox()
        Me.Button1 = New System.Windows.Forms.Button()
        Me.Label3 = New System.Windows.Forms.Label()
        Me.SuspendLayout()
        '
        'Label6
        '
        Me.Label6.AutoSize = True
        Me.Label6.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
        Me.Label6.Location = New System.Drawing.Point(52, 198)
        Me.Label6.Name = "Label6"
        Me.Label6.Size = New System.Drawing.Size(70, 21)
        Me.Label6.TabIndex = 19
        Me.Label6.Text = "Current"
        '
        'txbCurrent
        '
        Me.txbCurrent.Font = New System.Drawing.Font("함초롬바탕", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
        Me.txbCurrent.Location = New System.Drawing.Point(194, 195)
        Me.txbCurrent.Name = "txbCurrent"
        Me.txbCurrent.Size = New System.Drawing.Size(262, 35)
        Me.txbCurrent.TabIndex = 18
        Me.txbCurrent.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
        '
        'Label1
        '
        Me.Label1.AutoSize = True
        Me.Label1.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
        Me.Label1.Location = New System.Drawing.Point(52, 119)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(94, 21)
        Me.Label1.TabIndex = 17
        Me.Label1.Text = "측정일자"
        '
        'txbDateTime
        '
        Me.txbDateTime.Font = New System.Drawing.Font("함초롬바탕", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
        Me.txbDateTime.Location = New System.Drawing.Point(194, 116)
        Me.txbDateTime.Name = "txbDateTime"
        Me.txbDateTime.Size = New System.Drawing.Size(262, 35)
        Me.txbDateTime.TabIndex = 16
        Me.txbDateTime.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
        '
        'Label2
        '
        Me.Label2.AutoSize = True
        Me.Label2.Font = New System.Drawing.Font("굴림", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
        Me.Label2.Location = New System.Drawing.Point(52, 45)
        Me.Label2.Name = "Label2"
        Me.Label2.Size = New System.Drawing.Size(105, 21)
        Me.Label2.TabIndex = 21
        Me.Label2.Text = "TD 시리얼"
        '
        'txbSN
        '
        Me.txbSN.Font = New System.Drawing.Font("함초롬바탕", 15.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
        Me.txbSN.Location = New System.Drawing.Point(194, 42)
        Me.txbSN.Name = "txbSN"
        Me.txbSN.Size = New System.Drawing.Size(262, 35)
        Me.txbSN.TabIndex = 20
        Me.txbSN.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
        '
        'Button1
        '
        Me.Button1.Font = New System.Drawing.Font("굴림", 24.0!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
        Me.Button1.Location = New System.Drawing.Point(56, 277)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(400, 94)
        Me.Button1.TabIndex = 22
        Me.Button1.Text = "입력"
        Me.Button1.UseVisualStyleBackColor = True
        '
        'Label3
        '
        Me.Label3.AutoSize = True
        Me.Label3.Font = New System.Drawing.Font("굴림", 12.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(129, Byte))
        Me.Label3.Location = New System.Drawing.Point(191, 154)
        Me.Label3.Name = "Label3"
        Me.Label3.Size = New System.Drawing.Size(210, 16)
        Me.Label3.TabIndex = 24
        Me.Label3.Text = "(예시 : 2020-05-26 15:11:11)"
        '
        'frmDBInput
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(7.0!, 12.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.ClientSize = New System.Drawing.Size(517, 392)
        Me.Controls.Add(Me.Label3)
        Me.Controls.Add(Me.Button1)
        Me.Controls.Add(Me.Label2)
        Me.Controls.Add(Me.txbSN)
        Me.Controls.Add(Me.Label6)
        Me.Controls.Add(Me.txbCurrent)
        Me.Controls.Add(Me.Label1)
        Me.Controls.Add(Me.txbDateTime)
        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
        Me.Name = "frmDBInput"
        Me.Text = "DB INPUT"
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub

    Friend WithEvents Label6 As Label
    Friend WithEvents txbCurrent As TextBox
    Friend WithEvents Label1 As Label
    Friend WithEvents txbDateTime As TextBox
    Friend WithEvents Label2 As Label
    Friend WithEvents txbSN As TextBox
    Friend WithEvents Button1 As Button


    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim cmd As String

        cmd = "update jomtCartridgeTbl set QC_DateTime = '" + txbDateTime.Text + "',QC_Current = '" + txbCurrent.Text + "' where PV_SN = '" + txbSN.Text + "';"
        DBCommand(cmd)

        txbDateTime.Clear()
        txbCurrent.Clear()
        txbSN.Clear()
    End Sub
    Friend WithEvents Label3 As Label
End Class