Imports System.Threading.Tasks 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,30}$" Return strtemp End Function Function getUsername() As String 'Not implemented yet! Return "" End Function End Class