通过查询输入的MS Access子窗体文本框。我可以添加默认值吗?

时间:2018-10-17 19:06:45

标签: ms-access access-vba ms-access-2016

我正在尝试自动填写文本/复选框。我只想在按下按钮时执行此操作。当前,设计视图中的表单详细信息具有1行文本/复选框(图1),当在表单视图中运行查询时,它将在该列中创建19个项目(图2)。

我可以只输入amount.value =“ 99999”来填写第一行,但是其余的“框”都没有,所以我无法为其添加值... 仅当按下按钮时,我才能向其中添加默认值吗?

design view

form view

Private Sub Command23_Click()
On Error GoTo Err_Command23_Click

    Dim stDocName As String

    stDocName = "InsertParaTypes"

    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
    DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_Command23_Click:
    Exit Sub

Err_Command23_Click:
    MsgBox Err.Description
    Resume Exit_Command23_Click

0 个答案:

没有答案