Pic(0,0,1023,767,"1.bmp",0.9,x,y)//======把图片1放进附件中If x>=0 and y>=0moveto x,ymsgbox "找到图片"elsemsgbox "没找到图片!"EndIf
