access 窗体 怎么通过按钮打印当前页 ACCESS用报表打印当前窗体内记录

\u7528access\u6253\u5370\u5f53\u524d\u7a97\u4f53\uff0c\u4ee3\u7801\u5982\u4e0b\uff0c\u70b9\u51fb\u201c\u6253\u5370\u201d\u6309\u94ae\u540e\uff0c\u51fa\u73b0\u6253\u5370\u754c\u9762\u53ef\u4ee5\u6253\u5370\uff0c\u4f46\u662f\u70b9\u51fb\u201c\u53d6\u6d88\u201d\u6253\u5370\u7684\u65f6

docmd.PrintOut
\u4f60\u8bd5\u8bd5\u8fd9\u4e2a!


DoCmd.PrintOut \u65b9\u6cd5 \uff08\u7684\u8bbf\u95ee\uff09
Office 2013
PrintOut\u65b9\u6cd5\u6267\u884c PrintOut \u64cd\u4f5c\u5728 Visual Basic \u4e2d\u3002

\u8bed\u6cd5


\u8868\u8fbe\u5f0f .PrintOut(PrintRange, PageFrom, PageTo, PrintQuality, Copies, CollateCopies)
\u8868\u8fbe\u5f0f \u4e00\u4e2a\u4ee3\u8868 DoCmd \u5bf9\u8c61\u7684\u53d8\u91cf\u3002
\u53c2\u6570


\u540d\u79f0


\u5fc5\u9700/\u53ef\u9009


\u6570\u636e\u7c7b\u578b


\u8bf4\u660e



PrintRange

\u53ef\u9009

AcPrintRange

AcPrintRange \u5e38\u91cf\uff0c\u6307\u5b9a\u8981\u6253\u5370\u7684\u8303\u56f4\u3002\u9ed8\u8ba4\u503c\u662facPrintAll\u3002



PageFrom

\u53ef\u9009

Variant

\u8981\u6253\u5370\u7684\u7b2c\u4e00\u9875\u3002\u6570\u503c\u8868\u8fbe\u5f0f\u7684\u6d3b\u52a8\u7a97\u4f53\u6216\u6570\u636e\u8868\u4e2d\u7684\u6709\u6548\u9875\u7801\u3002\u5982\u679c\u60a8\u6307\u5b9aacPagesprintrange\u53c2\u6570\uff0c\u5219\u9700\u8981\u6b64\u53c2\u6570\u3002



PageTo

\u53ef\u9009

Variant

\u8981\u6253\u5370\u7684\u6700\u540e\u4e00\u9875\u3002\u6570\u503c\u8868\u8fbe\u5f0f\u7684\u6d3b\u52a8\u7a97\u4f53\u6216\u6570\u636e\u8868\u4e2d\u7684\u6709\u6548\u9875\u7801\u3002\u5982\u679c\u60a8\u6307\u5b9aacPagesprintrange\u53c2\u6570\uff0c\u5219\u9700\u8981\u6b64\u53c2\u6570\u3002



PrintQuality

\u53ef\u9009

AcPrintQuality

AcPrintQuality \u5e38\u91cf\uff0c\u6307\u5b9a\u6253\u5370\u8d28\u91cf\u3002\u9ed8\u8ba4\u503c\u662facHigh\u3002



Copies

\u53ef\u9009

Variant

\u6253\u5370\u4efd\u6570\u3002\u5982\u679c\u5c06\u8be5\u53c2\u6570\u4fdd\u7559\u4e3a\u7a7a\uff0c\u5c06\u91c7\u7528\u9ed8\u8ba4\u503c (1)\u3002



CollateCopies

\u53ef\u9009

Variant

\u4f7f\u7528True (\u2013 1) \u9010\u4efd\u6253\u5370\u526f\u672c\u548cFalse (0 \u4e0d\u6392\u5e8f\u7684\u60c5\u51b5\u4e0b\u6253\u5370)\u3002\u5982\u679c\u5c06\u6b64\u53c2\u6570\u7559\u7a7a\uff0c\u5219\u5047\u5b9a\u7684\u9ed8\u8ba4 (True)\u3002

\u5f88\u7b80\u5355\uff0c\u5728\u6253\u5f00\u62a5\u8868\u547d\u4ee4\uff0c\u4f5c\u4e00\u4e2a\u6761\u4ef6\uff0c\u8ba9\u62a5\u8868\u8bb0\u5f55\uff0c\u7b49\u4e8e\u5f53\u524d\u8bb0\u5f55\uff1a
\u5728 "\u6253\u5370\u5f53\u524d\u8bb0\u5f55" \u6309\u94ae \u7684 \u5355\u51fb \u4e8b\u4ef6\u91cc\uff0c\u5199\u4e0b\u8fd9\u6761\u4ee3\u7801\uff1a
DoCmd.OpenReport RepName, acViewPreview, , Whi
RepName \u4e3a\u62a5\u8868\u540d\u5b57\uff0cacViewPreview \u662f\u6253\u5370\u89c6\u56fe\uff0cWhi \u5c31\u662f\u6761\u4ef6

Whi \u53ef\u4ee5\u8bbe\u7f6e\u4e3a\uff0c\u4f8b\u5982\uff1a
Whi="[\u4ea4\u6613ID] = [Forms]![\u9500\u552e\u8ba2\u5355\u7a97\u4f53]![\u4ea4\u6613ID]"

\u8ba9\u62a5\u8868\u7684\u8bb0\u5f55\u7f16\u53f7 \u7b49\u4e8e\u7a97\u4f53\u7684\u8bb0\u5f55\u7f16\u53f7\u3002\u8fd9\u6837\uff0c\u5c31\u53ea\u6253\u5370\u5f53\u524d\u8bb0\u5f55\u4e86\u3002

在设计视图状态下，利用向导按钮创建该功能键即可。
希望我的回答对你有帮助，如有疑问可以留言或在线交流。

用按钮调用报表名（可用宏、也可用VBA代码）即可。

扩展阅读：access软件网 ... access 表窗体 行 值 ... 永久免费access进销存 ... microsoft access ... 已知a*b 3a+b 那么120 ... aes ecb 破解方式 ... access 进销存开发教程 ... ac+cd ab ∠c 80 ... 永久免费进销存软件哪个好 ...