求助，一个问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

同样的一段代码，如下：

Dim c1 As Date = Vars("签到时间")

Dim b1 As String = CStr(c1).Remove(0,5).Replace("-",".").TrimStart("0")

e.DataRow("近期签到记录") =e.DataRow("近期签到记录") & b1 & "有事"

在不同的电脑上运行，出现不同的结果。

比如签到时间为2016年11月4号

有的电脑 “近期签到记录” 为 11.4有事

有的电脑则显示为 4/11有事

还有的电脑显示为 11.4 星期五有事

猜测可是是因为电脑不同，系统设置不同的原因，那么请教各位老师，怎么样才能以最简单的方法，使得每一台电脑运行以上代码时，在不更改电脑设置的情况下，使得显示结果都为 11.4有事？

主题：求助，一个问题