- 博客(1)
- 收藏
- 关注
原创 Copy Object by pointer
Private Sub pvAddRefMe()Dim oUnk As olelib.IUnknown Set oUnk = Me oUnk.AddRefSet oUnk = Nothing End Sub Public Function ObjectFromPtr(ByVal lPtr As Long) As ObjectDim oThis As Object pvAddRef
2004-07-11 20:13:00 740
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人