我有一個多VBA形式,第一種形式從組合框需要用戶名和一個全局變量保存它,代碼如下: Option Compare Database
Public emplID_global
Private Sub OKLogin_Click()
If Not IsNull(Me.Combo_emplID) Then
emplID_global = Me.Combo_emplID.Column
我有一個組合框從查詢中獲取它的列表項。但除了這些項目之外,我還需要一個靜態選項,它將在所有情況下出現。 我試圖用簡單的方式這樣做: Private Sub Form_Open(Cancel As Integer)
Set rst = CurrentDb.OpenRecordset("SELECT ESDNodes.Description, ESDNodes.Sort FROM ESDNo