[vb6] numeri con la virgola o con i punto

[fux_vr]

io leggo un file che ha dei numeri che son prezzi con il punto es: 15,50 poi li metto in una casella di testo che è impostata come valore e mi vien fuori 1550,00 come posso fare per sistemare questo problema?? cioa grazie 1000

[Fenomeno85]

si usa la virgola

~§~ Sempre E Solo Lei ~§~

[fux_vr]

in che senso si usa la virgola?? purtroppo il file che devo importare è gia fatto e non da me . e ha il punto quando lo importo non me lo considera.

[Fenomeno85]

in che senso si usa la virgola?? purtroppo il file che devo importare è gia fatto e non da me . e ha il punto quando lo importo non me lo considera.

ti tocca fare un parser della stringa che hai letto e se becchi un punto lo cambi con la ,

~§~ Sempre E Solo Lei ~§~

[fux_vr]

ho provato a cercare in internet e nelle guide ma il comando parser non lo trovo com è strutturato?? grazie scusa per le 1000 domande

[Fenomeno85]

oppure molto + semplicemente fai così:

txtDopo.Text = Replace(txtPrima.Text, ".", ",")

~§~ Sempre E Solo Lei ~§~

[Fenomeno85]

ho provato a cercare in internet e nelle guide ma il comando parser non lo trovo com è strutturato?? grazie scusa per le 1000 domande

parser non è un comando è una operazione

~§~ Sempre E Solo Lei ~§~

[fux_vr]

si ma se sostituisco tutte le . in , ormai sono importate e i valori non sono + giusti perche nel mio file x esempio c'e' 15.30 ma quando lo acquisisto mi da 1530,00 non mi vede il .

[Fenomeno85]

dimmi come leggi

~§~ Sempre E Solo Lei ~§~

[fux_vr]

spiego meglio... ho un file txt con i dati in questo formato 15.30 (con il punto) per separare i decimali quando lo leggo e lo inserisco in un casella di testo mi da questo risultato 1530,00 sembra che quando lo leggo non mi vede il punto.

[Fenomeno85]

spiego meglio... ho un file txt con i dati in questo formato 15.30 (con il punto) per separare i decimali quando lo leggo e lo inserisco in un casella di testo mi da questo risultato 1530,00 sembra che quando lo leggo non mi vede il punto.

posta il codice

~§~ Sempre E Solo Lei ~§~

[fux_vr]

Dim riga As String
Open "L:\CNW\REMOTE\EXP22.VDT" For Input As #1
For i = 0 To 1
Input #1, riga
Next i
'inserisce record
Do
Me![ident] = Mid$(riga, 1, 4)
Me![stat] = Mid$(riga, 5, 1)
Me![code] = Mid$(riga, 9, 5)
Me![name] = Mid$(riga, 15, 20)
Me![descript] = Mid$(riga, 36, 40)
Me![price] = Mid$(riga, 144, 10) ' è questo il campo che viene copiato senza il punto

'leggi la riga successiva
Input #1, riga
'nuovo record
DoCmd.GoToRecord , , acNewRec
Loop Until EOF(1)

[Fenomeno85]

al posto di Mid$ metti semplicemente Mid, poi ho provato e mi legge correttamente :mbe: di che tipo hai l'attributo della relazione?

~§~ Sempre E Solo Lei ~§~

[fux_vr]

si inafatti mi legge anche a me . il mio proble quando è: i numeri non mi vede la virgola.
esempio
tracciato mio file
15.30 i decimali sono divisi con il punto

leggo il dato lo metto nella casella di testo e mi risulta questo

1530,00 qui i decimali me li divide con la virgola

helppp