标题：列拆分求助

1楼

timber83 发表于：2025/3/14 16:18:00

有一张表，list，表属性加载afterload 设置

Dim adr As DataRow

For Each dr As DataRow In DataTables("List").Select("Ncode<>'' and Ncode is not null")

If dr IsNot Nothing Then

For Each s1 As String In dr("H").Split(",")

For Each s2 As String In dr("F").Split(",")

For Each s3 As String In dr("O").Split(",")

For Each s4 As String In dr("日常性层级").Split(",")

adr = dt.AddNew()

adr("Ncode") = dr("Ncode")

adr("H") = s1

adr("F") = s2

adr("O") = s3

adr("项目") = dr("项目")

adr("内容") = dr("内容")

adr("risk") = dr("risk")

adr("way") = dr("way")

adr("日常性层级") = s4

End If

现在需要规则为类【Ncode】非空且列【类型】包含“日常性”，这样的话，这句代码For Each dr As DataRow In DataTables("List").Select("Ncode<>'' and Ncode is not null")该如何修改

2楼

有点蓝 发表于：2025/3/14 16:24:00

For Each dr As DataRow In DataTables("List").Select("Ncode<>'' and Ncode is not null and 类型 like '%日常性%'")

共2 条记录, 每页显示 10 条, 页签: [1]