示例:
Imports System.Data
Imports System.Data.SqlClient
......
Dim strConn As String
Dim myConn As SqlConnection
Dim strSql As String
Dim myda As SqlDataAdapter
Dim myds As New DataSet()
strConn = "server=myserver;database=mydb;uid=sa;pwd=;"
myConn = New SqlConnection(strConn)
myConn.Open()
strSql = "select * from table"
myda = New SqlDataAdapter(strSql, myConn)
myda.Fill(myds, "mytable")
DataGrid1.DataSource = myds
DataGrid1.DataBind()