只能輸入數字,但前面的零不會省去
Dim nf As New FarPoint.Win.Spread.CellType.MaskCellType
nf.Mask = "###"
nf.MaskChar = " "c
.Columns(SPD_COL.NOKI).CellType = nf
只能輸入英數字
Dim nc As New FarPoint.Win.Spread.CellType.MaskCellType
nc.Mask = "WWWW"
nc.MaskChar = " "c
.Columns(SPD_COL.CODE).CellType = nc
CHKBOX的列頭硬換行
Dim cb As New FarPoint.Win.Spread.CellType.CheckBoxCellType()
.Columns(SPD_COL.CHKBOX).CellType = cb
.Columns(SPD_COL.CHKBOX).VisualStyles = FarPoint.Win.VisualStyles.On
.ColumnHeader.Cells(0, SPD_COL.CHKBOX).Text = "選" + Chr(13) + Chr(10) + "択"