1. 情况 1:
  2.     令 Form1.选择.Enabled = True
  3.     令 Form1.路径.Enabled = True
  4.     令 Form1.播放.Enabled = True
  5.     令 Form1.停止.Enabled = True
  6. 情况 :
  7.     令 Form1.选择.Enabled = False
  8.     令 Form1.路径.Enabled = False
  9.     令 Form1.播放.Enabled = False
  10.     令 Form1.停止.Enabled = False
  11. 选择结束
  12. (语句无法识别，可能有错误): End Event
  13. 注释：选择MP3文件路径
  14. Event(Form1.选择.Click)
  15. 定义变量 MP3
  16. (语句无法识别，可能有错误): MP3 = Plugin.File.SelectFile() '打开选择文件对话框
  17. 如果 UCase(Right(MP3,4)) = ".MP3" 或者 UCase(Right(MP3,4)) = ".WAV" 则
  18.     注释：检查是不是选中 .mp3 音乐文件
  19. 条件结束
  20. 令 Form1.路径.Text = MP3
  21. 否则
  22.     如果 MP3 <> "" 则
  23.         MsgBox("请选择“.mp3或者.wav”音乐格式的文件！")
  24.     条件结束
  25. 条件结束
  26. (语句无法识别，可能有错误): End Event
  27. 注释：播放音乐测试
  28. Event(Form1.播放.Click)
  29. 调用 Media.Play(Form1.路径.Text)
  30. (语句无法识别，可能有错误): End Event
  31. 注释：停止播放音乐
  32. Event(Form1.停止.Click)
  33. 调用 Media.Stop()
  34. (语句无法识别，可能有错误): End Event
  35. 注释：停止播放音乐
  36. (语句无法识别，可能有错误): Event Form1.UnLoad '当窗体被关闭卸载后触发的事件
  37. 调用 Media.Stop()
  38. (语句无法识别，可能有错误): End Event
  39. 注释：加载窗体时释放MP3文件
  40. (语句无法识别，可能有错误): Event Form1.Load '当窗体被加载时触发的事件
  41. 展开附件 *.wav 到 C:\ 文件夹
  42. (语句无法识别，可能有错误): End Event