Privata underhandtag lblAddToList.Click för lblAddToList_Click (den ByVal avsändaren som System.Object, ByVal e som System.EventArgs)
För varje drv som DataRowView i lb.CheckedItems
Debug.Print (drv. Objekt (lb.DisplayMember) & ”, -->” & drv. Objekt (lb.ValueMember))
Därefter
Avsluta suben
|