fix(btnDisplayDesc_Click):少了个标记

2025-03-04 12:30:43 +08:00
parent 80a004ceef
commit da6b64c9bc
1 changed files with 1 additions and 0 deletions
@@ -108,6 +108,7 @@
            '确认输入的新名称
            Dim OldName As String = PageVersionLeft.Version.Name
            Dim OldPath As String = PageVersionLeft.Version.Path
+ReType:
            '修改此部分的同时修改快速安装的版本名检测*
            Dim NewName As String = MyMsgBoxInput("重命名版本", "", OldName, New ObjectModel.Collection(Of Validate) From {New ValidateFolderName(PathMcFolder & "versions", IgnoreCase:=False)})
            If String.IsNullOrWhiteSpace(NewName) Then Exit Sub