先上代码 不啰嗦
Private Sub Command0_Click()
Dim dbs As New ADODB.Recordset
Dim ssql As String
ssql = "CREATE TABLE 代码表(代码 COUNTER ,材料 string PRIMARY KEY );"
dbs.Open ssql, CurrentProject.Connection
End Sub
就是这样简单。
运行上述代码,生成一个叫做 代码表的表。
我们先在设计状态打开这个代码表看一下:代码中的COUNTER对应的就是自动编号这个数据类型,也可以使用IDENTITY来实现 … …
这只是一个导航篇,给出一个大略的格式还有自动编号、文本、主键数据类型的设置方法,其他数据类型可参考其他线上文档。
本实例生成的表
是不是很简单呢?不瞒你说这么简单的东西我学的时候也花了不少时间,尤其是那个自动编号access的帮助里面都没找到害得我在网上找了好长时间… …
本文提供了一个创建Access表的简单实例,通过代码生成名为'代码表'的表,介绍了如何设置自动编号(COUNTER或IDENTITY)、文本和主键数据类型。虽然操作简便,但作者提到初次接触时也花费了一些时间研究,特别是自动编号功能,由于官方帮助文档中未找到相关信息,只能在网络资源中寻求解答。
157

被折叠的 条评论
为什么被折叠?



