jionmt-sw/prod-ProductFunctionTester
5
0
Fork 0
Code Issues 2 Pull Requests Actions Packages Projects Releases Wiki Activity

fix: RFReCount() 함수를 formType에 따라 분기 처리

Browse Source
This commit is contained in:
kje97 2025-06-24 17:53:09 +09:00
commit 9090c8564c
1 changed files with 50 additions and 49 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
ProductFunctionTester/Main_Form.vb
View File

@ -78,7 +78,7 @@ Public Class Main_Form
Private StartSwitch As Boolean Private StartSwitch As Boolean
Private TDSNHead1 As String = "DIT" Private TDSNHead1 As String = "DIT"
Private TDSNHead2 As String = "J" Private TDSNHead2 As String = "J3"
Private Const TestType As String = "SET" Private Const TestType As String = "SET"
Private Const TestModel As String = "MAXIMUM" Private Const TestModel As String = "MAXIMUM"
@ -1073,7 +1073,7 @@ Public Class Main_Form
Return True Return True
End If End If
If Scale_Snd If If Scale_Snd Then If
ScopeData = DoCommand(":DISPlay:ANNotation:BACKground TRAN") ScopeData = DoCommand(":DISPlay:ANNotation:BACKground TRAN")
If ScopeData <> "PASS" Then If ScopeData <> "PASS" Then
@ -2424,7 +2424,7 @@ SettingFail:
End Try End Try
forSettingFail: forSettingFail:
rfTestFail(forcnt) rfTestFail(ForCnt)
SettingFail: SettingFail:
txbWindow.AppendText("Run RF FAIL" & vbCrLf) txbWindow.AppendText("Run RF FAIL" & vbCrLf)
TestRunningState(testRunningList.Fail, Color.Red) TestRunningState(testRunningList.Fail, Color.Red)
@ -5414,6 +5414,7 @@ ProcessEnd:
' End If ' End If
' End If ' End If
'End Sub 'End Sub
Private Sub RFReCount() Private Sub RFReCount()
If dupDATA = 0 Then If dupDATA = 0 Then
txbDayCount.Text = Val(txbDayCount.Text) + 1 txbDayCount.Text = Val(txbDayCount.Text) + 1