主题：EXCEL编程求助！

这里有说明：
http://www.foxtable.com/help/topics/1146.htm

关于字体：

http://www.foxtable.com/help/topics/0494.htm

例如：

Dim Book As New XLS.Book
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Dim Style As XLS.Style = Book.NewStyle() '定义新样式
Style.ForeColor = Color.Red '设置样式的字体颜色
Style.Font = New Font("黑体",12,FontStyle.Underline)
For i As Integer = 0 To 9
    Sheet(i, 0).Value = i
    If i Mod 2 =0 Then '如果是偶数行
        Sheet(i,0).Style =Style '设置单元格样式
    End If
Next
Book.Save("c:\reports\test.xls")
Dim Proc As New Process
Proc.File = "c:\reports\test.xls"
Proc.Start()