Ok Elroy that code gives Out of Stack Space Error 28. What does InfiniteRecursion do as its not a VB function?

The Debug window is a bit of a pain as you can't select anything once the error occurs.

When you run this app you copy and paste the hard drive number in a textbox then click a button which txtHDDSN.Text = txtHDDSN.Text * -1, which removed the negative.

Then you click another button Generate Unique Request Code (SN + PID) this adds another 24 numbers to the hard drive number. The you click Alpha Replacement Sequence button to find the alphanumeric number of the new Generate Unique Request Code (SN + PID).

As I've said the original PSC codes has multiple textboxes Text3 to Text17 to show different parts of the code. Some shuffled, some reversed. I put all the alpha textboxes Text13 to Text17 separated by - to show all numbers together in a txtFullAlpha textbox.

I didn't really want to click different buttons I wanted to copy and paste the drive number you want the alphanumeric number for so I added cmdAlpha_Click under the HDDSN button. I REM this out and it works without the Out of Stack Space Error 28.

As I've said if you want to check out Unique Serial Number Protection **UPDATED AGAIN - Version 1.5**