key = WaitKey() Select Case key case 96 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\0.WAV") case 97 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\1.WAV") case 98 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\2.WAV") case 99 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\3.WAV") case 100 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\4.WAV") case 101 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\5.WAV") case 102 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\6.WAV") case 103 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\7.WAV") case 104 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\8.WAV") case 105 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\9.WAV") case 106 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\乘.WAV") case 107 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\加.WAV") case 109 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\减.WAV") case 110 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\点.WAV") case 111 Call Plugin.Media.Play("C:\Program Files\按键精灵9\声音\除.WAV") case 144 MessageBox "语音报数已启动!" End Select