Remove Selected Item From Textbox


SUBMITTED BY: Guest

DATE: Dec. 7, 2013, 6:43 a.m.

FORMAT: Text only

SIZE: 188 Bytes

HITS: 809

  1. With Listbox1.Items
  2. If Listbox1.SelectedIndex > 0 Then .Remove(Listbox1.SelectedItem)
  3. If .Count >= 1 Then Listbox1.SelectedItem = .Item(0)
  4. End With

comments powered by Disqus