vb怎么读取数据库的字段

Private Sub Command1_Click()

Dim a(), b(), c(), d(), e(), n As Integer, i As Integer

Adodc1ConnectionString = "Provider=MicrosoftJetOLEDB40;" & _

"Data Source=C:\db1mdb;Persist Security Info=False"

Adodc1CommandType = adCmdText

Adodc1RecordSource = "select from 表A"

Adodc1Refresh

n = Adodc1RecordsetRecordCount - 1

ReDim a(n), b(n), c(n), d(n), e(n)

For i = 0 To n

a(i) = Adodc1RecordsetFields(0)

b(i) = Adodc1RecordsetFields(1)

c(i) = Adodc1RecordsetFields(2)

d(i) = Adodc1RecordsetFields(3)

e(i) = Adodc1RecordsetFields(4)

Adodc1RecordsetMoveNext

Next

End Sub

SQL2000 的MDF和LDF你是不能动的，那个是数据存储文件。SQL2000首先要启动服务，然后需要通过网络连接来 *** 作。最常用的是ADO，DAO等下面是范例

须在工程=》引用里添加ado 25或者更高。

Dim Conn As ADODBConnection

Dim Rs As ADODBRecordset

Dim Fld As ADODBField

Dim SQL As String

Dim ConnString As String

Set Conn = New ADODBConnection

ConnString = "Provider=MicrosoftJetOLEDB40;Data Source="

DB,

这是数据库数据存放文件。每种软件都有它自己的存放格式，就是数据的排列方式。后缀名均为DB。

MDF是SQL数据库的格式，。2种不可转化。

只有在同个软件开发后，就会生成DF，不需要转换。

例如一个表INFO的字段有：user,password,question,answer

Dim cn As New ADODBConnection '定义数据库的连接

Dim rs As New ADODBRecordset

''''

这里连接数据库

''''

'查询语句

SQL="select from INFO where user='账号"

rsopen SQL

rsmovefirst

pw=rsFields(1)Value '''这就是密码

或者

pw=rsFields("password")Value '''这就是密码

1、打开代码窗口，添加引用：Imports SystemDataSqlClient。

2、输入以下代码：

“Public conn1  As SqlConnection = New SqlConnection _

("server=192168179; Initial Catalog= student; User ID= panqe;PWD=shentai768@")”，vb就已经成功连接sql数据库了。

3、代码详解：声明关键字Public（因为是全局变量，所以用Public 来声明）。

4、连接参数。

5、如果SQL 数据库就在本机，则用以下代码连接：

("server=; Integrated Security=False;Initial Catalog= student; User ID= panqe;PWD=shentai768@")。

6：如果代码太长，影响可读性，可以用空格加"_"后，回车换行。

首先你要从数据库提取出你要放在TREEVIEW里的字段，当然是分类提取，然后根据提取到的字段分别绑定，中间还存在自我判断等，所需要的过程相对比较复杂，需进行多次运算，飞人建议分开来写，没必要一次就全部绑定到treeview否则会加长运算时间，使用感觉会差一些，至于保存成指定格式，那就看你自己的了，因为保存成什么样的后缀文件可以自己规定，导出时你所使用的是什么控件根据控件不同，导出的方式也略有不同

提取treeview所需数据时需要分各个节点来提取，这样可以加快提取精准度，同事会让使用者感觉速度快

Set cnn = New ADODBConnection

Set rst = New ADODBRecordset

cnnOpen

"Provider=SQLOLEDB1;Integrated Security=SSPI;Persist Security

Info=False;Initial Catalog=zh;Data Source=ZV7ZLS1MZHPMNC5

rstCursorLocation = adUseClient

rstLockType = adLockReadOnly

rstCursorType = adOpenKeyset

rstOpen "SELECT from 表", cnn , 1, 1

以上就是关于vb怎么读取数据库的字段全部的内容，包括:vb怎么读取数据库的字段、请问下VB的ADO Data控件跟SQL数据库文件mdf怎样连接呢、如何在VB中将MDF数据库换成DB数据库等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！