Vraag : Waarom stelt het bezit terug Listindex van een Combobox aan 0 in VBA?

Ik gebruik Toegang VBA.  Ik heb een unbound combobox in een sub-vorm die ik gebruik om een recordset in subform bij te werken.  Ik echt weet niet of dat veel heeft met het probleem te doen, maar dat is background.

Anyway, heb ik combobox met een SQL verklaring bevolkt die in twee punten in combobox resulteert.  Als ik het tweede punt in combobox selecteer (Listindex=1) het keert terug naar Listindex=0 terug.  Ik kan geen why.

What berekenen ben oneven ben dat Listindex in ctrlTechnologyCombo_AfterUpdate () enkel fijn is, maar ergens inbetween dat en ctrlTechnologyCombo_Change (), het reeks terug naar 0, die de waarde in mijn combobox.

Note verandert dat er normaal code in ctrlTechnologyCombo_AfterUpdate () zou zijn om het getoonde verslag bij te werken nadat combobox wordt geselecteerd, maar ik heb het uit in het proberen om te berekenen becommentari�ërd wat het gaan on.
is
" codeBody "
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
Public Sub ctrlTechnologyCombo_Initialize ()
Schemerige iCurrentProject als Geheel, strSQL als Koord

iCurrentProject = Me.Parent.Form.ID

strSQL = „UITGEZOCHTE ProjectID, TechID, FieldName VAN dbo_qryBetas WAAR ProjectID=“ & iCurrentProject
Me.ctrlTechnologyCombo.RowSource = strSQL
Me.ctrlTechnologyCombo.Requery

Sub van het eind

Privé SubctrlTechnologyCombo_AfterUpdate ()
Sub van het eind

Privé SubctrlTechnologyCombo_Change ()
Sub van het eind

Antwoord : Waarom stelt het bezit terug Listindex van een Combobox aan 0 in VBA?

Weet u wat de tekst en waardeeigenschappen van combo zijn wanneer u waar clausule gebruikt tegenover wanneer u niet
Andere oplossingen  
 
programming4us programming4us