vb6.0-格式化日期

我已经创建了一个程序，我正在努力使它更有效率。其中有需要用户输入的文本框。当所有必需的信息都在中时，将在另一个多行文本框中生成报告。生成的报告中显示的日期格式为“dd/MM/yy”，这一点非常重要。我已经在下面使用了此代码：

Dim a as String
a = Format(Textbox1.text, "dd/MM/yy")

---

然而，它所做的唯一一件事是，当有人用这种格式“dd-MM-yy”键入日期时，它会将其转换为我想要的日期。但是当有人使用“.”（dd.MM.yy）甚至“.”（dd.MM.yy）时，它不会转换它。是否有一种方法可以让我从输入日期中提取字符，无论它是如何写入的，并将其转换为我想要的字符？

右键单击工具箱，选择

组件…

，然后向下滚动到

Microsoft Windows Common Controls-2 6.0（SP6）

（或类似内容）。这将向工具箱添加更多控件。要使用的控件是

DTPicker

控件

要以所需格式获取日期，请使用

Dim a As String
a = Format(DTPicker1.Value, "dd/MM/yy")

---

强制使用带掩码的编辑框或日期选择器的格式在文本框中添加掩码，还是我应该重新制作？