fix(MyMsgInput):validate 输入

不要相信用户输入
2025-03-17 12:01:47 +08:00
parent da6b64c9bc
commit 92eeba5fff
2 changed files with 1 additions and 11 deletions
@@ -72,6 +72,7 @@
    End Sub

    Public Sub Btn1_Click() Handles Btn1.Click
+        TextArea.Validate()
        If MyConverter.IsExited OrElse Not TextArea.ValidateResult = "" Then Exit Sub
        MyConverter.IsExited = True
        MyConverter.Result = TextArea.Text