dim s as String = "产品类别,产品型号,上限位,下限位,宽度A,宽度B,计数脉冲,速度,心率计,身高检测", "拍打1,拍打2,拍打3,揉捏1,揉捏2,揉捏3,宽度大,宽度中,宽度小", "上行走,下行走,靠背升,靠背降,小腿伸,小腿缩,零动力上,零动力下,气泵,气阀1,气阀2,气阀3,气阀4,气阀5,气阀6,气阀7,气阀8", "气阀9,气阀10,气阀11,气阀12,气阀13,气阀14,播放,上一曲,下一曲,加热1,加热2,振动1,振动2,振动3,振动4" If s.Contains(e.DataCol.Name) = True '您的代码 End If