连接access数据库后,我希望在在改变显示关键字的TextBox里的内容时候,其他关联的Text也跟随着改变。
比如编号TextBox里面改变编号,改完后,其他TextBox也跟随着改变。
sub txtKey_Change()
txtField1.text=rs!field1
txtField2.text=rs!field2
end sub
sub txtKey_lostfouse()
txtField1.text=rs!field1
txtField2.text=rs!field2
end sub
还在增加动态查询功能,比如:
rs.Filter = "KeyID=" & txtFieldKeyID.text & ""
txtField1.text=rs!field1
txtField2.text=rs!field2