Hallo in die Runde,
ich möchte gerne eine Combobox bei fehlenden Einträgen mit dem neuen Wert ergänzen. Die Combobox bezieht Ihre Daten aus einer BindingSource die wiederum aus ein DataSet Ihre Daten bezieht. Die Prüfung ob der Wert schon vorhaden ist mache ich mit
Ist der eingegebene Wert nicht in der Liste der Combobox dann wird eine andere Form aufgerufen wo der Datensatz neu eingegeben werden kann. Jetzt habe ich allerdings zwei Probleme:
Da ich noch Anfänger bin, bin ich für jeden Tipp echt dankbar.
Viele Grüße
Torsten
ich möchte gerne eine Combobox bei fehlenden Einträgen mit dem neuen Wert ergänzen. Die Combobox bezieht Ihre Daten aus einer BindingSource die wiederum aus ein DataSet Ihre Daten bezieht. Die Prüfung ob der Wert schon vorhaden ist mache ich mit
Ist der eingegebene Wert nicht in der Liste der Combobox dann wird eine andere Form aufgerufen wo der Datensatz neu eingegeben werden kann. Jetzt habe ich allerdings zwei Probleme:
- Da ich das DataSet neu einlese springt mir das Formular immer zum 1. Datensatz zurück und nicht zum aktuellen angefangenen Datensatz zurück
- scheint wohl von dem neuen Datenssatz nichts mitzubekommen da er mir immer anzeigt das der Inhalt in der Liste nicht vorhanden ist
VB.NET-Quellcode
- Private Sub cbo_Händler_Leave(sender As Object, e As EventArgs) Handles cbo_Händler.Leave
- Dim neuerName As String
- neuerName = cbo_Händler.Text
- If cbo_Händler.Items.Contains(neuerName) Then
- Dim a As Integer = a + 1
- Else
- MessageBox.Show("Der Eintrag ist nicht vorhanden bitte neu anlegen", "Mitteilung")
- Using newform As New frm_Haendler
- newform.StartPosition = FormStartPosition.CenterParent
- newform.ShowDialog(Me)
- End Using
- If My.Computer.FileSystem.FileExists(xmlData) = True Then
- DataSet_Akten.Clear()
- DataSet_Akten.ReadXml(xmlData)
- End If
- bs_Händler.DataSource = DataSet_Akten.Tables("Haendler")
- bs_Händler.ResetBindings(False)
- cbo_Händler.Refresh()
- End If
- End Sub
- End Class
Da ich noch Anfänger bin, bin ich für jeden Tipp echt dankbar.
Viele Grüße
Torsten