Форум на Исходниках.RU https://forum.sources.ru Форум на Исходниках.RU Форум на Исходниках.RU https://forum.sources.ru/index.php?showtopic=49854&view=findpost&p=327974 Tue, 30 Mar 2004 17:17:17 +0000 Как сделать защиту от вскрытия пароля с TextBox https://forum.sources.ru/index.php?showtopic=49854&view=findpost&p=327974
    Text1.PasswordChar = "*"

, к сожалению это не защитит пароль от различных программ-взломщиков, они способны считывать с текстового поля оригинальные данные замаскированные под звездочками. Одно из возможных решений является отлов ввода пароля пользователем и замена его на настоящие звездочки без использования свойства PasswordChar, например так:
    Dim pswd As String
     
    Private Sub Text1_KeyPress(KeyAscii As Integer)
      pswd = pswd & Chr(KeyAscii)
      KeyAscii = Asc("*")
    End Sub

Теперь нажатия будут отлавливаться в переменную pswd, а в TextBox будут передоваться звёздочки]]> Dufa Работа с основными контролами Visual Basic и текстом