紧急求教
在windows窗口中怎么显示数据库表的内容

[解决办法]
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim conn As New SqlClient.SqlConnection
conn.ConnectionString = "server=(local);uid=sa;database=ts "
conn.Open()

Dim dg As DataGrid = New DataGrid
With dg
.Left = 6
.Top = 6
.Width = 200
.Height = 400
End With
Me.Controls.Add(dg)

Dim da As SqlClient.SqlDataAdapter = New SqlClient.SqlDataAdapter( "SELECT * FROM b ", conn)
Dim ds As DataSet = New DataSet
da.Fill(ds)
dg.DataSource = ds.Tables(0)

End Sub