VB程序员博客
VB程序开发
代码如下:
ljm1 = Tex20 & "" & Tex21 & "" & Tex22 & Ch1.Caption
ljm2 = Tex20 & "" & Tex21 & "" & Tex22 & Ch2.Caption
Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=db_cfg"
Adodc1.RecordSource = "YLRGXX where 连接码 ='" & ljm1 & "'"
Adodc1.RecordSource = "YLRGXX where 连接码 ='" & ljm2 & "'"
Adodc1.Refresh
Set DataGrid1.DataSource = Adodc1
请问各位老师如何实现这个功能!
学习~
<
谢谢各位老师了!
期待中。。。