[求助]请大神帮忙看下 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

If e.DataCol.Name = "结算抬头" Then '如果内容发生变动的是品名列

    If e.NewValue Is Nothing Then '如果新值是空白,也就是品名列的内容为空
        e.DataRow("人工单价") = Nothing '那么清空此行单价列的内容
    Else
        Dim dr As DataRow
        dr = DataTables("人工单价表").Find("[人工单价] = '" & e.NewValue & "'")
        If dr IsNot Nothing Then '如果找到了同名的产品行,也就是dr不是Nothing
            e.DataRow("人工单价") = dr("人工单价")
        End If
    End If
End If

版主，还要再请教下。由于人工单价每年都会有变化，现在想在人工单价表里将每年的人工单价分别列出，如“人工单价_2018”“人工单价_2019”，然后根据“零星维修表”中编号（格式为“LX201801-001）中的年份，在“人工单价”列自动获取对应年份的单价，请问代码应该怎么写？请版主帮忙图片点击可在新窗口打开查看

主题：[求助]请大神帮忙看下