vb中使用表格控件浏览数据库中的数据

记住：在

data3.databasename

=

app.path

+

"\tushu1.mdb"

'这是设置data3控件数据库的路径

data3.recordsource

=

"denglu"

'这个是选择数据库中的表

后面不要忘记刷新；

data3.refresh

另外，你既然用了

text1.text

=

data3.recordset.fields("用户名")

text2.text

=

data3.recordset.fields("密码")

text3.text

=

data3.recordset.fields("密码")

那前面的三行是多余的了

text1.datasource

=

"data3"

'这是个文本框控件设置数据源

text2.datasource

=

"data3"

text3.datasource

=

"data3"

要么这样：

text1.datasource

=

"data3"

'这是个文本框控件设置数据源

text2.datasource

=

"data3"

text3.datasource

=

"data3"

text1.datafield

=

"用户名"

text2.datafield

=

"密码"

text3.datafield

=

"密码"

你这个问题我估计是你用的是老版vb6.0，而数据库版本是新版本2000或以上。

以下是解决你这个问题的有效方法：

.关于老版VB6.0不支持Access2000以上版本的解决办法

.方法1.在Access中的工具-->数据库实用工具-->转换数据库-->到早期的Access（97）数据库版本,然后在vb中调用此Access数据库。

.方法2.下载安装补丁VB6 SP5，然后在VB6.0中选Access2000。

.方法3.不要用Data1控件，改用ADO控件连接数据库(Access2000以上)。

.如果你的数据库是新创建的数据库，没有很多数据，建议你用方法2最好；如果是具有大量数据而又不想安装vb补丁就用方法1，将数据库的格式调成97版就可以啦。

               //先设置datagridview的visible设置成false

                public static string 连接字符串 = "Data Source=LocalHost实例名Initial Catalog=数据库名Integrated Security=True"

                SqlConnection sqlConnection = new SqlConnection(连接字符串)

                string cmdText = "SELECT 。。。。。。。"

                SqlCommand selectCommand = new SqlCommand(cmdText, sqlConnection)

                SqlDataAdapter sqlDataAdapter = new SqlDataAdapter(selectCommand)

                DataTable dt = new DataTable()

                sqlConnection.Open()

                sqlDataAdapter.Fill(dataTable)

                sqlConnection.Close()

                 dataGridView1.DataSource=dt

                 

                 dataGridView1.Visible = true

---