Application.CurrentCulture = New System.Globalization.CultureInfo("ja-JP", false)
Dim dt As FarPoint.Win.Spread.CellType.DateTimeCellType = New FarPoint.Win.Spread.CellType.DateTimeCellType()
dt.CalendarSurroundingDaysColor = System.Drawing.SystemColors.GrayText
dt.DateDefault = Date.Now
dt.DateSeparator = "/"
dt.DateTimeFormat = FarPoint.Win.Spread.CellType.DateTimeFormat.UserDefined
dt.MaximumTime = System.TimeSpan.Parse("23:59:59.9999999")
dt.TimeDefault = Date.Now
dt.UserDefinedFormat = "yyyy/MM/dd"
FpSpead1.ActiveSheet.Columns.Get(0).CellType = dt
相关文章：