如何通过vba计算，使年月日三个单元格组合起来计算结果为日期格式？

写了以下代码，同样代码在不同电脑显示不同： ws.Range("P13").Value = DateSerial(UserForm1.TextBox11.Value, UserForm1.ComboBox8.Value, UserForm1.ComboBox9.Value) ws.Range("Q13").Value = DateSerial(UserForm1.TextBox14.Value, UserForm1.ComboBox10.Value, UserForm1.ComboBox11.Value) 正常应该是"2017/6/22"或者一个数值"42908"，但是换一台电脑计算结果就是"2017/6/22/周四"而且无法转成日期格式。 求大神解答，如何设置或者如何调整代码呢？