[Night Stalker]

End is a forceful shutdown to the whole program, ungracefully.

Unload object is the class destructor.

A function returns a value, a sub does not. Useing x=sub() will cause an error.

Yes strings are just null terminated charactor (byte) arrays. I forget if VB will let you index a string directly or not. If not you can use the mid funtcion in the for loop.

code:

---

function HexToDec( HexNum as string) as long

dim strDigit as string

dim lngTempRslt as long

dim i as integer



for i = 1 to len(HexNum)

    strDigit = Mid(i, HexNum, 1) '<:-- check the prototype for mid

    

    select case strDigit

        case "a"

            lngTempRslt = (10 * 10^(i - 1)) + lngTempRslt

          .

          .

          .

        case else

            lngTempRslt = CLong(strDigit) * 10^(i - 1) + lngTempRslt

    end select

next



end function

[/QUOTE]There's a really big hint ... good luck.