[交流] VB.net+ArcEngine对 COM 组件的调用返回了错误 HRESULT E_FAIL 已有1人参与

' Create the RasterSurfaceOp object
        Dim pSurfaceOp As ISurfaceOp
        pSurfaceOp = New RasterSurfaceOp
        ' Declare the input before raster object
        Dim pbeforeDataset As IGeoDataset
        Dim pWs As IRasterWorkspace
        Dim pWsFact As IWorkspaceFactory
        'Open the workspace
        pWsFact = New RasterWorkspaceFactory
        pWs = pWsFact.OpenFromFile("F:\专业软件源\gis_ex09\ex14", 0)
        ' Calls function to open a raster dataset from disk
        pbeforeDataset = pWs.OpenRasterDataset("grd_presen")
        ' Declare the input after raster object
        Dim pafterDataset As IGeoDataset
        ' Calls function to open a raster dataset from disk
        pafterDataset = pWs.OpenRasterDataset("grd2")
        ' Declare the output raster object
        Dim pOutputRaster As IGeoDataset
        ' Calls the method
        pOutputRaster = pSurfaceOp.CutFill(pbeforeDataset, pafterDataset)
Dim pDS As IDataset
        Dim pRasBandCol As IRasterBandCollection
        pRasBandCol = pOutputRaster
        pDS = pRasBandCol.SaveAs("zzzzz", pWs, "GRID")