fix: 시리얼 번호 6자리 포맷 보정

This commit is contained in:
ssy99 2025-05-08 11:06:47 +09:00
parent d9a7527a91
commit b6362d9888

View File

@ -2689,8 +2689,14 @@ End_Finish:
nudDvYear.Text = Mid(BackCode, 1, 2)
nudDvMonth.Text = Mid(BackCode, 3, 2)
txbDvNumber.Text = FrontCode & BackCode
nudDvSerial.Text = Mid(BackCode, 5, 3) & Mid(BackCode, 8, 3)
Dim front As String = BackCode.Substring(0, 4)
Dim middle As String = BackCode.Substring(4, 3)
Dim last As String = BackCode.Substring(7, 3)
Dim swapped As String = front & last & middle
txbDvNumber.Text = FrontCode & swapped
nudDvSerial.Text = Mid(BackCode, 5, 6)
DevModelChecking(Mid(FrontCode, 1, 1))