Textbox solo numeri

[keeper76]

Dovrei fare in modo che in un textbox si possano inserire solo numeri, nessuna lettera e nessun simbolo di punteggiatura (,;,:. ecc.)

grazie

[darkblOOd]

Textbox_KeyPress

e controlla il valore di KeyASCII

[GudFella]

effettua un controllo sul valore della text
all'evento lostfocus

If Not IsNumeric(text1.Text) Then ...

[darkblOOd]

Originariamente inviato da GudFella
effettua un controllo sul valore della text
all'evento lostfocus

If Not IsNumeric(text1.Text) Then ...

ma così li fai scrivere, che controllo di input è?

[keeper76]

se digito dei simboli di punteggiatura li accetta e questo a me non va bene, io ho un textbox per l'inserimento di un numero di telefono senza punti, separatori e altro.

[tas]

Potresti fare così:

Private Sub Text1_KeyPress(KeyAscii As Integer)
   Select Case KeyAscii
      Case 48 To 57
         'codici per numeri
      Case 8
         'backspace
      Case Else   'caratteri non consentiti
         KeyAscii = 0
   End Select
End Sub

Aggiungendo altri blocchi Case puoi aggiungere altri caratteri consentiti.