主题：这种时间计算办法

            Dim v1 As Date = e.DataRow(Col_name)
            Dim v2 As Date = f_r(Col_name)
            Dim nv1 As Date = new (1900, 1, 1, v1.Hour, v1.Minute, v1.Second)
            Dim nv2 As Date = new (1900, 1, 1, v2.Hour, v2.Minute, v2.Second)
            If nv1 < nv2 Then
                MessageBox.show( nv1 < nv2 )

            End If

测试报，是个什么意思

---------------------------
编译错误:应为类型。

错误代码：Dim nv1 As Date = new (1900, 1, 1, v1.Hour, v1.Minute, v1.Second)
---------------------------