FarPoint.Win.Spread.CellType.DateTimeCellType dtest = new FarPoint.Win.Spread.CellType.DateTimeCellType();
dtest.SimpleEdit = true;
dtest.SubEditor = new FarPoint.Win.Spread.CellType.SpreadMonthCalendar();
fpSpread1.Sheets[0].Cells[0, 0].CellType = dtest;
FarPoint.Win.Spread.CellType.DateTimeCellType dtest1 = new FarPoint.Win.Spread.CellType.DateTimeCellType();
dtest1.SimpleEdit = true;
dtest1.SubEditor = new FarPoint.Win.Spread.CellType.SpreadDropDownMonthCalendar();
fpSpread1.Sheets[0].Cells[0, 1].CellType = dtest1;
Dim dtest As New FarPoint.Win.Spread.CellType.DateTimeCellType
dtest.SimpleEdit = True
dtest.SubEditor = New FarPoint.Win.Spread.CellType.SpreadMonthCalendar
fpSpread1.Sheets(0).Cells(0, 0).CellType = dtest
Dim dtest1 As New FarPoint.Win.Spread.CellType.DateTimeCellType
dtest1.SimpleEdit = True
dtest1.SubEditor = New FarPoint.Win.Spread.CellType.SpreadDropDownMonthCalendar
fpSpread1.Sheets(0).Cells(0, 1).CellType = dtest1