Dim Style As XLS.Style = Book.NewStyle() '定义新样式
Dim Style1 As XLS.Style = Book.NewStyle() '定义新样式
Dim Style2 As XLS.Style = Book.NewStyle() '定义新样式
style.Font= New Font("Arial Unicode MS",10, FontStyle.regular)
Style1=style
style2=style
style1.font=New Font("Arial Unicode MS",12, FontStyle.bold)
style2.font=New Font("Arial Unicode MS",16, FontStyle.bold)
sheet(1,1).style=style
sheet(2,1).style=style1
sheet(3,1).style=style2
最终结果是
三个单元格 字体都是一样, 是BUG吗
[此贴子已经被作者于2014-6-10 11:13:20编辑过]