|
阅读：1590回复：2
请教在VBA中使用IPixelBlock修改栅格值的问题
<P>在VBA中 使用IPixelBlock的GetSafeArray(0)获取Variant二维数组，遍历数组，修改栅格值时，警告不是VB支持的自动化类型，怎么办?</P>
<P>代码如下：</P> <P>'IPixelBlock3 pPixleBlock</P> <P>Variant varArray = pPixelBlock.GetSafeArray(0)</P> <P>For i = 0 To Row </P> <P> For k = 0 To Col</P> <P> varArray(i,j)=varArray (i,j)*3 '报错了，警告不是VB支持的自动化类型，怎么办?</P> <P>Next</P> <P>Next</P><br> [此贴子已经被作者于2005-7-19 20:39:57编辑过]
|
|
|
1楼#
发布于：2005-07-20 16:49
把varArray 定义成Object,报错Type mismached!
|
|
|
2楼#
发布于：2005-07-19 10:11
<P>你把varArray 定义成Object试试看！</P>
|
|
