Type mismatch when calling sub procedure..

Hmmm, this is just a guess, but I'm thinking its because you never state a value for x. If you check ray(x), you are just running the check function on the member # x of the ray array. I've never personally used the split function, but based on the help it seems like you need to enter a string, not an array. Does that make sense?

christheta;

You Dim n as variant, which means that it becomes the type that is contained in "Content"
Split("") returns nothing (probably a string) witch n accepts with no conversion.

And when you want to add a string onto a double VB crashes.
It's equivalent to saying tot = 0 + "". In the immediate window try ? 0 + "" and you'll get the same error.

If you were to Dim n as Integer (or Double, or Long, etc), then VB would try to convert each element in Content into an integer before trying to add it to n.