ลบข้อมูลออกจาก ListBox...ผมเซิชหาแล้วใช้ Code ตัวนี้แต่มันไม่ลบออกให้

  Public Sub setEdit_UserName(ByVal UserName As String)
        Edit_UserName = UserName
    End Sub

Dim groupuser As New DataSet()
        groupuser = cnn.GetDataSet("select [GROUP_USER] from [GROUP_USERS] where [USER_NAME] like '%" & Edit_UserName & "%' group by [GROUP_USER]")
        ListBox1.Text = "Select Group"
        ListBox1.DataSource = groupuser.Tables(0)
        ListBox1.DisplayMember = "GROUP_USER"
        ListBox1.ValueMember = "GROUP_USER"
        ListBox1.Text = "Select".ToString()

ListBox1.Items.Remove(ListBox1.SelectedItem)