主题：关于表里某一列数据为一个值后，不能通过窗体进行修改的问题

表格的Click事件

If Forms("销售计划录入2").Opened Then
    If e.Row("状态") ="已生效" Then
        Forms("销售计划录入2").Controls("ComboBox3").Enabled = False
        Forms("销售计划录入2").Controls("ComboBox1").Enabled = False
        Forms("销售计划录入2").Controls("ComboBox2").Enabled = False
        Forms("销售计划录入2").Controls("子客户").Enabled = False
        Forms("销售计划录入2").Controls("数量").Enabled = False
        Forms("销售计划录入2").Controls("textbox1").Enabled = False
    Else
        Forms("销售计划录入2").Controls("ComboBox3").Enabled = True
        Forms("销售计划录入2").Controls("ComboBox1").Enabled = True
        Forms("销售计划录入2").Controls("ComboBox2").Enabled = True
        Forms("销售计划录入2").Controls("子客户").Enabled = True
        Forms("销售计划录入2").Controls("数量").Enabled = True
        Forms("销售计划录入2").Controls("textbox1").Enabled = True
    End If
End If

AfterSelChange事件

If Forms("销售计划录入2").Opened Then
    Dim r As Row = e.Table.Rows(e.NewRange.RowSel)
    If r("状态") ="已生效" Then
        Forms("销售计划录入2").Controls("ComboBox3").Enabled = False
        Forms("销售计划录入2").Controls("ComboBox1").Enabled = False
        Forms("销售计划录入2").Controls("ComboBox2").Enabled = False
        Forms("销售计划录入2").Controls("子客户").Enabled = False
        Forms("销售计划录入2").Controls("数量").Enabled = False
        Forms("销售计划录入2").Controls("textbox1").Enabled = False
    Else
        Forms("销售计划录入2").Controls("ComboBox3").Enabled = True
        Forms("销售计划录入2").Controls("ComboBox1").Enabled = True
        Forms("销售计划录入2").Controls("ComboBox2").Enabled = True
        Forms("销售计划录入2").Controls("子客户").Enabled = True
        Forms("销售计划录入2").Controls("数量").Enabled = True
        Forms("销售计划录入2").Controls("textbox1").Enabled = True
    End If
End If

 你可以任意获取后台值的

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

 新增的行没有必要判断，你只有修改以前的数据，才需要判断的。

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

加上判断

If 某行.RowState <> DataRowState.Added  Then

End If