主题：甜版，表达式问题求教！！！！！

 去学基础 http://www.foxtable.com/help/topics/0328.htm

Dim dr As DataRow = e.DataRow
Dim dt As Table = Tables("证书编号表")
If e.DataCol.Name = "申报鉴定工种" Then
    dr("取得证书人数_初级工") = dt.Compute("Count(姓名)", "鉴定等级 = '初级工' and 申报鉴定工种 = '" & dr("申报鉴定工种")  & "'" )
    dr("取得证书人数_中级工") = dt.Compute("Count(姓名)", "鉴定等级 = '中级工' and 申报鉴定工种 = '" & dr("申报鉴定工种")  & "'" )
    dr("取得证书人数_高级工") = dt.Compute("Count(姓名)", "鉴定等级 = '高级工' And 申报鉴定工种 = '" & dr("申报鉴定工种")  & "'" )
    dr("取得证书人数_技师") = dt.Compute("Count(姓名)", "鉴定等级 = '技师' and 申报鉴定工种 = '" & dr("申报鉴定工种")  & "'" )
    dr("取得证书人数_高级技师") = dt.Compute("Count(姓名)", "鉴定等级 = '高级技师' And 申报鉴定工种 = '" & dr("申报鉴定工种")  & "'" )
   
  End If

Dim dr As DataRow = e.DataRow
Dim dt As Table = Tables("报名登记表")
If e.DataCol.Name = "申报鉴定工种" Then
    dr("鉴定考核人数_初级工") = dt.Compute("Count(姓名)", "鉴定等级 = '初级工' and 申报鉴定工种 = '" & dr("申报鉴定工种")  & "'" )
    dr("鉴定考核人数_中级工") = dt.Compute("Count(姓名)", "鉴定等级 = '中级工' and 申报鉴定工种 = '" & dr("申报鉴定工种")  & "'" )
    dr("鉴定考核人数_高级工") = dt.Compute("Count(姓名)", "鉴定等级 = '高级工' And 申报鉴定工种 = '" & dr("申报鉴定工种")  & "'" )
    dr("鉴定考核人数_技师") = dt.Compute("Count(姓名)", "鉴定等级 = '技师' and 申报鉴定工种 = '" & dr("申报鉴定工种")  & "'" )
    dr("鉴定考核人数_高级技师") = dt.Compute("Count(姓名)", "鉴定等级 = '高级技师' And 申报鉴定工种 = '" & dr("申报鉴定工种")  & "'" )
   
  End If

End If

甜版，简单加代码报错，是不是还要加代码？

我对代码语法的理解总是按中文的意思去写，所以出现问题！谢谢甜版！

甜版，分别在两个不同窗口中的两个表（表1和表2）之间某几列之间进行比对，如相同则在表1中的一空白列（列名为“是否合格”）中返回“是”，否则为“否”，这个用表达式行不通，因为找不到另外1张表，用find或slect函数，看了很久的帮助好象都不合适，我应该用什么方法？是不是要在表1所在窗口中建1个比对判断按钮，用什么语法在click事件体现？

另表1中有列日期格式列（比如2010-10-12），如何按现在的当前的年（2015）进行只判断年数≥3或4或5什么的？是在要建的那个比对判断按钮中吗？

项目中有“报名登记表”和“证书编号表”，在“报名登记表”中的“是否合格”列通过条件比对得到“是”或“否”，即该员工是否具有报名资格？

条件满足下列之一即可（以高级工报考技师为例，其他的我可以类推）：

一、1、“原等级取得时间”到现在即2015年满3年且“原资格证书工种”和现在“申报鉴定工种”的相同（以年份数相减，如：2015－2010＝5，这是〉＝3满足的），

      2、 这里涉及“证书编号表”中“证书号码”列的那个号码，在“报名登记表”的“原资格证书编号”列中有，如何比对是该员工的？我想应该是用身份证号码（因为唯一）和姓    

名；

      如果条件1、2都满足则返回“是”，否则为“否”；

二、“报名登记表”中的“原资格证书工种”如为“助理工程师”，则要到如今满4年（以年份数相减，如：2015－2010＝5，这是〉＝4满足的），如是“工程师”，则返回“是”；

请甜版指教！