From b243a07355836e0755469a31c6d3c6b7f12445f4 Mon Sep 17 00:00:00 2001 From: KwakJooYoung Date: Wed, 26 Nov 2025 11:04:29 +0900 Subject: [PATCH] =?UTF-8?q?=EC=8B=9C=EB=A6=AC=EC=96=BC=EB=B2=88=ED=98=B8?= =?UTF-8?q?=20=EC=9E=AC=EC=9E=85=EB=A0=A5=EC=8B=9C=EC=97=90=2012=EC=9E=90?= =?UTF-8?q?=EB=A6=AC,=2016=EC=9E=90=EB=A6=AC=20=EC=9D=B8=EC=8B=9D=ED=95=98?= =?UTF-8?q?=EB=8F=84=EB=A1=9D=20=EC=88=98=EC=A0=95?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- MAXIMUM_Product_Program/MainForm.vb | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/MAXIMUM_Product_Program/MainForm.vb b/MAXIMUM_Product_Program/MainForm.vb index 6b91c4e..fc65793 100644 --- a/MAXIMUM_Product_Program/MainForm.vb +++ b/MAXIMUM_Product_Program/MainForm.vb @@ -398,7 +398,7 @@ Public Class MainForm Private Sub FormSetting() Const ProgramName As String = "Product Program Ver_" - Const VersionNum As String = "2.0.0" + Const VersionNum As String = "2.0.1" Me.Text = ProgramName & VersionNum Me.Size = New Size(1920, 1050) @@ -819,9 +819,10 @@ FailFunc: Else - Const SearchLength As Int16 = 12 + Const oldSearchLength As Int16 = 12 + Const newSearchLength As Int16 = 16 - If SearchData.Length <> SearchLength Then + If SearchData.Length <> oldSearchLength And SearchData.Length <> newSearchLength Then MsgBox("잘못된 제품 코드입니다. 확인하여 주십시오.", vbExclamation) GoTo FailFunc End If