Вы разрешаете вводить только числа в TextBox, используя следующий код.
Следующий код: окей.
Private Sub Textbox1_TextChanged(sender As Object, e As TextChangedEventArgs) Handles Textbox1.TextChanged
Dim myRegex As New Text.RegularExpressions.Regex("[^\d]")
Textbox1.Text = myRegex.Replace(Textbox1.Text, "")
End Sub
Мне нужно то же действие для PasswordBox.
Следующий код дает эту ошибку: https://prnt.sc/ljk9ty
Private Sub PasswordBox1_PasswordChanged(sender As Object, e As RoutedEventArgs) Handles PasswordBox1.PasswordChanged
Dim myRegex As New Text.RegularExpressions.Regex("[^\d]")
PasswordBox1.Password = myRegex.Replace(PasswordBox1.Password, "")
End Sub
Итак, приведенный выше код необходимо исправить.