From 1fe52f8ded9ca15aea9a5bd9db324210ecf5beb1 Mon Sep 17 00:00:00 2001 From: KwakJooYoung Date: Fri, 28 Nov 2025 15:19:31 +0900 Subject: [PATCH] =?UTF-8?q?ver2.0.2=20:=20=EC=88=98=EC=9E=85=EA=B2=80?= =?UTF-8?q?=EC=82=AC=20=ED=95=A9=EA=B2=A9/=EB=B6=88=ED=95=A9=EA=B2=A9=20?= =?UTF-8?q?=EC=B9=B4=EC=9A=B4=ED=8A=B8=20=EC=98=A4=EB=A5=98=20=EC=88=98?= =?UTF-8?q?=EC=A0=95?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- ProductFunctionTester/Main_Form.vb | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/ProductFunctionTester/Main_Form.vb b/ProductFunctionTester/Main_Form.vb index 66bfa81..0afab84 100644 --- a/ProductFunctionTester/Main_Form.vb +++ b/ProductFunctionTester/Main_Form.vb @@ -9,7 +9,7 @@ Imports uPLibrary.Networking.M2Mqtt Public Class Main_Form Public Program_Name As String = "DUALSONIC_Multi_Function_Tester Ver." - Public Program_Version As String = "2.0.1" + Public Program_Version As String = "2.0.2" ''데이터 베이스 테이블 목록 @@ -5690,7 +5690,11 @@ ProcessEnd: Private Sub IQCReCount() txbDayCount.Text = Val(txbDayCount.Text) + 1 - txbOkCount.Text = Val(txbOkCount.Text) + 1 + If TestError = False Then 'Fail + txbNgCount.Text = Val(txbNgCount.Text) + 1 + Else + txbOkCount.Text = Val(txbOkCount.Text) + 1 + End If End Sub Private Sub RFReCount()