Visual Basic Catia V6