Remove Selected Item From Textbox

SUBMITTED BY: Guest

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

FORMAT: Text only

SIZE: 188 Bytes

Raw Download

HITS: 825

Report
  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