请教：AO+VB 怎样读取coverage文件？

<P>AO+VB 怎样读取coverage文件？</P>
<P>不知AO+VB能否直接访问读取coverage文件，我现在只能用arcmap将其保存为.mxd或.lyr，然后用ALoadMxFile或ddLayerFromFile将起加载，不知能否直接加载coverage文件呢?怎样加载？请各位高手指点一下，谢谢！</P>

<P>给你个源码，其实AO帮助中有的。</P><P>'打开Coverage的FeatureWorkspace
Public Function AccessCoverage(ByVal mPath As String) As IFeatureWorkspace
  
   Dim infoWSFact As IWorkspaceFactory
   Dim infoFeatWS As IFeatureWorkspace
   Set infoWSFact = New ArcInfoWorkspaceFactory
   'Open FeatureWorkspace
   Set infoFeatWS = infoWSFact.OpenFromFile(mPath, 0)
   Set AccessCoverage = infoFeatWS
  
   Set infoWSFact = Nothing
  
End Function
</P>