主题：请求指点迷经

如果 labl 列里含有 apm ，al 等字符，则qu 列 值为1  反之，qu 咧 的值=2  下面这段代码我是想要这个效果。但是，反应不对。为甚呢？ 代码的问题么？ 这段代码是写在 datacolchange 事件里的。 请各位前辈帮忙。谢谢~~~！！！！

If e.DataRow("labl").Contains("Apm") Or e.DataRow("labl").Contains("Al") Or e.DataRow("labl").Contains("us")  Or e.DataRow("labl").Contains("ds")  Or e.DataRow("labl").Contains("nz")  Then
e.DataRow("qu")= 1 else

e.datarow（“qu”）=2

End If

这个代码有什么问题么? 为甚 qu的 值都是 2呢？

Dim s As String = "Apm,Al,us,ds,nz"
If e.Col.Name = "labl" Then

   If s.Contains(e.Row("labl")) Then
      e.Row("qu") = 1

   Else
      e.Row("qu") = 2

   End If

End If

DataColChanged

似乎真的有问题，请狐爸验证一下。

哎！又没问题了。咋弄的？

可是我没有编辑过数据阿 数据都是自动拷贝过来的。

必须要datachange阿

Dim s As String = "Apm,Al,us,ds,nz"
If e.DataCol.Name = "labl" Then

   If s.Contains(e.DataRow("labl")) Then
      e.DataRow("qu") = 1

   Else
      e.DataRow("qu") = 2

   End If

End If