Problem with reading txt file

[Equx]

Hi.
i have a problem when I read from a txt file.
I looks something like this:
Spa
1,216
1,081

And now when I put the data into strings, the values are:
Spa
1
216

Why does it stop at the " , " ?
I don't wan't it to stop at the ","

[dglienna]

Because , is a field-delimiter in VB6, not a decimal separator.

[Equx]

Ok, but I have now solved the problem, I changed , to .
But there is a new problem now, if the number is below 1 ex: 0.9
Then it only shows 9.
How do I solve this problem?

[TechGnome]

We're not mind readers... if you post the code you are using we may be able to help.

-tg

[DataMiser]

instead of using input to get the data use line input that will read the entire line and not break at the comma

[Pankaj1283]

Hi,


I don't know how you are reading text file.
But try this one.


<Code>

Option Explicit

Private Sub Form_Load()
Call ReadFormFile("C:\Test.txt")
End Sub


Rem Read data from file using Sequentila file handling
Public Function ReadFormFile(strFilePath As String) As Boolean
Dim tempString As String

Rem Open text file
Open strFilePath For Input As #1

Rem Read line by line
While EOF(1) = 0
Line Input #1, tempString
MsgBox tempString
Wend

Rem Close text file
Close #1
End Function

</Code>