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.
0
Textbox opslaan
Door
VB6Dummy
, 04 mei 2011 07:13
Er zijn 1 reacties in dit onderwerp
#1
Geplaatst op 04 mei 2011 - 07:13
#2
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
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