我在VB6中调用EXCEL应用程序,代码如下:
option explicit
dim xlsApp as excel.application
dim xlsWB as excel.workbook
dim xlsWS as excel.worksheetcommand1_click()
set xlsApp=new excel.application《---我逐语句调试,执行完此句时不能得到EXCEL的实例,因为我 将                              光标移到该行的xlsApp上时,报:该程序执行了非法操作,即将关闭
                                 。如果仍有问题,请与程序供应 商联系。 我在另一台win98+vb6的机器上调试也如此,什么原因?请高手指点。我已经添加了excel lib的引用。                                 
xlsApp.workbooks.add
set xlsWB=xlsapp.workbooks(1)
set xlsws=xlsWB.worksheets(1)
、、、、end sub

解决方案 »

  1.   

    试试用Set xlsApp= CreateObject("excel.application")
      

  2.   

    我安装了OFFICE,并且EXCEL单独打开是没问题的,
    改为Set xlsApp= CreateObject("excel.application")结果也一样,试着用
    set xlsapp=getobject(,"excel.application")也一样。真不知道是什么原因,但在windows xp 系统下却可以,在另外一台WIN98系统下也不行。请高手们继续帮我解决。
    注:报执行了非法操作后,看详细信息显示是rpcrt4.dll无效页之类的。