vb.net - 如何根据VB中文本框的内容播放一系列音频文件？

Question

我正在开发一个铁路公告系统，并希望能够从列表中获取一些信息，例如“约克、达灵顿、达勒姆”，然后在按下按钮后播放相关的录音。
任何人都可以帮忙吗？

Answer 1

一种选择是创建一个字典，其中键代表您的列表项，值代表按下按钮后您希望播放的声音的文件位置。然后，您可以将 Dictionary 绑定(bind)到您的控件，其中控件显示的文本是 Dictionary 的 Key，而控件的值是 Dictionary 的 Value。那样的话，您可以只获得要播放的控件的选定值。

下面是一个使用 ComboBox 的示例:

Private stations As Dictionary(Of String, String)
Sub New()
    stations = New Dictionary(Of String, String)
    stations.Add("York, Darlington, Durham", "sound-a.mp3")
    'stations.Add("...", "...")

    With ComboBoxStations
        .DataSource = New BindingSource(stations, Nothing)
        .DisplayMember = "Key",
        .ValueMember = "Value"
    End With
End Sub

Private Sub PlaySound(ByVal sender As Object, ByVal e As EventArgs) Handles ButtonPlaySound.Click
    If (ComboBoxStations.SelectedValue IsNot Nothing) Then
        My.Computer.Audio.Play(ComboBoxStations.SelectedValue.ToString(), AudioPlayMode.WaitToComplete)
    End If
End Sub