Question

我没有太多的Access体验。我是一家数据库管理公司的实习生，我的老板给了我一个测试项目。他希望我创建一个带有提交按钮的注册表单，以便将一些数据输入到表格中。我创建了表单，但是如何创建一个将数据输入表格的提交按钮？

Answer 1

如果您使用的是直接的Microsoft Access - 您可以将表单放在桌面上（我知道，对于那些知情人士来说，这不是一个非常好的主意 - 只是保持简单），并且当您在表单中输入信息时，它将其输入到记录的每个相应列中 - 当您到达记录的末尾时，不需要提交操作 - 下一个带有空白列的新记录将自动提供给您填写。

现在，如果你真的需要一个像在互联网上那样工作的表格 - 你必须创建一个未绑定的表格 - 然后创建一个带有VBA代码的“提交”按钮，该按钮带有你所拥有的文本框表单并将它们插入到数据库的表中，在提交后清除字段以允许输入下一条记录。您甚至可以写一个“取消”按钮，清除所有字段，如果您愿意，可以重新开始。

我很抱歉，如果我非常一般 - 但你没有给我们很多东西继续。

Answer 2

正如其他人所说，这里的方式是一种不受限制的形式。这是我在连接到JET数据库时使用的通用代码模板。注意DAO优于ADO，因为DAO在与JET数据源交谈时速度更快

Dim db As DAO.Database
Dim rst As DAO.Recordset

Set db = DBEngine(0).OpenDatabase(strLinked_db_path)
Set rst = db.OpenRecordset("tblHours_lost", dbOpenTable)

With rst
     .Addnew
        !Hours_Lost = Me.txtHours_lost
        !Type = Me.cboLoss_type
        !do_not_deduct = Me.chkDo_not_deduct
        !Notes = Me.txtNotes
        !Start_time = Me.txtStart_time    
    .Update
End With

rst.Close
db.Close
Set rst = Nothing
Set db = Nothing

您需要做的就是打开记录集并将数据放入其中，一旦掌握了它就很容易做到

Answer 3

您不需要保存字符串日期。

Microsoft访问旨在从表单中添加属性表，然后您可以添加一个字段，而不必创建一个Submit按钮，状态应该保存，所有字符串都将完成由系统自动完成。

Answer 4

你需要创建连接字符串，它将提供到目前为止的路径然后创建一个命令对象，然后将con对象作为参数提供给命令对象以及命令并执行它

在Microsoft Access中的注册表单上创建提交按钮

4 个答案: