Randomize a = Int((350 * Rnd) + 50) If a<401 Then End If FindPic 0,0,1440,900,"Attachment:\工会聊天.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intX+200, intY+a LeftDown 1 MoveR -230, 0 LeftUp 1 Delay 5 KeyDown 17, 1 KeyPress 67, 1 KeyUp 17, 1 End If FindPic 0,0,1440,900,"Attachment:\输入.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intX+10, intY+30 LeftClick 1 LeftClick 1 KeyDown 17, 1 KeyPress 86, 1 KeyUp 17, 1 End If FindPic 0,0,1440,900,"Attachment:\cdk确定.bmp",0.9,intX,intY If intX > 0 And intY > 0 Then MoveTo intX, intY LeftClick 1 End If