关于类的一个问题

Class中
Private vsfAss   As VSFlexGridPublic Property Get GridAss() As VSFlexGrid
    Set GridAss = vsfAss
End PropertyPublic Property Let GridAss(ByVal para As VSFlexGrid)
    Set vsfAss = para.SaveGrid
End Property窗体中
GDL_DATA_NEW.GridAss = vsf1我想在类中保存一个Grid的备份。用来和原先的Grid作比较
可是如果按照上面的写法类中的vsfAss和窗体中的vsf1 无论改变哪一个另一个都会跟着变化
好像两个指向了同一个地址这并不是我想要的
请问该如何解决？谢谢！