in visual basic6.0