Visual Basic. Программирование на Visual Basic

..........................................................................................................................

[ Главная ] [ Статьи ] [ Для новичков ] [ Примеры ] [ Программы ] [ 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

Теперь нажатия будут отлавливаться, а передоваться будут текстовому полю только звёздочки!
И программа-взломщик пароль уже не достанет!!!



..........................................................................................................................

[ Главная ] [ Диски ] [ Книги ] [ Архив рассылки ] [ Архив новостей ] [ Готовые кусочки программ ] [ Карта сайта ]
..........................................................................................................................

По страницам сайта Visaul Progs
или Изучение Visual Basic
Рассылка 'По страницам сайта Visaul Progs' >>> Подпишись на рассылку - будешь получать новые статьи , примеры и много полезной информации из первых рук!!! >>>Если у вас есть статья которой нет на сайте
пришлите ее мне-------->
Послать статью
>>>Если вы хотите задать вопрос
пишите-------->
Мне нужна помощь


Рейтинг сайтов YandeG Rambler's Top100
Реклама:

...:::Design by Mystf0rse 2005-2010 year:::...