主题：锁定

Select Case e.Col.Name
    Case "探伤要求_VT","探伤要求_PT","探伤要求_MT","探伤要求_UT","探伤要求_RT","探伤要求_备注"
        Dim nms() As String = {"探伤要求_VT","探伤要求_PT","探伤要求_MT","探伤要求_UT","探伤要求_RT","探伤要求_备注"}
        For Each nm As String In nms
            If e.Row("焊接顺序").NotContains("盖面") Then
                e.cancel = True
            End If
        Next
End Select

请教：

“焊接顺序”中不包含字符“盖面”，则指定列锁定，要怎么改？