Report Builder中如何将LookupSet多值拆分至多列？

我明白你遇到的痛点：用LookupSet获取多值时直接索引访问在单值场景下会报错，试过IIF和Length判断却没效果。这主要是因为LookupSet返回的是Object类型，而非直接可访问的数组，直接调用Length属性会导致类型错误。下面给你几个可行的解决方案：

方法1：通过Join+Split间接处理（无需自定义代码） #

这个方法利用你已经熟悉的Join先把多值合并成字符串，再用Split拆分成数组，这样不管单值还是多值都能安全访问索引：

• **Column1（第一个值）**的表达式：

  =Split(Join(LookupSet(Fields!SignalId.Value, Fields!SignalId.Value, Fields!r_configuration.Value, "RData"), ","), ",")(0)
  

  原理：即使只有一个值，Join后是单个字符串，Split生成长度为1的数组，访问索引(0)不会报错；如果没有匹配值，Join返回空字符串，Split生成包含空字符串的数组，同样不会触发#Error。

• **Column2（第二个值）**的表达式：

  =IIF(Split(Join(LookupSet(Fields!SignalId.Value, Fields!SignalId.Value, Fields!r_configuration.Value, "RData"), ","), ",").Length >= 2, 
       Split(Join(LookupSet(Fields!SignalId.Value, Fields!SignalId.Value, Fields!r_configuration.Value, "RData"), ","), ",")(1), 
       "")
  

  这里先判断数组长度是否≥2，避免索引越界，没有第二个值时返回空字符串。

方法2：自定义代码安全访问数组（更高效） #

如果报表中需要多次访问不同索引的值，重复调用LookupSet会影响性能，建议添加自定义代码来封装数组的安全访问逻辑：

1. 打开Report Builder的报表属性 → 切换到代码标签页，粘贴以下VB代码：

   Function GetLookupValue(lookupResult As Object, targetIndex As Integer) As String
       ' 处理空结果
       If lookupResult Is Nothing Then
           Return ""
       End If
       ' 转换为Object数组
       Dim resultArray As Object() = CType(lookupResult, Object())
       ' 判断索引是否有效
       If resultArray.Length > targetIndex Then
           Return CStr(resultArray(targetIndex))
       Else
           Return ""
       End If
   End Function
   

2. 然后在列表达式中调用这个函数：

   • Column1：

     =Code.GetLookupValue(LookupSet(Fields!SignalId.Value, Fields!SignalId.Value, Fields!r_configuration.Value, "RData"), 0)
     

   • Column2：

     =Code.GetLookupValue(LookupSet(Fields!SignalId.Value, Fields!SignalId.Value, Fields!r_configuration.Value, "RData"), 1)
     

   这个方法只需要调用一次LookupSet，由自定义代码处理类型转换和索引判断，既高效又能避免报错。

为什么你之前的IIF判断无效？ #

你之前尝试的LookupSet(...).Length会报错，是因为LookupSet返回的是Object类型（不是直接的数组），SSRS无法直接识别其Length属性。必须先通过CType(LookupSet(...), Object())将其转换为数组，才能正确获取长度。比如修正后的判断逻辑应该是：

=IIF(CType(LookupSet(Fields!SignalId.Value, Fields!SignalId.Value, Fields!r_configuration.Value, "RData"), Object()).Length > 0, 
     CType(LookupSet(Fields!SignalId.Value, Fields!SignalId.Value, Fields!r_configuration.Value, "RData"), Object())(0), 
     "")

不过这种写法需要重复调用LookupSet，不如上面两种方法优雅。

内容的提问来源于stack exchange，提问作者reneton