Cambalinho
Power Member
eis o cabeçalho de 1 função:
agora veja como a uso:
eu acredito que o 'Points(0)' é onde está o erro de compilação: "ByRef argument type mismatch"
como posso evitar esse erro?
Código:
Public Function GetLinePoints(ByRef Origin As Position3D, ByRef Destiny As Position3D) As Position3D()
Código:
Friend Sub DrawImageRectanglePoints(DestinationHDC As Long, ByRef Points() As Position3D)
'Points(0) is the Upper-Left
'Points(1) is the Upper-Right
'Points(2) is the Low-Right
'Points(3) is the Low-Left
Dim PointsUpperDownLeft() As Position3D
PointsUpperDownLeft = GetLinePoints(Points(0), Points(3))
como posso evitar esse erro?