GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType datecell = new GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType();
datecell.MaxDate = new System.DateTime(9999, 12, 31);
datecell.MinDate = DateTime.Now;
datecell.MaxMinBehavior = GrapeCity.Win.Spread.InputMan.CellType.MaxMinBehavior.Clear;
fpSpread1.Sheets[0].Cells[0, 0].CellType = datecell;
Dim datecell As New GrapeCity.Win.Spread.InputMan.CellType.GcDateTimeCellType()
datecell.MaxDate = new System.DateTime(9999, 12, 31)
datecell.MinDate = DateTime.Now
datecell.MaxMinBehavior = GrapeCity.Win.Spread.InputMan.CellType.MaxMinBehavior.Clear
fpSpread1.Sheets(0).Cells(0, 0).CellType = datecell