主题：[求助]刷新同步某些列值

方法一：

Select Case e.DataCol.name
    Case  "测试机型","软件版本","现象描述","发现阶段","严重程度","优先级别","怀疑模块","附件","附件目录"
        Dim dr As DataRow = DataTables("BUG研发表").Find("BUG_ID = '" & e.DataRow("BUG_ID") & "'")
        If dr IsNot Nothing Then
            dr(e.DataCol.Name) = e.DataRow(e.DataCol.Name)

            dr.save 
        End If
End  Select

方法二：

你在1楼的代码那里，先把 BUG研发表 保存，再Load表格

去看保存事件。