Fråga : Hur jag laddar bildar using samma kodifierar som ”den After_Update” händelsen från macro searchforrecords?

Första tid på sakkunnig-utbyter och att kämpa för att få av det slipat med vba.

I har en bilda med den rekord- källan som pekar till en query.  Queryen är den kontrolleraSource
for texten boxas också liksom efternamn, förnamnet, titeln, e-post, Etc. där är en subform nedanför the
text boxas, som är specifik till varje anställd,… som bilda anknytas till subform på arbeten för strEmail.

All väl, bara användaren skulle behov att klicka till och med rekord eller att söka för deras känt, så I
added ett obundet combo boxas, som listar alla e-post.  Användare använder nu combo boxas, fyndtheir
name, och bilda/subformen visar deras information. Detta är fulländat med en macro handling för using
SearchForRecord och var villkora av:
= " [strEmail] = ”&” ””& [avskärma]. [ActiveControl] &”” ”
in, efter uppdateringegenskapen av den combo box.
Combo har boxats, planläggs för att finna de kända användarena, när bilda öppnas.  Problemet är, usercan ser deras e-post i det combo boxas, men måste att klicka på det för att avfyra, efter uppdateringhändelseand
then bilda/subformen har visat deras använda konverterade makro för information.

I till VBA och som kodifierar i den After_Update händelsen (i stället för makro):
DoCmd.SearchForRecord för suben Combo27_AfterUpdate för
privat (), "", acFirst,” [strEmail] = ”&” ””& Screen.ActiveControl &”” ”
avslutar Sub

Try, som jag kan genom att använda Form_Load som kallar After_Updaten, Etc. jag kan inte få bilda för att öppna
with bilda- och subformvisninganvändarens information.  Den ska endast arbete, när combobox är van vid väljer deras känt (och den After_Update händelsen avfyrar därefter).

Can du hjälper mig?
" klar "

Svar : Hur jag laddar bildar using samma kodifierar som ”den After_Update” händelsen från macro searchforrecords?

Ah… låter försök detta:

Privata underForm_Load ()
   Me.Combo27.SetFocus-'*** tillfogar denna
   Combo27_AfterUpdate
Avsluta suben
Andra lösningar  
 
programming4us programming4us