by Vitaliy Bykov (2 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: Visual Basic 3.0
Difficulty: Advanced
Date Added: Wed 3rd February 2021
Rating: 
(6 Votes)
This code mask symbol in TextBox. Nobody (unmask-programm) cant show you password. Four line of code protect you programm.
VBcoders'Place at Form TextBox.
'General Declarations
Dim pswd As String
'
Private Sub Text1_KeyPress(KeyAscii As Integer)
pswd = pswd + Chr(KeyAscii)
KeyAscii = Asc("*")
End Sub
'You can replace string KeyAscii = Asc("*") to
'KeyAscii = 0 and TextBox is no symbols "*"