GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType datecell = new GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType();
datecell.AcceptsCrLf = GrapeCity.Win.Spread.InputMan.CellType.CrLfMode.Cut;
fpSpread1.Sheets[0].Cells[0, 0].CellType = datecell;
GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxCellType textcell = new GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxCellType();
textcell.AcceptsCrLf = GrapeCity.Win.Spread.InputMan.CellType.CrLfMode.Cut;
textcell.AcceptsTabChar = GrapeCity.Win.Spread.InputMan.CellType.TabCharMode.NoControl;
textcell.AllowSpace = GrapeCity.Win.Spread.InputMan.CellType.AllowSpace.Both;
fpSpread1.Sheets[0].Cells[1, 1].CellType = textcell;
Dim datecell As New GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType()
datecell.AcceptsCrLf = GrapeCity.Win.Spread.InputMan.CellType.CrLfMode.Cut
fpSpread1.Sheets(0).Cells(0, 0).CellType = datecell
Dim textcell As New GrapeCity.Win.Spread.InputMan.CellType.GcTextBoxCellType()
textcell.AcceptsCrLf = GrapeCity.Win.Spread.InputMan.CellType.CrLfMode.Cut
textcell.AcceptsTabChar = GrapeCity.Win.Spread.InputMan.CellType.TabCharMode.NoControl
textcell.AllowSpace = GrapeCity.Win.Spread.InputMan.CellType.AllowSpace.Both
fpSpread1.Sheets(0).Cells(1, 1).CellType = textcell