我正在嘗試在我的表單上設定一些專案的默認值,這樣我就不必在將專案掃描到表格時不斷更新它們。我的表單中有 3 個組合框,另外兩個作業正常(在記錄輸入后保持相同的值),但“設備”的 cbx 一直給我這個錯誤。我嘗試通過從“型別”到“設備型別”再到“設備”來更新欄位名稱,但這并沒有修復它。我將嘗試在下面提供良好的背景資訊,但如果您需要更多資訊,請告訴我。謝謝!--忘了說設備型別表有一個欄位:“EQType”,設定為主鍵。
VBA 在組合框中設定默認值
Private Sub Serial_Number_AfterUpdate()
[Equipment].DefaultValue = [Equipment]
[ToTech].DefaultValue = [ToTech]
[FromTech].DefaultValue = [FromTech]
End Sub
我正在更新的表的欄位名稱:
- 序列號(文本框)
- 控制來源:序列號
- 設備(組合框)
- 控制來源:設備
- 行來源:SELECT EQType FROM EquipmentTypes;
- 來自技術(組合框)
- 行來源:從名冊中選擇名冊.TechID;
- 到技術(組合框)
- 行來源:從名冊中選擇名冊.TechID;
- 添加日期(文本框)--默認值設定為“=Date()”
表格的相關資料:
拆分表格,命名為“Transfers”,記錄源 = Transfers 表
uj5u.com熱心網友回復:
DefaultValue是文本,因此您可能會錯過參考該值:
Private Sub Serial_Number_AfterUpdate()
Me![Equipment].DefaultValue = "'" & Me![Equipment].Value & "'"
Me![ToTech].DefaultValue = Me![ToTech].Value
Me![FromTech].DefaultValue = Me![FromTech].Value
End Sub
轉載請註明出處,本文鏈接:https://www.uj5u.com/qiye/485926.html
