你查查access库方面的书sqlsever和oralce都有一个记录库中所有表名的表
是不是可以获得所要比较字段的下表也就是纵坐标,然后比较
adoJL---记录集with adoJL .MoveFirst .Find "[字段名] = '" + Text1.Text + "'" If .EOF Then .AddNew .Fields("字段名1") = .... .Fields("字段名2") = ..... ...... .Update End With另:.Find 也可用过滤语句“.Filter”