此主题相关图片如下：


如图所示,窗体里有三个控件,连接服务器的数据控件是SqldataAdapter1,生成数据集Dataset2.xsd(name:mydata2),

连接表名是dtht_ms,SqldataAdapter1中的SQL语句是"select * from dtht_ms where (dtht_ml=?)"

在t条件中输入条件后按"查找",在Datagrid1中显示记录,请教button1里的代码该如何写?谢谢

难道没人知道吗????????????

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
SqlConnection1.Open()
Dim ds As DataSet = DataSet2
ds.clear()
SqlDataAdapter1.SelectCommand = New SqlCommand("select * from dtht_ms where dtht_ml='" & TextBox1.Text & "'", SqlConnection1)
SqlDataAdapter1.Fill(ds, "dtht_ms")
DataGrid1.DataSource = ds.Tables("dtht_ms")
Catch sql As Sqlclient.SqlException
MsgBox("sql information:" & sql.Message)
Catch ex As Exception
MsgBox("system information:" & ex.Message)
Finally
SqlConnection1.Close()
End Try
End Sub