现已知sys(2040)是一个报表输出的检测报告函数。从网上翻译学习，她有三种返回状态0——无活动报表,1——报表预览未输出，2——报表输出，试了二天都用不上这个函数，不知道写报表打印按键的哪个位置。谁能给个示范的例子。谢谢！

没用过

放在打印输出的数据域或打印条件那里处理输出不同内容

在报表的 Page Footer, On Exit 中，增加表达式：_vfp.setvar("gcReportDest", Sys(2040))
然后你就可以判别状态了。

假设你用代码方式增加 Sys(2040)，以及调用的示例：

Public gcReportDest
*********
Create Cursor aa (aa I Autoinc)
Append Blank
*!*    创建一个 aa 报表，设置页脚的 On Exit
Create Report aa From aa
Select 0
Use aa.frx
Locate For ObjType=9 And ObjCode=7
If Found()
    Replace TAG2 With '_vfp.setvar("gcReportDest", sys(2040))'  && 在 Page Footer, On Exit 中
Endif
Use
Select aa
Set ReportBehavior 80
gcReportDest="0"
Report Form aa Preview
Do Case
Case gcReportDest="1"
    Messagebox("报表预览输出，未打印输出")
Case gcReportDest="2"
    Messagebox("报表打印输出")
Otherwise
    Messagebox("无活动报表")
Endcase
*!*    Set ReportBehavior 90 报表预览
Set ReportBehavior 90
gcReportDest="0"
Report Form aa Preview
Do Case
Case gcReportDest="1"
    Messagebox("报表预览输出，未打印输出")
Case gcReportDest="2"
    Messagebox("报表打印输出")
Otherwise
    Messagebox("无活动报表")
Endcase
*!*    Set ReportBehavior 90 to 报表打印
gcReportDest="0"
Report Form aa To Printer
Do Case
Case gcReportDest="1"
    Messagebox("报表预览输出，未打印输出")
Case gcReportDest="2"
    Messagebox("报表打印输出")
Otherwise
    Messagebox("无活动报表")
Endcase

谢谢！