如何让单元格中的文字竖排显示

spread for asp.net 4.0,如题

合并了几个单元格后要求文字竖排显示

回复 2楼xiaoyanwei2000的帖子

可以通过自定义单元格类型实现，测试代码：

1. 
   
2. Public Class WebForm1
   
3.     Inherits System.Web.UI.Page
   
4. 
   
5.     Private Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
   
6.         If IsPostBack Then Return
   
7.         FpSpread1.ActiveSheetView.Cells(0, 0).CellType = New RotateTextCellType
   
8.         FpSpread1.ActiveSheetView.Cells(0, 0).Value = "Test"
   
9.         FpSpread1.ActiveSheetView.Rows(0).Height = 100
   
10.         FpSpread1.ActiveSheetView.Columns.Default.Width = 24
    
11.         FpSpread1.ActiveSheetView.Rows(0).VerticalAlign = VerticalAlign.Top
    
12.     End Sub
    
13. End Class
    
14. 
    
15. 
    
16. <Serializable()>
    
17. Public Class RotateTextCellType
    
18.     Inherits FarPoint.Web.Spread.LabelCellType
    
19.     Public Overrides Function PaintCell(ByVal id As String, ByVal parent As System.Web.UI.WebControls.TableCell, ByVal style As FarPoint.Web.Spread.Appearance, ByVal margin As FarPoint.Web.Spread.Inset, ByVal value As Object, ByVal upperLevel As Boolean) As System.Web.UI.Control
    
20.         parent.Style.Add("writing-mode", "tb-rl")
    
21.         Return MyBase.PaintCell(id, parent, style, margin, value, upperLevel)
    
22.     End Function
    
23. End Class
    

复制代码

回复 3楼iceman的帖子

没有相关属性可以设置下，只能重写控件吗

回复 4楼xiaoyanwei2000的帖子

目前没有相关属性。