Ett användargränssnitt ( UI ) med en ComboBox och textrutekontroll kan göra din ansökan mer dynamisk och mer användarvänlig . En ComboBox är en kombination av en textruta och en listruta . Användaren kan skriva in information via textrutan och objekt visas genom en drop -down listan . En textruta används för att samla in information från användaren eller fylla den med information från andra kontroller såsom det markerade objektet på en ComboBox . Instruktioner
1
Hämta Microsoft Northwind 2007-databas ( se " Resurser " ) . Starta Microsoft Access och öppna Northwind -databasen .
2
Klicka på " Skapa " -menyn och klicka på " Form Design . " Klicka " ComboBox " från " Kontroller " fönstret och dra ComboBox genom att klicka i formuläret och dra musen medan du håller ned musknappen . Sätt i ett " TextBox " kontroll med samma process . Sätt i ett " Button " enligt samma process . Sätt i ett andra " Button ".
3
Högerklicka på " knappen " och klicka på " Egenskaper . " I "Event " fliken välj " On Click " och välj " [Event Procedure ] " och klicka sedan på de tre punkterna för att öppna Microsoft Visual Basic fönster .
4
Skriv följande kod inuti knappen förfarande befolka ComboBox kontroll :
Combo0.AddItem ( " Combo punkt 1 " ) katalog
Combo0.AddItem ( " Combo Punkt 2 " ) katalog
Combo0.AddItem ( " Combo Produktfamilj 3 " ) katalog
Combo0.AddItem ( " Combo punkt 4 " ) katalog
Combo0.AddItem ( " Combo punkt 5 " )
5
Växla tillbaka till Microsoft tillgång Fönster och högerklicka på den andra knappen och klicka sedan på " Egenskaper . " I "Event " fliken välj " On Click " och välj " [Event Procedure ] . " Klicka på ellipsknappen att öppna Microsoft Visual Basic fönster .
6
Skriv in följande kodrad att befolka textrutekontroll med objektet som valts av användaren i ComboBox kontroll .
Combo0.SetFocus
dataSelected = Combo0.Text
Text0.SetFocus
Text0.Text = dataSelected
7
Växla tillbaka till Microsoft Access fönster och klicka på " Visa " -ikonen . Klicka " Command0 " att befolka ComboBox kontroll . Klicka på ComboBox kontroll och markerar ett objekt . Klicka " Command1 " att befolka textrutan med den valda posten .
