主题：求帮忙,我写读音代码是否严谨,刚才好好的现在又莫名出错，谢谢

Dim dy As WinForm.CheckBox = e.Form.Controls("duy")
If dy.Checked =True  Then
    Dim s() As String ={0,1,2,3,4,5,6,7,8,9}
    For Each q As String In s
        If e.KeyChar =q Then
            Audio.Play(ProjectPath & "\sound\" & q & ".wav",AudioPlayMode.WaitToComplete)
        End If
    Next
End If