Quote:
Originariamente inviato da MarcoGG
Se il campo è numerico con precisone doppia allora devi fare in modo di evitare che l'utente possa scrivere "250 ,50".
VB6 passa i decimali con il punto.
250.50 non dovrebbe creare mai problemi.
Se inoltre nella INSERT fai riferimento diretto alla TextBox ( cosa che sarebbe sempre meglio evitare ) puoi risolvere, da così :
Codice:
strINSERT = "INSERT INTO nomeTabella (camponumero) " & _
"VALUES (" & Text1.Text & ")"
a così :
Codice:
strINSERT = "INSERT INTO nomeTabella (camponumero) " & _
"VALUES (" & Replace(Text1.Text, ",", ".") & ")"
|
Antonio sono d'accordo con te però io ho il problema che se l'importo lo scrivo con il punto per esempio 250.56 non mi considera proprio il punto cioè mi considera 25056 cosa che sul pc dove ho visual basic mi prende 250.56. E' questa la cosa strana infatti io alla textbox gli proibisco tutto tramite questa funzione:
Private Sub importo_KeyPress(KeyAscii As Integer)
'Controllo per non far inserire caratteri errati
Select Case KeyAscii
Case Is < 32
Case 44 To 46
Case 48 To 57
Case Else
KeyAscii = 0
End Select
End Sub
per escludere la virgola basta che al posto di 44 metto 45 però ho il problema che su altri pc il punto non lo considera e se metto la virgola lo prende come carattere errato.
Cmq cerco di fare altre prove e ti faccio sapere