标题：表达式列如果计算年龄？

表达式列如果计算年龄？

我有一个表，有一个字段名为出生日期，一个表达式列名叫年龄，请教年龄表达式如何根据出生日期自动计算。公式如何写

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

人家是要在表达式列里计算。