# 找到变通的方法!

Posted by Lisa Chang on August 19, 1997 at 23:47:17:

In Reply to: Re: RDC Problem (Visual Basic v5.0 Enterprise) posted by Satan Chuang on August 18, 1997 at 20:48:26:

在Form2的Activate做Assign Resultset的动作
相关程式码如下:
Private Sub Form_Activate()
If Gform_load = True Then
Gform_load = False
Set Data1.Resultset = Form1.Data1.Resultset
lblNumber = "第 " & Data1.Resultset.AbsolutePosition & " 笔"
Form1.Data1.Resultset.Move 0 '让Form1的资料指标正常
EndIf
End Sub

Follow Ups: