From 03943cf5764f30b10606ccd451afa84d5ebb3011 Mon Sep 17 00:00:00 2001 From: hyelinjung Date: Fri, 13 Feb 2026 09:39:30 +0900 Subject: [PATCH] =?UTF-8?q?1.=20TD=EB=A5=BC=20=EC=9D=BD=EC=96=B4=EC=98=AC?= =?UTF-8?q?=EB=95=8C(settdsn)=20=EC=B2=AB=EA=B8=80=EC=9E=90=EA=B0=80=20?= =?UTF-8?q?=EC=95=84=EC=8A=A4=ED=82=A4=EC=BD=94=EB=93=9C=20=EC=88=AB?= =?UTF-8?q?=EC=9E=90=20OR=20=EB=8C=80=EC=86=8C=EB=AC=B8=20=EC=95=8C?= =?UTF-8?q?=ED=8C=8C=EB=B2=B3=EB=B2=94=EC=9C=84=EA=B0=80=20=EC=95=84?= =?UTF-8?q?=EB=8B=90=20=EA=B2=BD=EC=9A=B0=20=20=EC=A1=B4=EC=9E=AC=ED=95=98?= =?UTF-8?q?=EC=A7=80=20=EC=95=8A=EB=8A=94=20=EA=B2=BD=EC=9A=B0=EB=A1=9C=20?= =?UTF-8?q?=EC=A7=80=EC=A0=95?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- ProductFunctionTester/Main_Form.vb | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/ProductFunctionTester/Main_Form.vb b/ProductFunctionTester/Main_Form.vb index e320854..7cf03ed 100644 --- a/ProductFunctionTester/Main_Form.vb +++ b/ProductFunctionTester/Main_Form.vb @@ -4123,6 +4123,16 @@ DataFail: retVal = PollingReceiveData(500) txbWindow.AppendText("TD READ DATA: " & retVal & "" & vbCrLf) + Dim c As Integer = Asc(retVal.Substring(0, 1)) ' 첫 글자 아스키값 + + If Not ((c >= 48 And c <= 57) Or (c >= 65 And c <= 90) Or (c >= 97 And c <= 122)) Then + Return "0" + End If + + 'If Not ((c >= 48 And c <= 57) And retVal.Length > td_name_size) Then + ' Return "0" + 'End If + If retVal.Length > td_name_size Then Return retVal Else