สอบถามเกี่ยวกับ listbox ใน vb2010

ปัญหามีอยู่ว่าผมต้องการให้ label5 เท่าากับ จำนวนรายการใน listbox คือ 5 รายการต้องเขียนCode แบบไหนครับ VB 2010
และต้องการให้โปรแกรมอ่านค่ารายการถัดไปด้วย