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"就能正常返回值。

请问采用自动换行时如何获得指定行高度？

 待高手