我正在使用视觉工作室社区版2019,制作一个Windows应用程序。使用MS access 2013作为我的数据库。我需要将用户定义的列添加到每个定义的表。此外,需要将这些列保存在数据库中以供进一步使用。我该怎么做呢?
我使用了ADD功能,但没有任何反应。
'数据库控件 - DbaseDataSet'表名 - Topic_Attn
'尝试过这个
将newcolumn变暗为字符串
newcolumn = inputbox(“列标题”)
DbaseDataSet.Tables( “Topic_Attn”)。Columns.Add(newcolumn)
DBaseDataSet.Tables( “Topic_Attn”)。AcceptChanges的()
请将附加的MS Access DB实际应用于此链接:
以下是您问题的主要代码:
Private Sub CmdAddanewcolumnMSAccessDB_Click()
DoCmd.Close acTable,“Emp”
DoCmd.RunSQL(“Alter table Emp Add Column”到Text ColName.Value&“Text”)
MsgBox“完成”
结束子
我希望这可以帮助你^ _ ^