如何在Visual Basic中实现输入格式校验，确保输入符合dd/mm/yy格式？

在Visual Basic里校验输入是否符合dd/mm/yy格式，我通常会用两种靠谱的方法，看你的具体需求来选就行：

这个方法我平时用得最多，因为它不仅能帮你校验格式，还能直接把合法的字符串转换成DateTime对象，后续要做日期计算、存储啥的都方便，而且还能自动排除那些格式对但日期无效的情况（比如2月30号、13月这种）。

示例代码：

Imports System.Globalization

Public Function IsValidDdMmYyFormat(input As String) As Boolean
    Dim parsedDate As DateTime
    ' 指定允许的格式，这里只校验dd/mm/yy
    Dim formats() As String = {"dd/MM/yy"}
    ' 使用InvariantCulture避免系统区域设置影响解析
    Return DateTime.TryParseExact(input, formats, CultureInfo.InvariantCulture, DateTimeStyles.None, parsedDate)
End Function

' 调用示例
Dim userInput As String = "31/12/23"
If IsValidDdMmYyFormat(userInput) Then
    Console.WriteLine("输入格式正确！")
Else
    Console.WriteLine("输入格式错误，请使用dd/mm/yy格式！")
End If

注意：这里的MM必须大写，小写的mm代表分钟，别写错了！如果要兼容其他分隔符（比如dd.mm.yy），可以在formats数组里加对应的格式字符串。

如果你只是想单纯检查格式是否匹配，不需要转换日期对象，那正则表达式也是个不错的选择。不过要注意，正则只能校验格式，没法判断日期是否合法（比如它会认为30/02/23是符合格式的，但实际这是个无效日期）。

示例代码：

Imports System.Text.RegularExpressions

Public Function IsValidDdMmYyRegex(input As String) As Boolean
    ' 正则表达式：匹配dd/mm/yy，dd范围01-31，mm范围01-12，yy是两位数字
    Dim regexPattern As String = "^([0-2][0-9]|3[01])/(0[1-9]|1[0-2])/\d{2}$"
    Return Regex.IsMatch(input, regexPattern)
End Function

' 调用示例
Dim userInput As String = "15/04/24"
If IsValidDdMmYyRegex(userInput) Then
    Console.WriteLine("格式符合要求！")
Else
    Console.WriteLine("格式错误，请输入dd/mm/yy格式的日期！")
End If

额外小技巧 #

如果是在WinForms项目里，你可以直接用MaskedTextBox控件，设置掩码为00/00/00，这样用户输入的时候就只能按格式输入，从源头减少错误。

内容的提问来源于stack exchange，提问作者SexySquidward458