Visual Basic 6 - solo numeri

30/10/09 9:42

In una combobox vorrei soltanto digitare numeri .
Uso questo codice :
Sub Combo1_KeyPress(Ascii as integer)
If KeyAscii <> 8 Then
If KeyAscii > 57 Or KeyAscii < 48 Then
KeyAscii = 0
End If
End If
End sub

Purtroppo questo codice si può raggirare con il mouse tramite il copia/incolla.
Pensavo allora di usare l’evento VALIDATE , che ne dite ?
Avete qualche esempio da sottopormi ?

aaa

30/10/09 11:28

delta

non ne sono sicuro... l'evento change può andarti bene???

aaa

30/10/09 11:59

mash_mash

Non so , prova a postarlo lo stesso ; io comunque dovrei avre risolto così :

Private Sub Combo1_Validate(Cancel As Boolean)
'proprietà iniziale della combo1 causesvalidation = true
If Not IsNumeric(Combo1.Text) Then
MsgBox "Hai inserito caratteri non validi , riscrivi": Cancel = True: Combo2.SetFocus
End If
End Sub

aaa

30/10/09 14:36

the_angel

Postato originariamente da mash_mash:

Non so , prova a postarlo lo stesso ; io comunque dovrei avre risolto così :

Private Sub Combo1_Validate(Cancel As Boolean)
'proprietà iniziale della combo1 causesvalidation = true
If Not IsNumeric(Combo1.Text) Then
MsgBox "Hai inserito caratteri non validi , riscrivi": Cancel = True: Combo2.SetFocus
End If
End Sub

Non è che ci sia molto da postare. Devi mettere il tue codice nell'evento change
del textbox....

aaa

30/10/09 15:03

mash_mash

Supponevo che da postare c'era probabilmente qualcosa di "nuovo" , altrimenti non l'avrei chiesto !

aaa

02/11/09 9:14

the_angel

Beh mi sembra logico.
Per questo ti ho risposto così. :k: