Dim dtb As New DataTableBuilder("test1")
dtb.AddDef("列1", Gettype(String), 32)
dtb.AddDef("列2", Gettype(Date))
dtb.AddDef("列3", Gettype(String), 17)
dtb.Build()
DataTables("test1").DataCols("列2").SetDateTimeFormat(DateTimeFormatEnum.DatelongTime)
MainTable= Tables("test1")
Tables("test1").AddNew()
Tables("test1").Current ("列2") = Date.Now
Tables("test1").Current ("列1") = Format(Tables("test1").Current ("列2"),"yyyyMMddhhMMss")
Tables("test1").Current ("列3") = "1" & Tables("test1").Current ("列1")
加好友 
发短信
Post By：2018/5/21 8:41:00 [显示全部帖子]
