85问答库 > vb 在文本框中输入数值，点击查询，在下面几个文本框中查询出数据库中该信息。

vb 在文本框中输入数值，点击查询，在下面几个文本框中查询出数据库中该信息。

2024-11-19 20:41:46

推荐回答（2个）

回答1：

Private Sub Command1_Click()
With Adodc1
.RecordSource = "select * from [你的表名] where [学号]='" & Text1.Text & "'"
.Refresh
Text2.Text = .Recordset("[学号]")
Text3.Text = IIf(IsNull(.Recordset(["姓名"])), "没有姓名", .Recordset(["姓名"]))
Text4.Text = IIf(IsNull(.Recordset(["籍贯"])), "没留籍贯", .Recordset(["籍贯"]))
End With
End Sub

回答2：

用ADO控件，你不是说了嘛，绑定数据源