1、首先打开Visual Studio 2008代码窗口，添加引用。
创新互联公司专注为客户提供全方位的互联网综合服务，包含不限于网站建设、网站设计、东营网络推广、成都小程序开发、东营网络营销、东营企业策划、东营品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等，从售前售中售后，我们都将竭诚为您服务，您的肯定，是我们最大的嘉奖；创新互联公司为所有大学生创业者提供东营建站搭建服务，24小时服务热线：028-86922220，官方网址：www.cdcxhl.com
2、输入以下代码：Public conn1 As SqlConnection = New SqlConnection 。
3、声明关键字 Public；（因为是全局变量，所以用Public 来声明）。
4、如果SQL 数据库就在本机，则用以下代码连接。
5、如果代码太长，影响可读性，可以用空格加"_"后，回车换行即可。
dim
myselectquery
as
string
=
"select
*
from
表1
where
姓名='小强'"
dim
mycommand
as
new
sqlcommand
(myselectquery,
conn)
'建立一个command控件，conn是你的sqlconnection对象
conn.open()'打开数据连接
dim
myreader
as
sqldatareader'定义一个reader用来读数据
myreader
=
mycommand.executereader()'运行你的查询，结果到myreader
if
myreader.read()
then
'如果查到了数据
msgbox(myreader.getstring(0))
'显示第一个字段
end
if
SQLada.Fill(ds, "td0")
Label6.Text = ds.Tables(0).Rows(0).ToString.Trim()
你这两句写的有问题啊,Fill方法有重载的,可以指定ds数据集中的是以表名来索引,还是以数字来索引,你这个fill明明是填充到td0这个表里面,下面你用tables(0) 怎么取呢,要用 ds.Tables("td0").Rows(0).ToString.Trim()啊,这是c#的逻辑,vb应该是差不多的
动态生成语句查询sql数据库内所有表，通常用 语句组合链接串。
如果是已经明确的表，可以用 参数方式变更。
如果是针对不同的表，自己拼合sql语句吧。
VB.net数据库连接的语句，网上太多了。
