大家看段VB代码

' Create the RasterConditionalOp object
Dim pConditionalOp As IConditionalOp
Set pConditionalOp = New RasterConditionalOp

' Declare the input conditional raster object
Dim pInputConDataset As IGeoDataset

' Calls function to open a raster dataset from disk
Set pInputConDataset = OpenRasterDataset("D:\SpatialData", "conraster")

' Declare the input true raster object
Dim pInputTrueDataset As IGeoDataset

' Calls function to open a raster dataset from disk
Set pInputTrueDataset = OpenRasterDataset("D:\SpatialData", "trueraster")

' Declare the output raster object
Dim pOutputRaster As IGeoDataset

' Calls the method
Set pOutputRaster = pConditionalOp.Con(pInputConDataset, pInputTrueDataset)
这段代码我试过AO8.3没问题，AO9老是说自动化错误请高手赐教