Randomize()
valCasuale = mioarray((Ubound(mioarray) * Rnd))