如何在vb.net的XtraReport中将文本框的值/字符串传递给XtraLabel？

编程问答 2022-06-11

问题描述

我想将值或字符串从文本框传递到XtraLabel，到目前为止，我要做的是创建一个参数，然后将该值直接发送到该参数中，然后Data Bind带有创建的参数的标签。

我的代码是这样的：

Imports DevExpress.XtraPrinting
Imports DevExpress.XtraReports.UI

Public Class Form1
    Private Sub Button1_Click(sender As Object,e As EventArgs) Handles Button1.Click

        Dim reports As New XtraReport1()
        Dim pt As New ReportPrintTool(reports)

        reports.GetValue.Value = Integer.Parse(TextBox1.Text)
        pt.AutoShowParametersPanel = True
        pt.ShowPreviewDialog()

    End Sub
End Class

它确实传递了值，但是我必须单击“参数”面板中的“提交”以将值或字符串传递给我不想要的GetValue参数，而当我设置pt.AutoShowParametersPanel = False时却没有根本不会创建任何文档。我想从文本框中输入一个值，当我单击按钮时，它将自动将文本框中的值加载到XtraReport1中的xtralabel。请帮忙，还有其他方法可以正确执行此操作吗？我想尽可能地使用参数，但是任何一种方法都可以。谢谢。

Form1图片：

enter image description here

XtraReport1图片：

enter image description here

编辑：我忘了说这是一个测试程序

解决方法

Dim parameter As New Parameter() With {.Name = "GetValue",.Type = GetType(String),.Value = TextBox1.Text}
reports.Parameters.Add(parameter)

Create a Report Parameter

,

我再次阅读devexpress网站以了解如何使用参数，我几乎没注意到Web上的“提示”。您需要做的是：

reports.Parameters("GetValue").Value = TextBox1.Text
reports.RequestParameters = False

以这种方式，报告将不会要求输入，它将自动发送输入并将其提交给参数

devexpressdevexpressvb.netvb.netxtrareport