//图片文件需要存放到附件中，并按1.bmp到10.bmp格式命名，查找范围根据实际来设置For i = 1 To 10FindPic 0,0,1024,768,"Attachment:\"+"i"+".bmp",0.9,intX,intYIf intX > 0 And intY > 0 Then TracePrint iEnd IfNext
