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