vb调用excel文件如何以只读方式打开？急！急！在线等

Question

Set xlApp = New Excel.Application
        Set xlApp = CreateObject("Excel.Application")
        xlApp.Visible = True '显示EXCEL应用程序窗口
        Set xlBook = xlApp.Workbooks.Open(Z:\销售部\gg\ddd.xls) '打开工作簿
        Set xlSheet = xlBook.Worksheets(1)
如果就这样打开的话可以修改保存。请问一下在哪里设置一下参数就可以以只读方式打开？多谢了！

Answer 1

Set xlBook = xlApp.Workbooks.Open("Z:\销售部\gg\ddd.xls",,True) '只读打开工作簿