prepareedit事件
Select Case e.Col.name
Case "年"
If e.Row.isnull("年") Then
If e.Row.isnull("月") = False OrElse e.Row.isnull("天") = False Then
e.cancel = True
End If
End If
Case "月"
If e.Row.isnull("月") Then
If e.Row.isnull("年") = False OrElse e.Row.isnull("天") = False Then
e.cancel = True
End If
End If
……
End Select