Set limit to items in listbox

I am making a program which uses list boxes. There is a list of items in listbox1 and the user has to choose some and put it in listbox2. So is there anyway to set a limit to the maximum items that the user can put in listbox2 is 5 and if they try to choose more than 5 than an error message will pop up. I want it continuously looping the code.
PLEASE help me i am new to VB.