Why am I getting a Type Mismatch error when using some items from a listbox in a function?

First off, here is my code:

Please Login or Register  to view this content.

This is working great on a few of the items in my list box. However, most of them give me a type mismatch error, and the fact that it's not working on some items but is on others with no discernible difference between the items is confusing.

I have tried replacing Val with CInt or CLng but that hasn't helped, and I'm a bit out of my depth here.

Am I missing something simple?

Because you declared variable as String, so never be converted to other data type.
try

Please Login or Register  to view this content.