属性
|
说明
|
Height
|
返回或设置行高,单位为像素。
|
Dim Book As New XLS.Book
Book.DefaultFont = New Font("宋体",12)
Dim Sheet As XLS.Sheet = Book.Sheets(0)
Sheet(0, 0).Value = "编号"
Sheet(0, 1).Value = "问题"
Sheet.Cols(0).Width = 60
Sheet.Cols(1).Width = 600
Sheet(1, 0).Value = "编号1"
Sheet(1, 1).Value = "编号2"
'Sheet.Rows(0).Height = 30 '设置第一行高度
'Sheet.Rows(1).Height = 70 '设置第二行高度
Book.Save("C:\Documents and Settings\Administrator\桌面\编程1.xls")
Dim Proc As New Process
Proc.File = "C:\Documents and Settings\Administrator\桌面\编程1.xls"
Proc.Start()
output.show(Sheet.Rows(0).Height )
output.show(Sheet.Rows(1).Height )
如果采用自动换行或默认行高,采用“Height ”不能获得指定行高度,但如果先设置行高,“Height"就能正常返回值。
请问采用自动换行时如何获得指定行高度?
[此贴子已经被作者于2014-2-9 22:27:06编辑过]