In Visual Basic6.0