Partial Class login_ChangePW Inherits System.Web.UI.Page Protected Sub Page_Load(sender As Object, e As EventArgs) btn_submitpw.Enabled = False txt_Pw_WH.Enabled = False regexval_txt_Pw_WH.Enabled = False End Sub Protected Sub txt_Pw_WH_TextChanged(sender As Object, e As EventArgs) regexval_txt_Pw_WH.Validate() confirmPasswordReq.Validate() If confirmPasswordReq.IsValid Then btn_submitpw.Enabled = True Else btn_submitpw.Enabled = False End If End Sub Protected Sub btn_submitpw_Click(sender As Object, e As EventArgs) Dim tempstr As String = "" If txt_Pw.Text = tempstr Then End If End Sub Protected Sub txt_Pw_TextChanged(sender As Object, e As EventArgs) regexval_txt_Pw.Validate() If regexval_txt_Pw.IsValid Then txt_Pw_WH.ReadOnly = False txt_Pw_WH.Enabled = True regexval_txt_Pw_WH.Enabled = True MsgBox("PW erfolgreich geändert!") Else txt_Pw_WH.ReadOnly = True txt_Pw_WH.Enabled = False regexval_txt_Pw_WH.Enabled = False MsgBox("PW nicht erfolgreich geändert!") End If End Sub End Class