写到datacolchanged事件

http://www.foxtable.com/webhelp/scr/1445.htm

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:人事台账 (1).table

Select Case e.DataCol.name

    Case "出生日期"

        If e.DataRow.IsNull("出生日期") Then
            e.DataRow("年龄") = Nothing
        Else
            Dim tp As TimeSpan = Date.today - CDate(e.DataRow("出生日期"))
            e.DataRow("年龄") = Math.Round(tp.TotalDays / 365.2422,2)
        End If
End Select

If e.DataCol.Name = "出生日期" Then
    If e.DataRow.IsNull("出生日期") Then \'如果没有输入出生日期
        e.DataRow("年龄") = Nothing \'则清空年龄
    Else
        \'否则计算年龄
        e.DataRow("年龄") = Date.Today.Year - e.DataRow("出生日期").Year
    End If
End If

这两段代码有什么不同？第一段中提示“Case运算符后缺少操作数”，第二段提示“e运算符后缺少操作数”，该怎么修改？老师回答：写到datacolchanged事件

http://www.foxtable.com/webhelp/scr/1445.htm，可是不会弄该怎么办？我是菜鸟，烦请指教！

代码写在datacolchanged事件

http://www.foxtable.com/webhelp/scr/1445.htm