关于Twip和POINTS2D

Question

现在写一个图像旋转任意角度的程序，程序原来用的是POINTS2D，结果只有在旋转90度的整数倍的时候才没有毛边，否则在任意角度的时候会出现很多毛边甚至是大毛边，我贴上部分代码：
Dim Points(3) As POINTS2D
Dim DefPoints(3) As POINTS2D
我想问问能不能将POINT2D改成类似TWIP的变量，反正越小越好，毛边会更小，现在很大
但是我在As后面的列表里没有找到Twip的变量，求大家我应该怎么做，要是自己定义的话应该怎么定义呢？

Answer 1

也许你可以私信或qq问一下laviewpbt，他的头像下有一串号码，不知是否QQ号。http://topic.csdn.net/u/20090719/15/98e88bc0-2c80-4827-9187-798e62755e21.html?64933

Answer 2

Public Type POINTS2D
   x As Long
   y As Long
End Type

Answer 3

改用 Double 类型就可以存储小数坐标了。

Answer 4

你查一下你在使用的对象有没有ScaleMode这个属性，如果有的话，可以    YourObject.ScaleMode = 1 'Twip