以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  复制粘贴不能触发这段代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=95359)
--  作者：114039247
--  发布时间：2017/1/17 16:18:00
--  复制粘贴不能触发这段代码

Drawcell事件

 

If e.Col.name = "第一列" Then
    Dim fdr As DataRow = DataTables("表A").find("第一列 = \'" & e.Row("第一列") & "\'")
    If fdr IsNot Nothing Then
        e.Table.DataTable.AddUserStyle("样式1", Color.red, color.black)
        e.style = "样式1"
    End If
End If


第一列的数据是粘贴进去的，只能双击单元格才能触动上面的代码，如果行数很多粘贴进去一个个点很麻烦。怎么弄？
--  作者：有点色
--  发布时间：2017/1/17 16:20:00
--  
 我测试，没问题，肯定是你粘贴进去的内容有问题，比如有多余空格之类的。
--  作者：114039247
--  发布时间：2017/1/17 17:13:00
--  
确实是空格的问题 忽略了图片点击可在新窗口打开查看