大家帮我看看是什么问题

micromaker

我怎么可以指定我要插入图片的位置，我指定了位置了，为什么还是没插入到 指定位置，大家帮我看看我错在什么地方了。我是新手。 Private Sub BtnIdiograph_Click()
Dim insertionPoint(0 To 2) As Double
Dim scalefactor As Double
Dim rotationAngle As Double
Dim rasterObj As AcadRasterImage

insertionPoint(0) = 439#
insertionPoint(1) = 29#
insertionPoint(2) = 0#
scalefactor = 0#
rotationAngle = 0#

On Error GoTo ERRORHANDLER
' 在模型空间中附着光栅图像
Set rasterObj = ThisDrawing.ModelSpace.AddRaster _
(GraphPath.Text, insertionPoint, _
scalefactor, rotationAngle)
ZoomAll

IDIOGRAPHForm.Hide
Exit Sub
ERRORHANDLER:
MsgBox Err.Description
End Sub

clement

GraphPath是怎么定义的？Text 控件？


如果是你在里面输的什么

micromaker

GraphPath是一个控件,,在它里面是我选择的要插入的图片的路径,我指定了要 插入的点 insertionPoint(0) = 439#
insertionPoint(1) = 29#
insertionPoint(2) = 0# 但是当我改变这些点的时候在我的当前文件内我没看到任何变化查看图片的属性 X,Y,Z也不是我插入时候赋予的值,我想问问这是为什么

clement

Scalefactor 为什么要设成0 呢？这样的话插入点只能在原点。 还有你数字后面的#可以省略，＃是双精度型数据后缀

帮助里面是这么写的

ScaleFactor

Double; read-write
A real number greater than 0.0. A scale factor greater than 1 enlarges the object. A scale factor between 0 and 1 shrinks the object.