Dim ls As String = e.sender.value
Dim ls1 As String = "KR05-1166001"
Dim t As Table = Tables("质检_Table1")With Tables("质检_Table1") t.Filter = "序号 = '" & ls & "' or 序号 = '" & ls1 & "'"
End With
加好友 
发短信
Post By：2015/8/12 15:43:00 [显示全部帖子]
