End of file
Hei.Jeg har et problem, skal skrive inn noen tall til en fil.
Men når jeg skal hente tallene ut igjen får jeg end of file.
Jeg skjønner at feilen kommer fordi tallene på blir delt med , (komma). Og at jeg har skriver de inn med komma.
Så det jeg lurer på er hvordan jeg skal få skrevet til fila med . (punktum) istedet. Altså tallene slik feks 12.4
og ikke 12,4
I filen ligger tallene slik
0.45
0.8
2.2
1.5
1
0.04
10
Og når jeg lagrer tallene til fila blir tallene slik
0,45
0,8
2,2
1,5
1
0,04
10
Hvordan skal jeg lagre slik at tallene blir lagret med punktum. (.) og ikke (,)
Dette er koden som jeg bruker:
Private Sub knappLagre_Click()
Open "c:\verdier.fag" For Output As #1
Print #1, txtfugveggfakt.Text
Print #1, txtfuggulvfakt.Text
Print #1, txtlimfakt.Text
Print #1, txtmembranGfakt.Text
Print #1, txtmembranVfakt.Text
Print #1, txtPrimerfakt.Text
Print #1, txtSiliconfakt.Text
Close #1
End Sub