Hallo ich wollte gerne über die combobox wenn ich im event Form1_Closing also die form1 beende das der inhalt der combobox in einem ordner gespeichert wird & beim öffnen wieder angezeigt wird wie funktioniert das ganze??
Inhalt einer ComboBox beim beenden der form im ordner speichern beim öffnen wieder anzeigen lassen
- VB.NET
Sie verwenden einen veralteten Browser (%browser%) mit Sicherheitsschwachstellen und können nicht alle Funktionen dieser Webseite nutzen.
Hier erfahren Sie, wie einfach Sie Ihren Browser aktualisieren können.
Hier erfahren Sie, wie einfach Sie Ihren Browser aktualisieren können.
Es gibt 21 Antworten in diesem Thema. Der letzte Beitrag () ist von kevios12.
-
-
-
-
-
an ComboBox anpassen: vbarchiv.net/faq/faq_listbox_save_net.html
-
-
-
SystemUnknow schrieb:
an ComboBox anpassen: vbarchiv.net/faq/faq_listbox_save_net.html
ich hab den code genommen bei form1 hab ich eintrag 1 usw rausgenommen form1 load event -
-
-
-
-
-
-
-
-
-
mein code
VB.NET-Quellcode
- Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
- ' ListBox speichern
- Dim sFile As String
- sFile = Application.StartupPath & "\Liste.dat"
- Combobox_Save(ComboBox1, sFile)
- End Sub
- Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
- Dim sFile As String
- sFile = Application.StartupPath & "\Liste.dat"
- combobx_Read(ComboBox1, sFile)
- End Sub
- Public Sub Combobox_Save(ByVal ListBox As ComboBox, _
- ByVal sFile As String)
- ' Inhalt einer ListBox speichern
- Dim oStream As IO.StreamWriter
- Dim i As Short
- oStream = New IO.StreamWriter(sFile)
- For i = 0 To ComboBox1.Items.Count - 1
- oStream.WriteLine(ComboBox1.Items(i))
- Next
- oStream.Close()
- End Sub
- Public Sub combobx_Read(ByVal ListBox As ComboBox, _
- ByVal sFile As String)
- ' Inhalt einer ListBox speichern
- Dim oStream As IO.StreamReader
- Dim sLine As String
- ' Existsiert die Datei?
- Dim oFile As New IO.FileInfo(sFile)
- If oFile.Exists() = True Then
- oStream = New IO.StreamReader(sFile)
- ' Datei zeilenweise auslesen
- Do
- sLine = oStream.ReadLine()
- If IsNothing(sLine) Then Exit Do
- ComboBox1.Items.Add(sLine)
- Loop
- oStream.Close()
- End If
- End Sub
was daran falsch ??? -
-
-
Ähnliche Themen
-
Andi2572 - - Sonstige Problemstellungen
-
VB_Neuling - - Sonstige Problemstellungen
-
1 Benutzer hat hier geschrieben
- Gast (22)