With Tables("任务管理主界面_Table1")   

    Dim dtb As New DataTableBuilder("统计1")

    dtb.AddDef("任务来源", Gettype(String), 70)

    dtb.AddDef("任务主题", Gettype(String), 150)

    dtb.AddDef("任务编号", Gettype(String), 150)

    dtb.AddDef("开始时间", Gettype(Date))

    dtb.AddDef("计划完成时间", Gettype(Date))

    dtb.AddDef("创建人", Gettype(String), 100)

    dtb.AddDef("创建时间", Gettype(Date))   

    dtb.Build()

   

    \'填充数据

    Dim f As New Filler

    f.SourceTable = DataTables("任务表") \'指定数据来源

    f.SourceCols = "创建人,任务编号,负责人,任务主题,开始时间,重要程度,计划完成时间,,创建人,创建时间" \'指定数据来源列

    f.DataTable = DataTables("统计1") \'指定数据接收表

    f.DataCols = "任务来源,任务编号,负责人,任务主题,开始时间,重要程度,计划完成时间,创建人,创建时间"  \'指定数据接收列

    f.ExcludeExistValue =True

    f.fill()

    .DataSource = DataTables("统计1" )

    .SetColVisibleWidth("任务编号|80|任务来源|70|任务主题|200|负责人|90|开始时间|90|计划完成时间|90|创建人|90|创建时间|125")

    .Cols("创建时间").SetDateTimeFormat(DateTimeFormatEnum.DateLongTime)

.Sort = "下发时间 DESC,最后修改时间 DESC,任务编号 DESC"

end with

问题：我想在table1中显示列“创建时间”，并以DateLongTime的格式显示，上述代码能实现吗？