Änderungen CSS und Design

App_Code/RegexSammlung_VERAG.vb

@@ -2,20 +2,8 @@
 Imports Microsoft.VisualBasic
 
 Public Class RegexSammlung_VERAG
-    Function getregEmail() As String
-        Dim strtemp As String = "\w+([-+.']\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*"
-        Return strtemp
-    End Function
-    Function getregUID() As String
-        Dim strtemp As String = "^[0-9]"
-        Return strtemp
-    End Function
-    Function getregPassword() As String
-        Dim strtemp As String = "^(?=.*[a-z])(?=.*[A-Z])(?=.*\d)(?=.*[^a-zA-Z\d]).{4,35}$"
-        Return strtemp
-    End Function
-    Function getUsername() As String
-        'Not implemented yet!
-        Return ""
-    End Function
+    Public Shared email As String = "[\w\.]+\@[\w]+(?:\.[\w]{3}|\.[\w]{2}\.[\w]{2}|\.[\w]{2})\b"
+    Public Shared UID As String = "[0-9].{4,10}"
+    Public Shared PW As String = "^(?=.*[a-z])(?=.*[A-Z])(?=.*\d)(?=.*[^a-zA-Z\d]).{4,35}$"
+    Public Shared UserName As String = "^(A-Z]).{4,30}$"
 End Class