Place value on a number 1

[TheCandyman]

I have been trying to remember if there is a way to quickly get the place values for a number. Say if i had "157" a way to grab the 1, 5, and 7 into separate values. It seems there should be a quick way for this, but i can't remember it.

 

[Chopstik]

Not sure of a really good way to do this but this might give you an idea of one way to approach it. You'll obviously have to manipulate it to get what you need/want but hopefully it will inspire some you or others to something better (psuedo-code)...

For i = 1 To Len(strSource)
  strTemp = Mid(strSource, i, 1)
  Select Case i
    Case 1
      response.write strTemp & " is the ones digit.<br>"
    Case 2
      response.write strTemp & " is the tens digit.<br>"
    Case 3
      response.write strTemp & " is the hundreds digit.<br>"
    [COLOR=green]'Continue however far you want to go.[/color]
Next

------------------------------------------------------------------------------------------------------------------------
"Men occasionally stumble over the truth, but most of them pick themselves up and hurry off as if nothing ever happened."
- Winston Churchill

 

[TheCandyman]

Thx Chopstik,

Just needed a push, i didn't think about a for loop. I got it working using that and here is what i did. Just FYI

For x = 1 to Len(Trim(MyValue))
     Response.Write mid(MyValue,x,1)
     MyArray(x) = mid(MyValue,x,1)
Next

Thought tossing it into an array would be easy to pull it back out of whenever i needed.

 

[Chopstik]

Good enough. Glad that it gave you something you could work with.

------------------------------------------------------------------------------------------------------------------------
"Men occasionally stumble over the truth, but most of them pick themselves up and hurry off as if nothing ever happened."
- Winston Churchill