请问大师们：在数据录入窗体，如何点击按钮在数据表中添加一个新字段？

cashiba

想做一个数据录入窗体，在录入数据的过程中，希望根据情况能随时在原数据表中增加新字段，以录入原数据表中字段不能涵盖的新内容。


比喻数据库为shuju.mdb，其中有个数据表notes(包括自动编号id、cola、colb、colc四个字段)


数据录入窗体名：luru

在luru窗体中做一个添加新字段按钮。点击该按钮，打开新窗体newcol以在原数据表中添加新的字段。

如何点击该按钮后，可以在notes中增加新字段cold、cole等等？

cashiba

请问如何实现呢？

cashiba

唉，没人感兴趣..............

song953897

直接将字段在表中设置好不就行了吗

cashiba

就是想学习用控件或vba语句来操作数据表啊，好像看到过asp可以这么做的，只是不知道在access中如何来实现.....

koutx

DoCmd.RunSQL "ALTER TABLE notes ADD COLUMN cold " & "数据类型"

cashiba

谢谢koutx 老师。再去研究一下

txmsuper

新建一个命令按钮  在按钮的属性中的单击事件编写代码
Private Sub cmdAdd_Click()
On Error Resume Next
    Dim ctl As Control
   
    For Each ctl In Me.Controls
        ctl.Value = Null
    Next
    Me.Recordset.AddNew
   
End Sub
其中第一行的cmdAdd为你按钮的名称  
不知道你是不是这个意思

txmsuper

抱歉我理解错了……上面的回复可以无视……