各位老师：我在窗口中放置一下按钮及一个作为副本的表，主表是制造质量管理，代码如下：

    Dim t As Table = Tables("制造质量管理")
    Dim cr = t.Current

    Dim dph As String = cr("底盘号")
    DataTables("制造质量管理").ReplaceFor("日期1", Date.Today, "底盘号 = \'dph\'")

我想达到的效果是：当我按这个按钮时，所有底盘号是当行的所有行的日期1列填入当前的日期，但这个代码没有执行。将变量换成具体的数值，如JJ219853,

   Dim t As Table = Tables("制造质量管理")
   Dim cr = t.Current

   Dim dph As String = cr("底盘号")
   DataTables("制造质量管理").ReplaceFor("日期1", Date.Today, "底盘号 = \'JJ219853\'")

便可以执行！

但是当前行的底盘号是动态的，如果我选择其它行，底盘号变了！

请各位老师费心指教！这个变量或代码怎么编写！

比如

DataTables("制造质量管理").ReplaceFor("日期1", Date.Today, "底盘号 = \'dph\'")

改成

DataTables("制造质量管理").ReplaceFor("日期1", Date.Today, "底盘号 = \'" & dph & "\'")

http://www.foxtable.com/webhelp/scr/1284.htm

http://www.foxtable.com/webhelp/scr/2919.htm

噢，明白了，谢谢甜老师指教！