TextBox İçerisine Boşluk Yazılmasını Engellemek

TextBox İçerisine Boşluk Yazılmasını Engellemek

Private Sub Text1_KeyPress(KeyAscii As Integer)
         If KeyAscii = 32 Then                      ' KeyAscii = 32 - Boşluk
                  KeyAscii = 0                          ' KeyAscii = 0 - Tuş basımı yok
         End If
End Sub