将sql语句用到窗体按钮上?

不务实　发表于：2009-06-14 14:51:58 　

Private Sub Command49_Click()
ALTER TABLE 表4 ADD ID AUTOINCREMENT
End Sub

上面这个代码还要加什么?

点燃一支烟发表于：2009-06-14 15:06:01

DoCmd.RunSQL "ALTER TABLE 表4 ADD ID AUTOINCREMENT"

点燃一支烟发表于：2009-06-14 15:08:08

DoCmd.SetWarnings False
DoCmd.RunSQL "ALTER TABLE 表4 ADD ID AUTOINCREMENT"
DoCmd.SetWarnings True

'去除access的报警提示,请在前后加上DoCmd.SetWarnings False和DoCmd.SetWarnings True

不务实发表于：2009-06-14 17:45:41

太感谢你了

总记录：3篇页次：1/1 9 1 :

Access交流中心