feat: cmd textBox

This commit is contained in:
jiwonRepair 2025-08-22 09:31:11 +09:00
parent ddd1fe0636
commit 8111d495e2
3 changed files with 1250 additions and 909 deletions

2126
frmTD_JIG.Designer.vb generated

File diff suppressed because it is too large Load Diff

View File

@ -142,7 +142,7 @@
<value>638, 22</value> <value>638, 22</value>
</metadata> </metadata>
<metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089"> <metadata name="$this.TrayHeight" type="System.Int32, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089">
<value>68</value> <value>25</value>
</metadata> </metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" /> <assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64"> <data name="$this.Icon" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">

View File

@ -10,7 +10,7 @@ Imports System.Runtime.InteropServices.ComTypes
Imports System.Text Imports System.Text
Public Class frmTD_JIG Public Class frmTD_JIG
Public Const TESTER_VER As String = "2.4.1" Public Const TESTER_VER As String = "2.4.2"
Public ShowDetailLog As Boolean = False Public ShowDetailLog As Boolean = False
Public RunDemoMode As Boolean = False Public RunDemoMode As Boolean = False
Public EnableSetup As Boolean = False Public EnableSetup As Boolean = False
@ -885,6 +885,8 @@ WR_File_Error:
btnRunIQC.Refresh() btnRunIQC.Refresh()
txbPV_SN.Focus() txbPV_SN.Focus()
showCmdWindow()
End Sub End Sub
Private Sub loadProduct1Windows() Private Sub loadProduct1Windows()
@ -4469,6 +4471,7 @@ MEASURE_END:
End Sub End Sub
Private Sub RunProcess() Private Sub RunProcess()
showCmdWindow()
Try Try
If DevNum = 1 Then If DevNum = 1 Then
@ -4753,6 +4756,8 @@ MEASURE_END:
End If End If
End If End If
showCmdWindow()
End Sub End Sub
Private Sub btnRunPD1_Click(sender As Object, e As EventArgs) Handles btnRunPD1.Click Private Sub btnRunPD1_Click(sender As Object, e As EventArgs) Handles btnRunPD1.Click
@ -5926,6 +5931,11 @@ MEASURE_END:
btnRunIQC.Enabled = True btnRunIQC.Enabled = True
txbPV_Freq.Text = "N/A" txbPV_Freq.Text = "N/A"
txbCmdWindow.Width = 505
txbCmdWindow.Height = 380
txbCmdWindow.Left = 513
txbCmdWindow.Top = 21
End Sub End Sub
Private Sub btPrintref_Click(sender As Object, e As EventArgs) Handles btPrintref.Click Private Sub btPrintref_Click(sender As Object, e As EventArgs) Handles btPrintref.Click
@ -6098,4 +6108,23 @@ MEASURE_END:
btnGradeStop.Enabled = True btnGradeStop.Enabled = True
End If End If
End Sub End Sub
'Private Sub showCmdWindow()
' txbCmdWindow.Width = 505
' txbCmdWindow.Height = 80
' txbCmdWindow.Left = 513
' txbCmdWindow.Top = 300
' txbCmdWindow.BringToFront()
' txbCmdWindow.Visible = True
'End Sub
Private Sub showCmdWindow()
txbCmdWindow.Width = 505
txbCmdWindow.Height = 200
txbCmdWindow.Left = 513
txbCmdWindow.Top = 200
txbCmdWindow.BringToFront()
txbCmdWindow.Visible = True
End Sub
End Class End Class