With thisform.Listbox1 > .List(1)="\" + List(1) >EndWith
thisform.Listbox1.List(1) = thisform.Listbox1.List(1)