怎样用vb代码实现access中不同表的相同字段的内容也相同。

来源：百度知道 编辑：UC知道 时间：2024/06/09 06:05:43
表1（已使用Adodc1连接）里含有字段1和字段2，表2（已使用Adodc2连接）里也含有字段1和字段2。字段1和字段2是可变字符，字符内容和长度有在变化。表1的字段1和字段2是人工输入的，表2的字段1是自动写入的。要实现的是：A、如果表1的字段1和表2的字段1内容相等，就让表2的字段2内容等于表1的字段2的内容；B、要是表1的字段1和表2的字段1内容相等，则提示表2的字段1里内容是无效的。
希望有详细的程序，一两句提示语，我看不懂（VB水平有限，忘谅解！）
这位匿名朋友，你也知道VB中差个标点都不行，你这么几句话对于高手来讲可行，对于初学者来讲，不可行。说了等于没说！

首先2个表里要有可以排序的字段，能确定你的新增加的记录的位置，比如说降序排列！
If Adodc1.Recordset.Fields("字段1") = Adodc2.Recordset.Fields("字段1") Then
Adodc2.Recordset.Update
Adodc2.Recordset.Fields("字段2") = Adodc1.Recordset.Fields("字段2")
Adodc2.Recordset.Update
Adodc2.Refresh
End If

If Adodc1.Recordset.Fields("字段1") = Adodc2.Recordset.Fields("字段2") Then
MsgBox "错误"
End If

简单的,但我不可能把代码写给你

Private Sub Text1_Change()
更改表1,字段1内容
查询表2做判断
End Sub