09/05/18 19:12
Mars54
Salve sono nuovo del forum.
In una vecchia discussione di un forum ho trovato questi codici che servono per salvare i dati di un programma:
Private Sub Button7_Click(sender As System.Object, e As System.EventArgs) Handles Button7.Click
Dim SaveFileDialog2 As New SaveFileDialog
If SaveFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim fo As StreamWriter = New StreamWriter(SaveFileDialog1.FileName)
fo.WriteLine(TextBox15.Text)
fo.WriteLine(TextBox16.Text)
fo.WriteLine(TextBox17.Text)
fo.Close()
End If
End Sub
Private Sub Button9_Click(sender As System.Object, e As System.EventArgs) Handles Button9.Click
Dim openFileDialog1 As New OpenFileDialog()
If openFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim fr As StreamReader = New StreamReader(openFileDialog1.FileName)
TextBox15.Text = fr.ReadLine
TextBox16.Text = fr.ReadLine
TextBox17.Text = fr.ReadLine
fr.Close()
Text = My.Computer.FileSystem.ReadAllText(openFileDialog1.FileName)
End If
End Sub
Premesso che funziona alla grande , vorrei sapere se c'è un modo per poter salvare i dati all'interno del programma stesso senza le finestre di dialogo.
Premesso ancora che ci puo stare una finestra di dialogo per poter salvare un file , ma per richiamarlo vorrei che non si aprisse la finestra di dialogo ma che appaiono subito nel programma!
In una vecchia discussione di un forum ho trovato questi codici che servono per salvare i dati di un programma:
Private Sub Button7_Click(sender As System.Object, e As System.EventArgs) Handles Button7.Click
Dim SaveFileDialog2 As New SaveFileDialog
If SaveFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim fo As StreamWriter = New StreamWriter(SaveFileDialog1.FileName)
fo.WriteLine(TextBox15.Text)
fo.WriteLine(TextBox16.Text)
fo.WriteLine(TextBox17.Text)
fo.Close()
End If
End Sub
Private Sub Button9_Click(sender As System.Object, e As System.EventArgs) Handles Button9.Click
Dim openFileDialog1 As New OpenFileDialog()
If openFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim fr As StreamReader = New StreamReader(openFileDialog1.FileName)
TextBox15.Text = fr.ReadLine
TextBox16.Text = fr.ReadLine
TextBox17.Text = fr.ReadLine
fr.Close()
Text = My.Computer.FileSystem.ReadAllText(openFileDialog1.FileName)
End If
End Sub
Premesso che funziona alla grande , vorrei sapere se c'è un modo per poter salvare i dati all'interno del programma stesso senza le finestre di dialogo.
Premesso ancora che ci puo stare una finestra di dialogo per poter salvare un file , ma per richiamarlo vorrei che non si aprisse la finestra di dialogo ma che appaiono subito nel programma!
aaa