VB6.0,用adodc链接了Access数据库“人事.mdb”mdb,数据库里只有一个表“表1
VB6.0,用adodc链接了Access数据库“人事.mdb”mdb,数据库里只有一个表“表1”,表1有四列“姓名”“年龄”“工龄”“工资”。另外有两个文本框,怎么通过...
VB6.0,用adodc链接了Access数据库“人事.mdb”mdb,数据库里只有一个表“表1”,表1有四列“姓名”“年龄”“工龄”“工资”。另外有两个文本框,怎么通过text1给出的姓名查找相应的工资,并把工资值返回给text2
展开
展开全部
很简单的哟
Private Sub Command1_Click()
Adodc1.RecordSource = "Select * From 表1 Where 姓名='" & Text1.Text & "'"
Adodc1.Refresh
Text2.Text = Adodc1.Recordset.Fields("工资")
End Sub
Private Sub Command2_Click()
End
End Sub
Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\人事.mdb;Persist Security Info=False"
End Sub
更多追问追答
追问
谢谢你!明天到公司试试😊
有没有办法能够按条件查询所有符合条件的数据,并把各条数据的某一列分别返回给几个文本框,比如说查询所有工龄为5的人的工资
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询