[求助]在Word文档报表中如何设置时间格式 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

我在某Word格式的报表中，有两个来自同一列【故障处理派单时间】其格式为：2015-04-17 00:00 ；

此主题相关图片如下：360截图20150420115914953.jpg

我希望

1、在下图“1”所显示的格式为：4月17日00:00

2、在下图“2”所显示的格式为：二零一五年四月十七号

此主题相关图片如下：360截图20150420115713375.jpg

[此贴子已经被作者于2015/4/20 12:11:00编辑过]

要生成: 4月17日00:00 格式或者 2015年4月17日00:00 格式;公式该怎么写?

如果我想设计一个按钮控件,点击该按钮就能够打开这个Word报表,这个按钮公式该怎么写?

如果我想实现把文件保存的名称自动生成为:调度抢修命令(***) ;其中***为[抢修整治迁改表]中的[调令编号]列内容,我的命令该怎么修改?

比如:我有一行数据的[调令编号]列内容为:粤L-抢修〔201504〕97号 ;那么当我保存报表时,文件名自动显示为:调度抢修命令(粤L-抢修〔201504〕97号)

Dim tm As String = ProjectPath & "Attachments\调度抢修派单表.doc" '指定模板文件

Dim fl As String = "D:\调度抢修命令单\调度抢修命令().doc" '指定目标文件

Dim wrt As New WordReport(Tables("抢修整治迁改表"),tm,fl) '定义一个WordReport

wrt.Build() '逐行生成报表

wrt.Show() '显示报表

我有一条命令,想实现【通知提醒时间】=【通知代维单位时间】+35分钟；如下命令该怎么修改？而且时间格式为：2015-4-20 19:13:00

Select Case e.DataCol.name

Case "通知代维单位时间"

Dim dr As DataRow = e.DataRow

If dr.IsNull("通知代维单位时间") Then

dr("通知提醒时间") = Nothing

Else

Dim tp As TimeSpan

tp = dr("通知代维单位时间") + 2100

dr("通知提醒时间") = tp.TotalSeconds() '真正的时段型数据要转换为秒数,才能存入时段列

End If

End Select

[此贴子已经被作者于2015/4/21 8:39:06编辑过]

我的【故障处理月份】格式为：201504 我的以下命令该怎么修改、才能实现加载【故障处理月份】为当前日期月份的记录

DataTables("抢修整治迁改表").LoadFIlter=" 故障处理月份 = Date.Now "

DataTables("抢修整治迁改表").Load

在窗口的AfterLoad事件中写有以下命令，想实现打开该窗口时自动加载【故障处理月份】=当前数据库月份的数据；其中【故障处理月份】的格式为：201504

结果提示下图错误；我的公式该怎么改？

此主题相关图片如下：360截图20150427105402406.jpg

Dim cmd As New SQLCommand

Dim dt As Date

cmd.C

cmd.CommandText = "Select GetDate()"

dt = cmd.ExecuteScalar()

Dim dt1 As Date = format(dt,"yyyyMM")

DataTables("抢修整治迁改表").LoadFIlter="故障处理月份 = #" & dt1 & "#"

DataTables("抢修整治迁改表").Load

主题：[求助]在Word文档报表中如何设置时间格式