Springen naar inhoud


Textbox opslaan


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

#1 VB6Dummy

VB6Dummy

    VBIB Godfather

  • Leden
  • PipPipPipPipPipPipPipPip
  • 5388 berichten
    Laatst bezocht 26 dec 2014 17:43

Geplaatst op 04 mei 2011 - 07:13

Zo los je dit op.
Je maakt je een command-button aan EN op je form plaats je de "SafeFileDialog"

De onderstaande code put je dan bij die commandbutton in.
Deze code laat eveneens toe een zelf gekozen pad en file-naam te gebruiken.


Dim pad As String
Dim filename As String
     If SaveFileDialog1.ShowDialog = DialogResult.OK Then
             pad = SaveFileDialog1.InitialDirectory
             filename = SaveFileDialog1.FileName
             FileOpen(1, pad & filename, OpenMode.Output)
             PrintLine(1, TextBox1.Text)
             PrintLine(1, TextBox2.Text)
             FileClose(1)
     end if
end sub


Let wel op. Als de textboxen niet gedeclareerd zijn over je ganse project, moet de command button en de bovenstaande code wel op de form gebruikt worden waar de op te slaan textboxen staan.

#2 VB6Dummy

VB6Dummy

    VBIB Godfather

  • Leden
  • PipPipPipPipPipPipPipPip
  • 5388 berichten
    Laatst bezocht 26 dec 2014 17:43

Geplaatst op 04 mei 2011 - 07:13

Ik heb een puzzel gemaakt met een stuk of 15 textboxen.
Nou wil ik de mogelijkheid maken om de inhoud van die textboxen op te slaan als een txt-bestand of zoiets.

Maar ook wil ik die gegevens weer uit de txt-file halen en in de textboxen zetten

Ik wil dan eigenlijk werken met de "SafeFileDialog"
wie kan en wil mij een handje op weg helpen

Gr. JieBie




0 gebruiker(s) lezen dit onderwerp

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

Inloggen


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)