我在命令窗口运行以下代码  但生成的c:\\reports\\test.xls文件中怎么无图片呢？（注：大象.jpg图片已复制在images文件夹中）

Dim Book  As New XLS.Book  \'定义一个Excel工作簿
Dim Sheet As XLS.Sheet = Book.Sheets(0) \'引用工作簿的第一个工作表
For i As Integer =  0  To  9  \'向工作表的单元格中设置值
    Sheet(i, 0).Value = (i + 1) *  10
     Sheet(i, 1).Value = (i + 1) *  100
     Sheet(i, 2).Value = (i + 1) *  1000
 Next
 Sheet(10,2).Value = New XLS.Picture(GetImage("images\\大象.jpg"))
 Book.Save("c:\\reports\\test.xls") \'保存工作簿
 Dim Proc As New Process \'打开工作簿
Proc.File = "c:\\reports\\test.xls"
 Proc.Start()

这样：

Sheet(10,2).Value = New XLS.Picture(GetImage("大象.jpg"))

试了 但还是没有呢  麻烦各位了

可能文件不存在，仔细检查。

搞不定，就另外做个简单例子，整个文件夹压缩成一个zip文件发上来