初始化提交

仓库转移到Gitea，初始化提交，可能丢失以前的git版本日志
2025-11-27 16:41:05 +08:00
commit 027d0f8024
663 changed files with 171319 additions and 0 deletions
--- a/AUTS_ProductEntry/FrmMain.Designer.vb
+++ b/AUTS_ProductEntry/FrmMain.Designer.vb
@@ -0,0 +1,278 @@
+<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
+Partial Class FrmMain
+    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 窗体设计器所必需的
+    Private components As System.ComponentModel.IContainer
+
+    '注意: 以下过程是 Windows 窗体设计器所必需的
+    '可以使用 Windows 窗体设计器修改它。  
+    '不要使用代码编辑器修改它。
+    <System.Diagnostics.DebuggerStepThrough()> _
+    Private Sub InitializeComponent()
+        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(FrmMain))
+        Me.lab_Result = New System.Windows.Forms.Label()
+        Me.lab_ModelName = New System.Windows.Forms.Label()
+        Me.GroupBox3 = New System.Windows.Forms.GroupBox()
+        Me.RtxLog = New System.Windows.Forms.RichTextBox()
+        Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
+        Me.TssLblProductionLine = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.TssLblStaion = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.TsLblCheckSum = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.TssLblInvalidCount = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.TssLblValidCount = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.TssLblPassCount = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.TssLblFailCount = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.TssLblYield = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.GroupBox4 = New System.Windows.Forms.GroupBox()
+        Me.CboProductionLines = New System.Windows.Forms.ComboBox()
+        Me.GroupBox1 = New System.Windows.Forms.GroupBox()
+        Me.TxtFirstRecord = New System.Windows.Forms.TextBox()
+        Me.btn_OpenProject = New System.Windows.Forms.Button()
+        Me.btn_StartProgramming = New System.Windows.Forms.Button()
+        Me.GroupBox3.SuspendLayout
+        Me.StatusStrip1.SuspendLayout
+        Me.GroupBox4.SuspendLayout
+        Me.GroupBox1.SuspendLayout
+        Me.SuspendLayout
+        '
+        'lab_Result
+        '
+        Me.lab_Result.BackColor = System.Drawing.Color.Black
+        Me.lab_Result.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
+        Me.lab_Result.Font = New System.Drawing.Font("Consolas", 48!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
+        Me.lab_Result.ForeColor = System.Drawing.Color.FromArgb(CType(CType(0,Byte),Integer), CType(CType(192,Byte),Integer), CType(CType(0,Byte),Integer))
+        Me.lab_Result.Location = New System.Drawing.Point(0, 95)
+        Me.lab_Result.Name = "lab_Result"
+        Me.lab_Result.Size = New System.Drawing.Size(404, 201)
+        Me.lab_Result.TabIndex = 13
+        Me.lab_Result.Text = "PASS"
+        Me.lab_Result.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        '
+        'lab_ModelName
+        '
+        Me.lab_ModelName.BackColor = System.Drawing.SystemColors.ActiveCaption
+        Me.lab_ModelName.BorderStyle = System.Windows.Forms.BorderStyle.Fixed3D
+        Me.lab_ModelName.Font = New System.Drawing.Font("Consolas", 27.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
+        Me.lab_ModelName.Location = New System.Drawing.Point(0, -1)
+        Me.lab_ModelName.Name = "lab_ModelName"
+        Me.lab_ModelName.Size = New System.Drawing.Size(404, 85)
+        Me.lab_ModelName.TabIndex = 12
+        Me.lab_ModelName.Text = "SW-570"
+        Me.lab_ModelName.TextAlign = System.Drawing.ContentAlignment.MiddleCenter
+        '
+        'GroupBox3
+        '
+        Me.GroupBox3.Anchor = CType((((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Bottom)  _
+            Or System.Windows.Forms.AnchorStyles.Left)  _
+            Or System.Windows.Forms.AnchorStyles.Right),System.Windows.Forms.AnchorStyles)
+        Me.GroupBox3.Controls.Add(Me.RtxLog)
+        Me.GroupBox3.Font = New System.Drawing.Font("宋体", 12!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134,Byte))
+        Me.GroupBox3.Location = New System.Drawing.Point(0, 302)
+        Me.GroupBox3.Name = "GroupBox3"
+        Me.GroupBox3.Size = New System.Drawing.Size(740, 257)
+        Me.GroupBox3.TabIndex = 17
+        Me.GroupBox3.TabStop = false
+        Me.GroupBox3.Text = "录入记录"
+        '
+        'RtxLog
+        '
+        Me.RtxLog.BorderStyle = System.Windows.Forms.BorderStyle.None
+        Me.RtxLog.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.RtxLog.Location = New System.Drawing.Point(3, 22)
+        Me.RtxLog.Name = "RtxLog"
+        Me.RtxLog.Size = New System.Drawing.Size(734, 232)
+        Me.RtxLog.TabIndex = 0
+        Me.RtxLog.Text = ""
+        '
+        'StatusStrip1
+        '
+        Me.StatusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TssLblProductionLine, Me.TssLblStaion, Me.TsLblCheckSum, Me.TssLblInvalidCount, Me.TssLblValidCount, Me.TssLblPassCount, Me.TssLblFailCount, Me.TssLblYield})
+        Me.StatusStrip1.Location = New System.Drawing.Point(0, 563)
+        Me.StatusStrip1.Name = "StatusStrip1"
+        Me.StatusStrip1.Size = New System.Drawing.Size(742, 22)
+        Me.StatusStrip1.TabIndex = 19
+        Me.StatusStrip1.Text = "StatusStrip1"
+        '
+        'TssLblProductionLine
+        '
+        Me.TssLblProductionLine.ForeColor = System.Drawing.Color.Black
+        Me.TssLblProductionLine.Name = "TssLblProductionLine"
+        Me.TssLblProductionLine.Size = New System.Drawing.Size(44, 17)
+        Me.TssLblProductionLine.Text = "A-Line"
+        '
+        'TssLblStaion
+        '
+        Me.TssLblStaion.ForeColor = System.Drawing.Color.Black
+        Me.TssLblStaion.Name = "TssLblStaion"
+        Me.TssLblStaion.Size = New System.Drawing.Size(68, 17)
+        Me.TssLblStaion.Text = "BLV-12 A1"
+        '
+        'TsLblCheckSum
+        '
+        Me.TsLblCheckSum.Name = "TsLblCheckSum"
+        Me.TsLblCheckSum.Size = New System.Drawing.Size(64, 17)
+        Me.TsLblCheckSum.Text = "Sum:0000"
+        '
+        'TssLblInvalidCount
+        '
+        Me.TssLblInvalidCount.Name = "TssLblInvalidCount"
+        Me.TssLblInvalidCount.Size = New System.Drawing.Size(77, 17)
+        Me.TssLblInvalidCount.Text = "Invalid:0000"
+        '
+        'TssLblValidCount
+        '
+        Me.TssLblValidCount.Name = "TssLblValidCount"
+        Me.TssLblValidCount.Size = New System.Drawing.Size(68, 17)
+        Me.TssLblValidCount.Text = "Valid:0000"
+        '
+        'TssLblPassCount
+        '
+        Me.TssLblPassCount.Name = "TssLblPassCount"
+        Me.TssLblPassCount.Size = New System.Drawing.Size(65, 17)
+        Me.TssLblPassCount.Text = "Pass:0000"
+        '
+        'TssLblFailCount
+        '
+        Me.TssLblFailCount.Name = "TssLblFailCount"
+        Me.TssLblFailCount.Size = New System.Drawing.Size(58, 17)
+        Me.TssLblFailCount.Text = "Fail:0000"
+        '
+        'TssLblYield
+        '
+        Me.TssLblYield.Name = "TssLblYield"
+        Me.TssLblYield.Size = New System.Drawing.Size(81, 17)
+        Me.TssLblYield.Text = "Yield:00.00%"
+        '
+        'GroupBox4
+        '
+        Me.GroupBox4.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left)  _
+            Or System.Windows.Forms.AnchorStyles.Right),System.Windows.Forms.AnchorStyles)
+        Me.GroupBox4.Controls.Add(Me.CboProductionLines)
+        Me.GroupBox4.Font = New System.Drawing.Font("微软雅黑", 18!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134,Byte))
+        Me.GroupBox4.Location = New System.Drawing.Point(410, -1)
+        Me.GroupBox4.Name = "GroupBox4"
+        Me.GroupBox4.Size = New System.Drawing.Size(320, 85)
+        Me.GroupBox4.TabIndex = 23
+        Me.GroupBox4.TabStop = false
+        Me.GroupBox4.Text = "产线"
+        '
+        'CboProductionLines
+        '
+        Me.CboProductionLines.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.CboProductionLines.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList
+        Me.CboProductionLines.Font = New System.Drawing.Font("Consolas", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
+        Me.CboProductionLines.ForeColor = System.Drawing.Color.Gray
+        Me.CboProductionLines.FormattingEnabled = true
+        Me.CboProductionLines.Items.AddRange(New Object() {"Q1", "Q2", "Q3", "Q4"})
+        Me.CboProductionLines.Location = New System.Drawing.Point(3, 35)
+        Me.CboProductionLines.Name = "CboProductionLines"
+        Me.CboProductionLines.Size = New System.Drawing.Size(314, 40)
+        Me.CboProductionLines.TabIndex = 0
+        Me.CboProductionLines.TabStop = false
+        '
+        'GroupBox1
+        '
+        Me.GroupBox1.Anchor = CType(((System.Windows.Forms.AnchorStyles.Top Or System.Windows.Forms.AnchorStyles.Left)  _
+            Or System.Windows.Forms.AnchorStyles.Right),System.Windows.Forms.AnchorStyles)
+        Me.GroupBox1.Controls.Add(Me.TxtFirstRecord)
+        Me.GroupBox1.Font = New System.Drawing.Font("微软雅黑", 18!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134,Byte))
+        Me.GroupBox1.Location = New System.Drawing.Point(410, 81)
+        Me.GroupBox1.Name = "GroupBox1"
+        Me.GroupBox1.Size = New System.Drawing.Size(320, 112)
+        Me.GroupBox1.TabIndex = 22
+        Me.GroupBox1.TabStop = false
+        Me.GroupBox1.Text = "成品序号"
+        '
+        'TxtFirstRecord
+        '
+        Me.TxtFirstRecord.Dock = System.Windows.Forms.DockStyle.Fill
+        Me.TxtFirstRecord.Font = New System.Drawing.Font("Consolas", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
+        Me.TxtFirstRecord.ImeMode = System.Windows.Forms.ImeMode.Disable
+        Me.TxtFirstRecord.Location = New System.Drawing.Point(3, 35)
+        Me.TxtFirstRecord.Name = "TxtFirstRecord"
+        Me.TxtFirstRecord.Size = New System.Drawing.Size(314, 39)
+        Me.TxtFirstRecord.TabIndex = 1
+        Me.TxtFirstRecord.TextAlign = System.Windows.Forms.HorizontalAlignment.Center
+        '
+        'btn_OpenProject
+        '
+        Me.btn_OpenProject.Font = New System.Drawing.Font("微软雅黑", 20.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134,Byte))
+        Me.btn_OpenProject.Location = New System.Drawing.Point(410, 204)
+        Me.btn_OpenProject.Name = "btn_OpenProject"
+        Me.btn_OpenProject.Size = New System.Drawing.Size(140, 92)
+        Me.btn_OpenProject.TabIndex = 21
+        Me.btn_OpenProject.Text = "选择项目"
+        Me.btn_OpenProject.UseVisualStyleBackColor = true
+        '
+        'btn_StartProgramming
+        '
+        Me.btn_StartProgramming.Font = New System.Drawing.Font("微软雅黑", 24!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(134,Byte))
+        Me.btn_StartProgramming.ForeColor = System.Drawing.Color.Blue
+        Me.btn_StartProgramming.Location = New System.Drawing.Point(571, 204)
+        Me.btn_StartProgramming.Name = "btn_StartProgramming"
+        Me.btn_StartProgramming.Size = New System.Drawing.Size(159, 92)
+        Me.btn_StartProgramming.TabIndex = 20
+        Me.btn_StartProgramming.Text = "开始录入"
+        Me.btn_StartProgramming.UseVisualStyleBackColor = true
+        '
+        'FrmMain
+        '
+        Me.AutoScaleDimensions = New System.Drawing.SizeF(6!, 12!)
+        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
+        Me.ClientSize = New System.Drawing.Size(742, 585)
+        Me.Controls.Add(Me.GroupBox4)
+        Me.Controls.Add(Me.GroupBox1)
+        Me.Controls.Add(Me.btn_OpenProject)
+        Me.Controls.Add(Me.btn_StartProgramming)
+        Me.Controls.Add(Me.StatusStrip1)
+        Me.Controls.Add(Me.GroupBox3)
+        Me.Controls.Add(Me.lab_Result)
+        Me.Controls.Add(Me.lab_ModelName)
+        Me.Icon = CType(resources.GetObject("$this.Icon"),System.Drawing.Icon)
+        Me.Name = "FrmMain"
+        Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
+        Me.Text = "Form1"
+        Me.GroupBox3.ResumeLayout(false)
+        Me.StatusStrip1.ResumeLayout(false)
+        Me.StatusStrip1.PerformLayout
+        Me.GroupBox4.ResumeLayout(false)
+        Me.GroupBox1.ResumeLayout(false)
+        Me.GroupBox1.PerformLayout
+        Me.ResumeLayout(false)
+        Me.PerformLayout
+
+End Sub
+
+    Friend WithEvents lab_Result As Label
+    Friend WithEvents lab_ModelName As Label
+    Friend WithEvents GroupBox3 As GroupBox
+    Friend WithEvents RtxLog As RichTextBox
+    Friend WithEvents StatusStrip1 As StatusStrip
+    Friend WithEvents TssLblProductionLine As ToolStripStatusLabel
+    Friend WithEvents TssLblStaion As ToolStripStatusLabel
+    Friend WithEvents TsLblCheckSum As ToolStripStatusLabel
+    Friend WithEvents TssLblInvalidCount As ToolStripStatusLabel
+    Friend WithEvents TssLblValidCount As ToolStripStatusLabel
+    Friend WithEvents TssLblPassCount As ToolStripStatusLabel
+    Friend WithEvents TssLblFailCount As ToolStripStatusLabel
+    Friend WithEvents TssLblYield As ToolStripStatusLabel
+    Friend WithEvents GroupBox4 As GroupBox
+    Friend WithEvents CboProductionLines As ComboBox
+    Friend WithEvents GroupBox1 As GroupBox
+    Friend WithEvents TxtFirstRecord As TextBox
+    Friend WithEvents btn_OpenProject As Button
+    Friend WithEvents btn_StartProgramming As Button
+End Class