在Access中使用文本框值作为字符串

时间:2016-09-02 14:28:27

标签: string ms-access textbox access-vba report

我有一张表可以提供多个报告。例如,对于每个客户,我有一个带有自己的徽标等的不同报告,但所有这些报告都从一个表中获取数据。每个报告都有一个不同的名称,该名称附加到不同列中的客户名称。 然后我有一个表单,我选择客户,相应的报告名称出现在文本框中。 我想使用以下命令使用命令按钮打开每个单独的报告: DoCmd.OpenReport" REPORT_NAME",acViewPreview

" REPORT_NAME"必须从开头表单中为每个客户的文本框中的字符串值替换。

我应该用什么命令来解决这个问题?

我希望这不会太混乱。

提前致谢。

1 个答案:

答案 0 :(得分:1)

不确定我是否遗漏了什么,但你可以做到

DoCmd.OpenReport Me!theTextboxWithReportName, acViewPreview

或更精细一点

Dim strReport As String
strReport = Nz(Me!theTextboxWithReportName, "")
If strReport <> "" Then
    DoCmd.OpenReport strReport, acViewPreview
End If