訪問VBA中的組合框問題

我想設置一個組合框的值爲默認值，問題是數據源是從返回一個整數類型的查詢，我想我的默認值爲「*」，當我試試這個：訪問VBA中的組合框問題

Private Sub LabelWklstID_DblClick(Cancel As Integer) 
Me.WorklistIDSelector.Value = Mid(Me.WorklistIDSelector.DefaultValue, 2, 1) 
End Sub

它沒有工作越來越「值無效」的錯誤，但是當我嘗試一個int它的工作原理：

Me.WorklistIDSelector.Value = 1

我怎樣才能讓我的組合框接受「*」。任何幫助將理解

編輯：

行來源= SELECT tWorkList.WorkListID，tWorkList.ProjectID FROM tWorkList GROUP BY tWorkList.WorkListID，tWorkList.ProjectID HAVING（（（tWorkList.ProjectID）= [表格]！[fMain]！[ProjectID]））ORDER BY tWorkList.WorkListID;
綁定列= 1
列寬度= 2,54cm

2013-05-21 Oumaya

您應該向您的問題添加組合的RowSource，Bound列和ColumnWidths來澄清您的問題。順便說一下，您通常不需要VBA來定義控件的默認值。可以手動設置的控件屬性 –

我的目的不是定義默認值，而是設置將組合框的值設置爲默認值或簡單地將其設置爲「*」（它在事件中），RowSource是查詢（「SELECT tWorkList.WorkListID ....」WorkListID是一個int） – Oumaya

然後'myControl.Value = myControl.DefaultValue'應該做的伎倆！ –

選擇tworklistID從tworlklist等 UNION ID，其他字段選擇「*」作爲ID，0,0,0（虛設空白其他字段）

2013-07-23 15:24:24 basdwarf

回答