Excel VBA：用户表单中的日期格式

Question

我在用户表单中有各种文本框，其中包含从我的工作表中提取的日期，但所有日期都采用美国格式（m/d/yyyy）。

我使用ControlSource属性复制日期，例如：

ControlSource='SKU Data'!N2

有没有办法重新格式化日期，使它们显示为d/m/yyyy？

工作表中的日期已格式化为d/m/yyyy.

Answer 1

使用字符串 s：

执行此操作

Sub dural()
    txt = "12/25/2014"
    a = Split(txt, "/")
    txt = a(1) & "/" & a(0) & "/" & a(2)
    MsgBox txt
End Sub