Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        ListBox1.Items.Add("A") '增加Items
        ListBox1.Items.Add("B")
        ListBox1.Items.Add("C")
        'Getting All Items
        Dim sb As New System.Text.StringBuilder
        For Each item In ListBox1.Items
            sb.Append(item)
            sb.Append(" ")
        Next
        MessageBox.Show(sb.ToString())
    End Sub