Springen naar inhoud


- - - - -
VB6

Komma In Label



  • Log in a.u.b. om te beantwoorden
Er zijn 3 reacties in dit onderwerp

#1 Y@no

Y@no

    Starting Developer

  • Leden
  • 4 berichten
    Laatst bezocht 05 aug 2021 08:02

Geplaatst op 02 juli 2021 - 21:56

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

#2 Damic

Damic

    Master Developer

  • Leden
  • PipPipPipPipPip
  • 818 berichten
    Laatst bezocht 11 sep 2021 19:20
  • LocatieMechelen (BE)

Geplaatst op 02 juli 2021 - 23:08

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 :D

#3 Y@no

Y@no

    Starting Developer

  • Leden
  • 4 berichten
    Laatst bezocht 05 aug 2021 08:02

Geplaatst op 04 juli 2021 - 09:19

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

#4 Damic

Damic

    Master Developer

  • Leden
  • PipPipPipPipPip
  • 818 berichten
    Laatst bezocht 11 sep 2021 19:20
  • LocatieMechelen (BE)

Geplaatst op 04 juli 2021 - 20:43

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





Ook met taq VB6 voorzien

0 gebruiker(s) lezen dit onderwerp

0 lid(leden), 0 bezoeker(s), 0 anonieme gebruikers

Inloggen


[VB6] Untitled 1

Met dank aan J├╝rgen voor de jarenlange inzet van visualbasic.be (anno dec 2000)
Met dank aan Mike en Ronneke voor de jarenlange inzet van vbib.be (anno dec 2010)
Met dank aan PascalBianca voor de jarenlange inzet van vbib.be (anno dec 2016)