Se agrega ejemplo en Visual Basic 6