我们专注攀枝花网站设计 攀枝花网站制作 攀枝花网站建设
成都网站建设公司服务热线:400-028-6601

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

vb.net数据库开始的简单介绍

VB.net 数据库

改成下面这样:

磐安网站建设公司成都创新互联,磐安网站设计制作,有大型网站制作公司丰富经验。已为磐安近1000家提供企业网站建设服务。企业网站搭建\外贸营销网站建设要多少钱,请找那个售后服务好的磐安做网站的公司定做!

Dim cmdtext As String = "Update 用户信息表 Set 密码='" txt密码new.Text "',用户='" txt用户名.Text "' Where ID=" Int(Val(UserID))

vb.net 怎么操作数据库

如果楼主熟悉VB6,可以直接在项目中添加ADODB的Com引用,这样你就可以像VB6那样操作数据库了!

另外

.NET

Framework中连接数据库要用到ADO.NET。如果要操作Access数据库,要用到System.Data.OleDb命名空间下的许多类。

比如按楼主所说,“我想在textbox1中显示表一中【一些数据】字段下的第一个内容”:

'首先导入命名空间

Imports

System.Data

Imports

System.Data.OleDb

'然后在某一个事件处理程序中写:

Dim

conn

As

New

OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data

Source=数据库.accdb;Jet

OLEDB:Database

Password=MyDbPassword")

Dim

command

As

New

OleDbCommand("Select

*

From

数据表",

conn)

conn.Open()

'打开数据库连接

Dim

reader

As

OleDbDataReader

=

command.ExecuteReader()

'执行SQL语句,返回OleDbDataReader

对象

Do

While

reader.Read()

'读取一条数据

textbox1.Text

+=

reader("一些数据")

VbCrLf

Loop

reader.Close()

'关闭OleDbDataReader

conn.Close()

'关闭连接

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

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

选择  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 数据库操作

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


标题名称:vb.net数据库开始的简单介绍
网站路径:http://mswzjz.cn/article/dooijej.html

其他资讯