[求助]利用自定義快捷鍵來實現快速輸入

lzx-shmily

是啊,假如每個窗體都有一個叫cbo的組合框,我想讓f4的功能只在每個窗體的cbo組合框上發生,能實現嗎?

lzx-shmily

太好了,我終於知道怎麼作了,只要把每個窗體的組合框的名稱設相同,比如都設為text0,然後就在函數中先讓text0獲得焦點就可以了:

Public Function a()
Screen.ActiveForm.Text0.SetFocus
DoCmd.DoMenuItem acFormBar,acRecordsMenu,acSaveRecord,,acMenuVer70 '執行requery之前先保存,否則會出錯
Screen.ActiveControl.Requery
Screen.ActiveControl.Dropdown
End Function

sgrshh29

恭喜你终于会了这个问题.

[此贴子已经被作者于2006-3-1 15:49:37编辑过]