Er zijn 3 reacties in dit onderwerp

[Y@no]

Hallo,

Ik heb een probleem bij het optellen van getallen uit 2 labels ( een voor huidige saldo en andere is vorige saldo)

code voor wegschrijven van bestand

Private Sub Command2_Click()
Dim filenum As String
filenum = FreeFile
Open "C:\DanceTime\Regfiles\Kaarten\" & (Form1.Text3.Text) & ".txt" For Output As #filenum
Print #filenum, (Label9.Caption) + (Label2.Caption)
Close #filenum

Deze code schrijft correct de opgetelde sommen MET KOMMA ! in een textbestandje

Bij het inlezen gaat het mis en rond hij het getal af , dus zonder komma

code voor inlezen van bestand


Private Sub Form_Load()
Dim temp As String
Open "C:\DanceTime\Regfiles\Kaarten\" & (Form1.Text3.Text) & ".txt" For Input As #1
Input #1, temp
Label9.Caption = temp 'Vorig saldo
Close #1

Wat gaat er hier mis ? heb niet zo veel ervaring in programmeren

Bedankt

[Damic]

1. Filenum ook voor het inlezen gebruiken
2. gebruik line input, nu lees je wegeteld 1 karakter in

Ik voel een 3 aankomen met hoe lees ik tot het einde van het bestand: https://bytes.com/to...-vb6-line-input

En vermits je beginner bent , raad ik je aan om VB6 te laten voor wat het is en Visual Stuido Community te downloaden en VB.net of beter C# te leren

[Y@no]

Bedankt voor uw snelle reactie. Helaas kom ik er niet aan uit

[Damic]

Bekijk je code eens waar je leest (input) en kijk dan mijn 2. daar staat Line Input, zoek daar eens op in een zoekmachine.