PB中window上的OLE控件打印不了,打印为空白

各位大神，帮忙看看PBPB中window上的OLE控件打印不了,打印为空白
long Job ,longx,longy

PrintSetup ( )
Ole_1.border=false

Job = PrintOpen("OLE_1" )

Ole_1.Print(Job,1,1000)
Ole_1.border=true
PrintClose(Job)