VBA Write a loop that creates Random Numbers converts them to ASCII, and concatenates it to create an eight character key -


i'm able create random number between 33 , 126 , convert corresponding character/ascii code cannot repeat these steps generate 8 character key, know need sort of loop. have done far:

    randomnumber = randomclass.next()     randomnumber = randomclass.next(33, 126)     key.text = randomnumber     key2.text = chr(int(key.text)) end sub    function random()     dim arr(7) integer     dim integer, j integer     = 1             randomnumber = randomclass.next()          randomnumber = randomclass.next(33, 126)         randomnumber(i) = randomnumber(i) + randomnumber(i - 1)         = + 1      loop until = 8      return randomnumber end function 

end class


Comments

Popular posts from this blog

Add new key value to json node in java -

php - Vagrant up error - Uncaught Reflection Exception: Class DOMDocument does not exist -

javascript - Highcharts Synchronized charts with missing data points -