首先在项目的VB.NET界面,使用菜单【项目】--【添加引用】--【COM】
然后单击【确定】,完成引用.
完整代码如下：
Imports?ADOX
Public?Class?Form1
Private?Sub?Button1_Click(ByVal?sender?As?System.Object,?ByVal?e?As?System.EventArgs)?Handles?Button1.Click
Dim?Mycat?As?Catalog?=?New?Catalog()
'以下代码创建一个名为"实验数据表"
Dim?MyTable?As?ADOX.Table?=?New?ADOX.Table??'定义新表
MyTable.Name?=?"实验数据表"?'表命名
'给表"实验数据表"?创建一个字符串字段,字段名"姓名"
MyTable.Columns.Append("姓名",?,?ADOX.DataTypeEnum.adWChar)
'给表"实验数据表"?创建一个整数字段,字段名"学号"
MyTable.Columns.Append("学号",?ADOX.DataTypeEnum.adInteger)?'追加一个数字型字段
'给字段"学号"创建一个主键"PimaryKey_Field"??
MyTable.Keys.Append("学号",?ADOX.KeyTypeEnum.adKeyPrimary,?"学号")
Mycat.Tables.Append(MyTable)?'把所有的新字段追加到表
MyTable?=?Nothing
Mycat?=?Nothing
End?Sub
End?Class
你应该在调试的时候在你的把一条带入了参数值的insert语句弄来看看,就能很快看出问题在哪里.另外[date]字段（这个地方最好用个中括号扩起来,敏感字符串哟！
如果实在不好弄写各存储过程吧.在Acess里面写一个添加查询吧.用
没有写完吧
Try
sqlcom.ExecuteNonQuery()
Catch?ae?As?SqlException
msgbox("fail")
End?Try
以上就是土嘎嘎小编为大家整理的vb.net添加表相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦！！