|
@@ -72,6 +72,7 @@ Public Class MyMsgInput
|
|
|
End Sub
|
|
End Sub
|
|
|
|
|
|
|
|
Public Sub Btn1_Click() Handles Btn1.Click
|
|
Public Sub Btn1_Click() Handles Btn1.Click
|
|
|
|
|
+ TextArea.Validate()
|
|
|
If MyConverter.IsExited OrElse Not TextArea.IsValidated Then Exit Sub
|
|
If MyConverter.IsExited OrElse Not TextArea.IsValidated Then Exit Sub
|
|
|
MyConverter.IsExited = True
|
|
MyConverter.IsExited = True
|
|
|
MyConverter.Result = TextArea.Text
|
|
MyConverter.Result = TextArea.Text
|