<<< 返回 access911.net 编程静态资料库索引页

作者：  摘自：  录入：cg1  时间：2002-11-21  浏览人次：780

专题地址：http://www.access911.net/index.asp?u1=a&u2=74FAB61E 如果需要更详细的评论或说明，请点击该地址。

简述：

Function existenceCheck() As Boolean 
'//  用于检测是否安装Excel 
'//  返回： True 已安装； False 未安装 

  Dim objApp As Object 
  existenceCheck = True 
  
  On Error Resume .....................
...........