Skip to content

Instantly share code, notes, and snippets.

@piotrflorczyk
Created July 11, 2018 15:06
Show Gist options
  • Save piotrflorczyk/22e9c94f51e425b80d6c9b1c0bea3a0a to your computer and use it in GitHub Desktop.
Save piotrflorczyk/22e9c94f51e425b80d6c9b1c0bea3a0a to your computer and use it in GitHub Desktop.
Class ReuseClass
Dim mem
Function P
End Function
Function SetProp(Value)
mem=Value ' will actually call Default Poperty Get
SetProp=0
End Function
End Class
Class FakeReuseClass
Dim mem
Function ReadBstrValll
ReadBstrValll=LenB(mem(some_memory+8))
End Function
Function Q
End Function
End Class
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment