附件：11.bmp

运行环境：分辨率：1920×1080 色深：32位 操作系统：Windows 7 Ultimate 按键精灵版本：9.30.11197

Event Form1.Button1.Click       Dim 路径       Rem a       路径=Plugin.File.SelectFile()       If 路径<>"" then           If (LCase(Right(路径,4)) = ".jpg" or LCase(Right(路径,4)) = ".bmp" or LCase(Right(路径,4)) = ".gif") Then               Form1.PictureBox1.Picture = 路径           Else               MsgBox "请选择（.jpg）、（.bmp）或（.gif）格式图片！！！"               Goto a           End If       End If   End Event   Event Form1.Button2.Click       Form1.PictureBox1.Picture =  "Attachment:\11.bmp"    End Event            Event Form1.PictureBox1.Click       MessageBox 1   End Event