如何将多个值发送给单个参数？

Question

我正在尝试向水晶报表参数发送三个字符串“ huis” 他只有在我选中一个复选框的情况下才能工作

我想让水晶报告给我在复选框上选择的内容（huis）

 select * from Mess22 where Cont in {?@huis}

Dim huis As String

        If CheckBox1.Checked = True Then
            huis = CheckBox1.Text
        End If

        If CheckBox2.Checked = True Then
            If huis = "" Then
                huis = CheckBox2.Text
            Else
                huis = huis & "," & CheckBox2.Text
            End If
        End If

Aver5.Load("Avert5.rpt")
        Aver5.SetParameterValue("@huis", huis.ToString)
        AvF.CR2.ReportSource = Aver5
        AvF.ShowDialog()

Answer 1

将记录选择公式更改为： 继续使用Split（{？@ huis}，“，”） 这样会将字符串转换为数组以进行比较。

另一种选择是将参数设计为多值参数，并使用API​​逐个添加值。