关于对象的传递问题

set objDes = New objSrc

解决方案 »

  1.   

    那如果是这样
    Object
       property1
       property2
       .....难道我如果想独立得复制对象
    只能是
    objDes.property1 = objSrc.property1
    objDes.property2 = objSrc.property2
    ...???
      

  2.   

    set objDes = New objSrc是不行的，New后面的必须是一种类型而我的objSrc是Object的一个实例
      

  3.   

    如果对象是RecordSet,那么倒是有Clone方法可以实现，只是其他对象...呵呵就不知道了,关注
      

  4.   

    这种操作要对象支持串行化（serialized）估计才行
    否则你就一个一个属性复制把
    (也许可以用copymemory在内存上复制，不敢肯定:P)
    如果你的对象只是一些数据，可以考虑用type
    copymemory就可以在内存上进行复制
      

  5.   

    我原先的做法就是写一个函数
    CopyObject然后实现上面
    objDes.property1 = objSrc.property1
    objDes.property2 = objSrc.property2
    ......不知道还有没有别的方法?
      

  6.   

    我的对象包括方法的，所以Type是不行的：（ 都是Class至于CopyMemory，我对API向来感冒的，不喜欢用它的：（况且还不知道是不是一定行
      

  7.   

    wjying(葡萄) 说的是,我看了一眼MSDN,好像FOXPRO支持对象的复制,不过也是通过挨个的属性复制实现的.真蠢
      

  8.   

    我还是在我的对象上提供一个Clone的方法吧
      

  9.   

    由于vb的物件是基于COM的,而COM本身不支持对象的clone,所以vb本身的物件没有clone方法,
    如果是你自己写的object(class),你可以写一个clone方法,如下:
    public function clone() as myObject
        dim cloneObj as new myObject
        cloneObj.property1 = myObject.property1
        cloneObj.property2 = myObject.property2
        cloneObj.property3 = myObject.property3
        ...
        clone = cloneObj
    end function
      

  10.   

    clone 方法：先序列化再恢复成另一对象！
      

  11.   

    我提供的Clone现在是这样的Public Sub Clone(text As clsText)
      

  12.   

    为什么不是Function要sub
    function要灵活一点哦
      

  13.   

    为什么不是Function要sub
    function要灵活一点哦