主题：[求助]关于不同电脑日期格式的问题

项目表事件中有以下二句代码：

Dim i As Integer=len(CStr(e.DataRow("起始时间")))
e.DataRow("记录标记")=CStr(e.DataRow("起始时间")).SubString(0,i) & e.DataRow("工序") & e.DataRow("卷号")
这二句代码是生成一个记录标记，由于大家用的电脑的日期设置不一样，导致生成的记录标记各种各样，如：

2015/1/1 轧机1号CS150101

2015-01-01轧机1号CS150101

我也不可能天天盯着这些电脑的日期设置，这个记录标记在整个项目中多处用到，是个关键数据，有何办法可以统一起来。

Dim i As Integer=len(CStr(e.DataRow("起始时间")))
e.DataRow("记录标记")=CStr(e.DataRow("起始时间")).SubString(0,i) & e.DataRow("工序") & e.DataRow("卷号")

改成

e.DataRow("记录标记") = Format(e.DataRow("起始时间"), "yyyy-MM-dd") & e.DataRow("工序") & e.DataRow("卷号")