fix: HIFU 테스트 ProcessEnd, NgEnd 순서 변경
This commit is contained in:
parent
6ca3c7826c
commit
5bc2a13c72
@ -4062,6 +4062,7 @@ startFail:
|
|||||||
txbWindow.AppendText("[" & MeasureTimeAll(MeasEnd) & "ms] Test Play" & vbCrLf)
|
txbWindow.AppendText("[" & MeasureTimeAll(MeasEnd) & "ms] Test Play" & vbCrLf)
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
|
||||||
Private Sub AltoFunctionPD()
|
Private Sub AltoFunctionPD()
|
||||||
StartTime = MeasureTimeAll(MeasStart)
|
StartTime = MeasureTimeAll(MeasStart)
|
||||||
|
|
||||||
@ -5058,9 +5059,6 @@ RunSuccess:
|
|||||||
|
|
||||||
End If
|
End If
|
||||||
txbWindow.AppendText("=== 합격 데이터 저장 완료 ===" & vbCrLf)
|
txbWindow.AppendText("=== 합격 데이터 저장 완료 ===" & vbCrLf)
|
||||||
ProcessEnd:
|
|
||||||
Jig_End()
|
|
||||||
GoTo NormalEnd
|
|
||||||
NgEnd:
|
NgEnd:
|
||||||
txbWindow.AppendText("=== 불합격 데이터 저장 시작 ===" & vbCrLf)
|
txbWindow.AppendText("=== 불합격 데이터 저장 시작 ===" & vbCrLf)
|
||||||
If HIFU_PostReg() Then
|
If HIFU_PostReg() Then
|
||||||
@ -5081,15 +5079,8 @@ NgEnd:
|
|||||||
FailMain()
|
FailMain()
|
||||||
|
|
||||||
Else
|
Else
|
||||||
|
|
||||||
txbWindow.AppendText("CSV Data Save : OK" & vbCrLf)
|
txbWindow.AppendText("CSV Data Save : OK" & vbCrLf)
|
||||||
|
FailMain()
|
||||||
If TestError = False Then
|
|
||||||
FailMain()
|
|
||||||
Else
|
|
||||||
SuccessMain()
|
|
||||||
End If
|
|
||||||
|
|
||||||
End If
|
End If
|
||||||
|
|
||||||
Else
|
Else
|
||||||
@ -5110,7 +5101,7 @@ NgEnd:
|
|||||||
|
|
||||||
End If
|
End If
|
||||||
txbWindow.AppendText("=== 불합격 데이터 저장 완료 ===" & vbCrLf)
|
txbWindow.AppendText("=== 불합격 데이터 저장 완료 ===" & vbCrLf)
|
||||||
|
ProcessEnd:
|
||||||
Jig_End()
|
Jig_End()
|
||||||
NormalEnd:
|
NormalEnd:
|
||||||
txbWindow.AppendText("[" & MeasureTimeAll(MeasEnd) & "ms] Test Play" & vbCrLf)
|
txbWindow.AppendText("[" & MeasureTimeAll(MeasEnd) & "ms] Test Play" & vbCrLf)
|
||||||
|
Loading…
x
Reference in New Issue
Block a user