我的问题出在那里？急！

Question

试试这样：Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim cnn As New OleDb.OleDbConnection()
        Dim cnstr As String = "Provider = SQLOLEDB.1;Password=mvb1234;Persist Security Info=True;User ID=sa;Initial Catalog=tfmsdb;Data Source=mvb"
        Dim dc As OleDb.OleDbDataAdapter
        Dim ds As New DataSet()
        Dim dr As DataRow
        Dim mytable As DataTable
        cnn.ConnectionString = cnstr
        cnn.Open()
        dc = New OleDb.OleDbDataAdapter("select top 20 * from person", cnstr)
        dc.Fill(ds, "person")
        mytable = ds.Tables("person")
        DataGrid1.DataSource = ds.Tables("person")
        DataGrid1.DataBind()
        DataGrid1.DataMember = mytable.TableName
        mytable.Clear()
    End Sub

Answer 1

加上
DataGrid1.DataBind
去掉
mytable.Clear()

Answer 2

加上
DataGrid1.DataBind()
去掉
mytable.Clear()

Answer 3

加上
DataGrid1.DataBind()
去掉
mytable.Clear()

Answer 4

dc = New OleDb.OleDbDataAdapter("select top 20 * from person", cnstr)
        dc.Fill(ds, "person")
        dim dv as new dataview(ds.tables("person"))
        DataGrid1.DataSource = dv
        datagrid1.databind()
        DataGrid1.Visible = True