主题：窗口表的removefor 不起做用

Dim yea As String
yea = e.Sender.Value
Dim pihao As String
If yea <> "" Then
    For Each dc As DataCol In Tables("工艺参数修改查看_Table1").DataTable.DataCols     这个表是sqlcommand创建的临时表
        If dc.Name.StartsWith("批号") Or dc.Name.StartsWith("产品批号") Then
            pihao = dc.Name
        End If
    Next
    messagebox。show（pihao & yea）   这里正常显示
    Tables("工艺参数修改查看_Table1").DataTable.RemoveFor(pihao Like "'" & yea & "%'")   这里不起作用，表格里面还是有数据
    
End If

 OK了，like也要框进去。。。。