Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 35 Then ' ASCII code of #
KeyAscii = 0
End If
End Sub
Plamen Ivanov
MCSD .NET Early Achiever and MCAD .NET Charter Member (VB .NET/SQL Server 2000)
MCSD (VB 6.0/SQL Server 2000)
VB (.NET) - what other language do you need in the whole Universe?...