编写vb.net代码，使得在窗体bookingform里面的listbox控件选择一个时间段（例如11:00-13:00）之后，该时间段不能被另一名用户再次选择

首先，您需要在代码中创建一个数据结构来存储已经预订的时间段，例如一个名为“bookedTimes”的Dictionary，其中键为时间段，值为bool类型的标志，表示该时间段是否已经被预订。

在窗体的Load事件中，您需要初始化“bookedTimes”字典，将所有时间段的值都设置为false，表示它们尚未被预订。

接下来，在listbox的SelectedIndexChanged事件中，您需要检查所选时间段是否已经被预订。如果是，则禁用提交按钮，并在消息框中显示一个提示。否则，启用提交按钮，并将“bookedTimes”字典中对应时间段的值设置为true，表示该时间段已经被预订。

以下是示例代码：

Public Class BookingForm
    Private bookedTimes As New Dictionary(Of String, Boolean)

    Private Sub BookingForm_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ' 初始化bookedTimes字典
        bookedTimes.Add("11:00-13:00", False)
        bookedTimes.Add("13:00-15:00", False)
        bookedTimes.Add("15:00-17:00", False)
    End Sub

    Private Sub ListBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox1.SelectedIndexChanged
        Dim selectedTime As String = ListBox1.SelectedItem.ToString()
        If bookedTimes(selectedTime) Then
            ' 时间段已经被预订，禁用提交按钮并显示提示
            btnSubmit.Enabled = False
            MessageBox.Show(selectedTime & " has already been booked.")
        Else
            ' 时间段可以预订，启用提交按钮并将标志设置为已预订
            btnSubmit.Enabled = True
            bookedTimes(selectedTime) = True
        End If
    End Sub
End Class

请注意，此代码仅演示了如何实现所要求的基本功能，您可能需要根据您的实际需求进行修改和扩展。同时，请确保在代码中添加适当的错误处理和异常处理，以确保程序的稳定性和安全性。