Vb.net 试图对我的数据使用grid view，但它输出了一个错误

下面是我用来绑定网格的代码，有人能告诉我我在这段代码中做错了什么吗

    Dim con As New SqlClient.SqlConnection
    Dim ds As New DataSet
    Dim adapter As SqlDataAdapter
    Dim sql As String
    con.ConnectionString = "Data Source=SHAHRUKH-PC\SQLEXPRESS;Initial Catalog=vb;User ID=sa;Password=sa@1234"
    con.Open()
    sql = "Data Source=SHAHRUKH-PC\SQLEXPRESS;Initial Catalog=vb;User ID=****;Password=*****"
    cmd.CommandText = "select * From demo_vb  Where ID = '" & txtbox4.Text & "'"
    adapter = New SqlClient.SqlDataAdapter
    adapter.Fill(ds)
    GridView1.ItemsSource = New DataView()
    GridView1.DisplayMemberPath = "ID"
    con.Close()

我得到这个错误：

在调用“填充”之前，SelectCommand属性尚未初始化

请尝试以下代码：

    SqlCommand cmd;
    SqlConnection con = new SqlConnection("Data Source=SUNTECH-PC\\SQLEXPRESS;Initial Catalog=iSense;Integrated Security=True;");
    con.Open();
    cmd = new SqlCommand("Select Picture from Images",con);
    SqlDataAdapter da = new SqlDataAdapter(cmd);
    DataSet ds = new DataSet();
    da.Fill(ds);
    GridView1.DataSource = ds;

    GridView1.DataBind();
    con.Close();

---

我想这会有帮助的

        Dim con As New SqlClient.SqlConnection("Data Source=SHAHRUKH-PC\SQLEXPRESS;Initial Catalog=vb;User ID=sa;Password=sa@1234")
        Dim ds As New DataSet
        Dim sql As New SqlCommand("select * From demo_vb  Where ID = '" & txtbox4.Text & "'",con)
        Dim adapter As New SqlDataAdapter(sql)
        con.Open()
        adapter.Fill(ds)
        GridView1.datasource = ds.Tables(0)
        GridView1.databind()
        con.Close()

---

您可以发布错误详细信息吗？在调用“Fill”之前，处理SelectCommand属性的错误无效异常尚未初始化。这是一个错误，您缺少此错误：adapter.SelectCommand=cmd。因此，在adapter.Fillds.after added adapter.SelectCommand=cmd之前添加此错误，现在仍然没有解决另一个错误Fill:SelectCommand.Connection属性尚未初始化。请给我一个解决方案