问题一：如何 设置 相当于 excel 里面 “=”的函数，例如：A列数据已填好，令 B列 =A 列。

问题二：代码原来 根据 新变动的内容 ，在另外一列 ，自动填 相应的名称。

如何改成，不是 新变动 ，是这一列已经有的，都会在另一列 填充呢？

If e.DataCol.Name = "科目名称" Then
    If e.NewValue Is Nothing Then
        e.DataRow("产品代号") = Nothing
    Else
        Dim dr As DataRow
        dr = DataTables("bom_info").Find("[m_s_g_name] = \'" & e.NewValue & "\'")
        If dr IsNot Nothing Then \'如果找到了同名的产品行,也就是dr不是Nothing
            e.DataRow("产品代号") = dr("m_s_g_name")
        End If
    End If
End If

1、那就将改为表达式列，表达式为: [A]

2、设置好代码之后，重置一下目录名称列，才能对原来的数据生效，帮助不止一处介绍重置列的哦，参考：

http://www.foxtable.com/help/topics/0625.htm

http://www.foxtable.com/help/topics/1469.htm

http://www.foxtable.com/help/topics/1587.htm

Missing operand after \'s\' operator.

编程重置时候 ，经常发生这样的 ？是什么回事呢？？？