This commit is contained in:
2022-05-19 17:23:41 +02:00
parent 0c23878301
commit 5448240b46
19 changed files with 340 additions and 161 deletions

View File

@@ -589,9 +589,13 @@ Public Class frmAdmin_Globix
Private Sub SimpleButton4_Click(sender As Object, e As EventArgs) Handles SimpleButton4.Click
Try
If Regex.IsMatch(REGEXTextBox.Text, txtDateinameTest.Text) Then
MsgBox("The RegEx resulted in a proper match!", MsgBoxStyle.Information, "Perfect:")
Dim oMsgBox As New Dialog1("The RegEx resulted in a proper match!", "", False)
oMsgBox.ShowDialog()
Else
MsgBox("No Match- There might be an error in the RegEx!", MsgBoxStyle.Information, "Something wrong:")
Dim oMsgBox As New Dialog1("No Match- There might be an error in the RegEx!", "", True)
oMsgBox.ShowDialog()
End If
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Exclamation, "Error in Testing Regex: ")