我现在有两个表，不能用sql进行处理．
表1
NO PipeLineNO PointX0PointY0PointZ0
1 150Oil-028-100H 200030002500
2 150Oil-028-100H 800030002500
3 150Oil-028-100H 800030005000
表2
No PipeLineNOPointX0PointY0PointZ0PointXPointYPointZ
1 150Oil-028-100H200030002500800030002500
2 150Oil-028-100H800030002500800030005000
3 150Oil-028-100H8000300050008000100005000

表１与表２的关系:
表1的第2项 PointX0 PointY0 PointZ0 赋值给
8000 3000 2500
表2的PointX PointY PointZ字段
8000 3000 2500
采用Foxpor处理表1和表2方法比较简单.
select 表1 读取第二条记录,select 表2 移动到第一条记录,
换PointXPointYPointZ

请教各位大侠,如何在VB中，将表１的值经过计算，赋值给表２.

在VB中我所知道的表与表数据操作主要是以Sql语句进行操作,
但我这个问题必须要读取表1第二条记录,再赋值到表2的第一条记录.
我现在的关键是不能同时打开两个表rst,rst1，

请教各位大侠如何解决???