pb直接打开指定的excle文件?该怎么解决

pb直接打开指定的excle文件?
我的代码如下：
  OleObject ole_excel
ole_excel = create OleObject
If ole_excel.ConnectToNewObject("Excel.Application") <> 0 Then 
  MessageBox('连接到Excel错误','请确认是否已经安装了Excel!',Exclamation!)
   
  Return
End If
ole_excel.Application.Workbooks.Open("d:\2.XLS")
但是运行的时候打不开文件，任务管理器里已经启动了了exlce.exe进程。请问什么原因啊？

[解决办法]
ole_excel.Application.Visible = TRUE
你加条这个试试
[解决办法]
http://blog.csdn.net/jlwei888/archive/2009/01/08/3725362.aspx