重庆分公司,新征程启航

为企业提供网站建设、域名注册、服务器等服务

关于vb.net临时数据库的信息

用vb.net 怎样建立一个mdb数据库及一张表

首先在项目的VB.NET界面,使用菜单【项目】--【添加引用】--【COM】

创新互联公司是一家专注于网站建设、做网站与策划设计,库伦网站建设哪家好?创新互联公司做网站,专注于网站建设十载,网设计领域的专业建站公司;建站业务涵盖:库伦等地区。库伦做网站价格咨询:13518219792

选择  Microsoft ADO Ext. 2.x for DDL and Security

然后单击【确定】,完成引用。

完整代码如下:

Imports ADOX

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

'创建空的access数据库文件--数据库文件.mdb,密码为123

Dim Mycat As Catalog = New Catalog()

Mycat.Create("Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Engine Type=5;Data Source= 数据库文件.mdb;Jet OLEDB:Database Password=123")

'以下代码创建一个名为“实验数据表”

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

关于vb.net上数据库的使用问题

这个就要用到dataview控件了

这个控件功能太强了一下子也说明不了,自己研究吧,不懂联系我

VB.NET 数据库操作

真的要学习 就自己去一条条的找结果 在csnd上很多很多的,你的编译出来如果是64 那在32位机器可能不能用 或者JET不支持,


本文名称:关于vb.net临时数据库的信息
文章分享:http://cqcxhl.cn/article/dosessj.html

其他资讯

在线咨询
服务热线
服务热线:028-86922220
TOP