主题：复选遍历(追加)

勾选后点击按钮，给勾选的行赋值文本框里面的内容，然后锁定行，然后改变锁定行的背景颜色？

AfterEdit事件

Select Case e.Col.name
    Case "第一列","第二列"
        If e.Row.Checked Then
            For Each r As Row In e.Table.GetCheckedRows
                If r.index <> e.Row.index
                    r("第一列") = e.Row("第一列")
                    r("第二列") = e.Row("第二列")

                    r.Locked = True
                End If
            Next
        End If
End Select

修改颜色，参考

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