表1
NO PipeLineNO PointX0 PointY0 PointZ0
1 150Oil-028-100H 2000 3000 2500
2 150Oil-028-100H 8000 3000 2500
3 150Oil-028-100H 8000 3000 5000
表2
No PipeLineNO PointX0 PointY0 PointZ0 PointX PointY PointZ
1 150Oil-028-100H 2000 3000 2500 8000 3000 2500
2 150Oil-028-100H 8000 3000 2500 8000 3000 5000
3 150Oil-028-100H 8000 3000 5000 8000 10000 5000
在Foxpor操作步骤概述:
表1的第2项 PointX0 PointY0 PointZ0
8000 3000 2500
是表2的1 PointX PointY PointZ
8000 3000 2500
采用Foxpor处理表1和表2方法比较简单.
select 表1 读取第二条记录,select 表2 移动到第一条记录,
换PointX PointY PointZ请教各位大侠的问题是上述操作,在VB中如何实现.我掌握的知识:
在VB中我所知道的表与表数据操作主要是以Sql语句进行操作,
但我这个问题必须要读取表1第二条记录,再赋值到表2的第一条记录.
请教各位大侠如何解决?????????
NO PipeLineNO PointX0 PointY0 PointZ0
1 150Oil-028-100H 2000 3000 2500
2 150Oil-028-100H 8000 3000 2500
3 150Oil-028-100H 8000 3000 5000
表2
No PipeLineNO PointX0 PointY0 PointZ0 PointX PointY PointZ
1 150Oil-028-100H 2000 3000 2500 8000 3000 2500
2 150Oil-028-100H 8000 3000 2500 8000 3000 5000
3 150Oil-028-100H 8000 3000 5000 8000 10000 5000
在Foxpor操作步骤概述:
表1的第2项 PointX0 PointY0 PointZ0
8000 3000 2500
是表2的1 PointX PointY PointZ
8000 3000 2500
采用Foxpor处理表1和表2方法比较简单.
select 表1 读取第二条记录,select 表2 移动到第一条记录,
换PointX PointY PointZ请教各位大侠的问题是上述操作,在VB中如何实现.我掌握的知识:
在VB中我所知道的表与表数据操作主要是以Sql语句进行操作,
但我这个问题必须要读取表1第二条记录,再赋值到表2的第一条记录.
请教各位大侠如何解决?????????
data1.recordset.fields()=data2.recordset.fields()
循环再循环呵呵,我只会这种