主题：登记日期是字符列 有没有办法直接把登记日期的字符列转换成日期列 实现一个选择时段的筛选

表列事项代码

Select Case e.DataCol.Name
    Case "登记日期"
        e.DataRow("登记日期")=cdate(e.DataRow("登记日期"))
End Select

当登记日期等于 20220211165467 运行时提示：

从字符串“20220211165467”到类型“Date”的转换无效。

登记日期是字符列   有没有办法直接把登记日期的字符列转换成日期列 实现一个选择时段的筛选

Dim dt1 As Date =Forms("文件登记").Controls("DateTimePicker1").Value
Dim dt2 As Date =Forms("文件登记").Controls("DateTimePicker2").Value
Dim Filter As String
Filter = "登记日期 >= #" & dt1 & "# And 登记日期 <= #" & dt2 & "#"
Tables("文件登记").Filter = Filter

Select Case e.DataCol.Name
    Case "第一列"
        Dim s As String= e.DataRow("第一列")
        s = s.insert(12,":").insert(10,":").insert(8," ").insert(6,"-").insert(4,"-")
        e.DataRow("第二列")=cdate(s)
End Select

第一列是字符  第二列是日期时间  结果还是出现一楼问题

字符是如下格式 也不行