Check in and Check out System in VB.net