你建立查詢，在欄位裡寫條件： =Forms![窗體名稱]![下拉列表控制元件名稱]建立你剛才那個名稱的窗體，在裡面拉一個子窗體，資料來源設定為剛才的查詢表，連線欄位屬性刪除連線欄位。在窗體上面再拖一個Combo(下拉列表控制元件名)，在屬性裡面先源後面那個按鈕，設定一個查詢，只讓他查表裡面一個欄位（這次是表），，讓他排序，右健選擇SQL，在Select後面加個Distinct表示下拉值來自資料表的一個欄位，並且不重複。關閉查詢設計器，就給他資料來源等於儲存了。最後再在Combo後面拖一個按鈕，右鍵選擇屬性，屬性裡找到事件，時間裡找到單擊，選擇事件過程，他就會自動彈出VBA視窗，游標到按鈕單擊事件中間，在中間寫程式碼:Me.Refresh這樣就可以直接透過點窗體上的按鈕和下拉列表去查詢資料表。你上面的分明就是直接輸入引數： =[請輸入相應職位（....）] 這個是VbInput視窗原型，不帶什麼下拉自定義什麼的。只有按我那方法，或者你一定要彈個視窗去選擇，那就是給自己出難題了，建立一個象上面一樣的窗體，在裡面拖個Combo，設定好值，一個窗提一個窗體去傳值