|
[ Главная ] [ Статьи ] [ Для новичков ] [ Примеры ] [ Программы ] [ Microsoft Agent 2.0 ] [ Пособие ] [ Уроки ] [ Разное ] |
Как спрятать данные за звездочками более безопаснее. Предположим, вы хотите добавить в вашу программу доступ по паролю. У вас есть текстовое поле, в которов вы набираете пароль, скрывающийся за звездочками. Но существует много программ, которые с легкостью показывают текст, скрытый за звездочками. Небольшой совет: в разделе формы General Declarations объявите переменную, которая будет содержать код: Dim pswd As String в свойствах текстового поля установите в PasswordChar звёздочку "*".Теперь кликните по текстовому полю два раза и выберите событие Text1_KeyPress, впишите: Private Sub Text1_KeyPress(KeyAscii As Integer) pswd = pswd + Chr(KeyAscii) KeyAscii = Asc("*") End Sub Теперь нажатия будут отлавливаться, а передоваться будут текстовому полю только звёздочки!И программа-взломщик пароль уже не достанет!!! |
|
|
|
>>>Если у вас есть статья которой нет на сайте
пришлите ее мне--------> Послать статью >>>Если вы хотите задать вопрос пишите--------> Мне нужна помощь |
|
|
|