Function to obtain check digit in VB6

In this opportunity we bring you a very useful function that will help us when we want to obtain the verifying digit of a Rut.

We hope it is of your use. regards