Fråga : Why den Listindex egenskapen av en Combobox nollställer till 0 i VBA?

Förmiddag I using tar fram VBA.  Jag har en obunden combobox i enbilda den I-förmiddag genom att använda för att uppdatera en recordset i subformen.  Jag vet faktiskt inte, om det har mycket som ska göras med problemet, men det är background.
Anyway, mig har befolkat comboboxen med ett det SQL-meddelande objekt för resultat itu i comboboxen.  Om jag väljer understödjaobjektet i comboboxen (Listindex=1) den återvänder tillbaka till Listindex=0.  Jag kan inte figurera ut why.

What är udda är att Listindexen är precis fint i ctrlTechnologyCombo_AfterUpdate (), men någonstans inbetween det, och ctrlTechnologyCombo_Change (), den får fastställd baksida till 0, som ändrar värdera i min combobox.

Note att det skulle normalt finns kodifierar i ctrlTechnologyCombo_AfterUpdate () för att uppdatera det visade rekordet, efter comboboxen har varit utvald, men jag har kommenterat den ut i pröva för att figurera ut vad är gående on. > för

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:

" codeBody " suben för class= för Public " ctrlTechnologyCombo_Initialize () Dunkel iCurrentProject som heltalet, strSQL som stränger iCurrentProject = Me.Parent.Form.ID strSQL = ”VALDA ProjectID, TechID, FieldName FRÅN dbo_qryBetas VAR ProjectID=” & iCurrentProject Me.ctrlTechnologyCombo.RowSource = strSQL Me.ctrlTechnologyCombo.Requery Avsluta suben Privat underctrlTechnologyCombo_AfterUpdate () Avsluta suben Privat underctrlTechnologyCombo_Change () Avsluta suben " klar "

Svar : Why den Listindex egenskapen av en Combobox nollställer till 0 i VBA?

Du vet vad texten och värderar rekvisita av det combo är när du använder var satsen kontra, när du inte gör