Leere combobox-Werte, wenn access Formular vba

Möchte ich leere die combobox jedes mal, wenn Formular geladen wird. Über den untenstehenden code

   Private Sub Form_Load()

   combo1.RowSource = ""

   End Sub

Aber Combobax nicht entleeren.

  • Eine combobox besteht aus zwei teilen: einem Textfeld und einer Liste. Wenn Sie sagen, die leere combobox, meinst du a) löschen der textbox b) aus der Liste löschen oder c) beides? Tut combo1 haben einen Steuerelementinhalt einstellen?
  • Meine combo ist nicht textbox.Ich möchte aus der Liste löschen. Es muss nicht Controlsource gesetzt. Aber Typ Datensatzherkunft ist Tabelle/Abfrage.
  • Haben Sie das herausgefunden?
InformationsquelleAutor vuyy1182 | 2014-02-24
  1. 4

    Deinem code ist die Einstellung der rowsource der combo-box nicht Wert. Die combo-box können deaktiviert werden, indem Sie den Wert direkt ein.

    Private Sub Form_Load()

combo1 = ""

End Sub
    • Kein Glück. Mein Kombinationsfeld Herkunftstyp=Tabelle/Abfrage,
    • Sind Sie versuchen, legen Sie die dropdown-Liste beim laden der form? Mein code funktioniert am besten auf ein ungebundenes Kombinationsfeld. Wenn Sie das Kombinationsfeld an ein Feld gebunden, dann brauchen wir erweiterte code.
    • Vielen Dank für die prompte Antwort . Meine combobox geladen jedes mal, wenn die Taste klicken, combo-Werten kommt von Tabellenspalten. Ich möchte leere combo-jedes mal, wenn Formular geladen wird.ich.e vor-Taste, klicken Sie auf die combo sollte leer sein.
    • Ich Stimme mit @HelloW, dass es für eine ungebundene combobox, einfach die rowsource auf "". Ich habe gerade getestet, und auch wenn es an ein Feld gebunden ist, das leeren der combobox rowsource-leeren der combobox. Überprüfen Sie ALLE Ihre code für Referenzen auf die Datensatzherkunft, um zu sehen, wenn einige andere code-Einstellung ist es.
    • Eine Ergänzung zu diesem:, Wenn Ihr combobox ist die Speicherung eines integer-oder long integer (wie ein Schlüssel aus einer verbundenen Tabelle), dann möchten Sie vielleicht, um die Combobox.Value = 0 statt "". Ansonsten logische Prüfungen wie If Combobox.Value > 0 falsch zu lösen, wie True.
    InformationsquelleAutor HelloW
  2. 0

    Empfehlen, Sie löschen mit den folgenden:

    Mir.comboBoxName.RowSource = ""

    Mir.comboBoxName = ""

    InformationsquelleAutor Mike Cannon
Schreibe einen Kommentar