[VB6] Elaborazione valori numerici in Variant

[jasson]

Salve a tutti, sono nuovo di questo forum e ho iniziato a muovere i primi passi con VB6.

Ho un problemino forse stupido ma non riesco a risolverlo

In pratica in una TextBox viene inserito un numero che poi viene confrontato ed elaborato, la variabile che contiene tale numero è dichiarata integer e tutto funziona bene , fino a quando nella TextBox non vengono inseriti dei caratteri.
Se vengono inseriti dei caratteri VB6 mi dà errore,
se dichiaro la variabile in altro modo come ad esempio Variant l'errore scompare, ma non riesco più a confrontarla con un numero.

Qualcuno mi può dare una mano?? Grazie.

[Boolean]

devi fare in modo che nel textbox non vengano inseriti altro che numeri...

lo puoi fare abbastanza semplicemente, utilizzando la routine di evento KeyPress

Private Sub Text1_KeyPress(KeyAscii As Integer)

If (KeyAscii < 48 Or KeyAscii > 75) And _
    KeyAscii <> 8 And KeyAscii <> 9 And KeyAscii <> 44 Then
    KeyAscii = 0
End If

End Sub

se non ti interessa poter inserire anche la virgola, togli dalla condizione "And KeyAscii <> 44"

Boolean

[alka]

Originariamente inviato da jasson
Salve a tutti, sono nuovo di questo forum e ho iniziato a muovere i primi passi con VB6.

Ciao e benvenuto nel forum di Programmazione.

Leggi il nostro Regolamento che contiene tutte le norme da seguire per usare correttamente e al meglio quest'area del forum.

In particolare, non dimenticare il linguaggio nel titolo della discussione (dai un'occhiata a quelle già esistenti per prendere spunto), fai una ricerca prima di postare e usa titoli il più possibile sintetici ma significativi.

Il titolo di questa discussione lo correggo io.

Per il momento è tutto, quindi...ciao e buon forum!

[jasson]

Mamma mia che velocità

Fantastico !!!



Ok Grazie, il problema è risolto,

Jasson