主题：[求助][原创]表事件问题

此主题相关图片如下：qq截图20120425150440.png

操作表

按照例子说明：DataColChanged事件中，插入代码： 

If e.DataCol.Name = "已结帐" Then
    If e.NewValue = True Then
        e.DataRow.Locked = True
    End If
ElseIf e.DataCol.Name = "身份证号码" Then
    If e.DataRow.IsNull("身份证号码") Then
        e.DataRow("出生日期") = Nothing
    Else
        e.DataRow("出生日期") = ReadBirthday(e.NewValue)
    End If
End If

列为：身份证号码（字符255），出生日期（字符255）。

输入身份证号码后回车不会在出生日期列自动出现出生日期值。

请问是说明原因呢？

我看了一下帮助，如果要对列进行表达式计算，可以在表事件中设置。

比如说：我一个表中有‘门洞尺寸’‘门扇尺寸’，‘门框尺寸’三个列，逻辑关系为：

门洞尺寸的计算公式为：门扇尺寸（输入格式：2000*800*60）分解，赋值三个变量，A = 2000，B = 800 C=60，然后计算，门洞尺寸：A+100，B+50，C，然后再通过截取字符串，恢复成（2100*2050*60）的格式。

表事件中，门扇尺寸列发生变化后，激活以上公式，在门洞尺寸中输入公式计算出的值。

应该在 DataColChanged事件中，插入代码，请问这个思路对么？

我现在不计算出生日期，我把代码换成：

If e.DataCol.Name = "已结帐" Then
    If e.NewValue = True Then
        e.DataRow.Locked = True
    End If
ElseIf e.DataCol.Name = "身份证号码" Then
    If e.DataRow.IsNull("身份证号码") Then
        e.DataRow("出生日期") = Nothing
    Else
        e.DataRow("出生日期") = 1982-08-08
    End If
End If

就是如果输入身份证号码之后，就会自动把当前出生日期列的行，设置成为1982-08-08，这个格式错了么？

加上""了，还是不行。。不会赋值到出生日期列中。。晕了。。

我知道怎么回事了，我下载了你的项目之后，还是不成，估计是我电脑的问题，我把系统重新安装一下试试。。