How to do it using the vb2005?