access数据库，我这样创建表，总提示表不存在 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

If Connections("kcgl").GetTableNames.contains("收入") Then

' DataTables("收入").load

Else

Dim Builder As New ADOXBuilder("kcgl") '要指定数据源名称

Dim tbl As ADOXTable

Builder.Open()

tbl = Builder.NewTable("收入") '创建表

With tbl

.AddColumn("日期" , ADOXType.DateTime)

.AddColumn("单号" , ADOXType.String, 16)

.AddColumn("收入" , ADOXType.Double)

.AddColumn("账户序号" , ADOXType.String, 16)

.AddColumn("备注" , ADOXType.String, 255)

End With

Builder.AddTable(tbl, True, True)

Builder.Close()

End If

DataTables("收入").load

提示 DataTables("收入")不存在

[此贴子已经被作者于2024/4/23 20:43:59编辑过]

主题：access数据库，我这样创建表，总提示表不存在