我当前正在运行以下VBA代码:
DoCmd.OutputTo acReport, "r_GRV_DETAIL_EXPORT", "MS-DOSText(*.txt)", "C:ApplicationTSClientBin1Scans123.txt", False, ""
然而,我会有不同的用户使用该应用程序,他们每个人都有一个特定的位置,需要将报告导出到(bin2、bin3等(。我将让他们选择用户名,并在此基础上,导出位置将填充在一本教科书中。
问题:如何使用文本框中定义的位置填充上述代码(称为:txt_MAIN_SCAN_location(。
任何帮助都将不胜感激。
请尝试下一种方法:
Dim strSpecif as String
strSpecif = Forms![frm_MAIN_MENU]![txt_MAIN_SCAN_LOCATION].Value
然后,在代码中使用这个新变量:
DoCmd.OutputTo acReport, "r_GRV_DETAIL_EXPORT", "MS-DOSText(*.txt)", strSpecif , False, ""
使用Value
属性将不需要文本框上的前一个SetFocus
,就像使用Text
属性一样。