谢谢LIHAI，出现了以下的错误提示：

============Microsoft VBs cript runtime error============
Application : PDLRT
Picture : TEST-1.pdl_Events
Function : Sub
Line : 1
Error : ActiveX component can't create object: 'Ws cript.Shell'
============Microsoft VBs cript runtime error============


谢谢笑西风！！！
您讲的这个方法我也试过！但是运行后总出现错误提示，大意是指“PRTSCR.EXE 出错，内存在XXXXXX不能被写”，但奇怪的是只要去除
WinExec("PrtScr.exe -l -nomcp",SW_SHOWNORMAL); 中的“-l”参数就没问题！但这样一来只能以竖向输出！我用的网络打印机！但在本地打印机上也用过！偶尔能行，但大都数还是问题照旧！！！
我问过SIEMENS的技术支持，他们说有可能是WINDOWS系统问题，也有可能是打印机问题！


我郁闷啊！谁来帮帮我！！！