How can I generate Random numbers in a form

[jjmontreal]

I would like to create a form where by clicking some where in the form it will generate a alphanumeric sequence. I want to generate random PIN numbers preceeded with specific letters. An example would be BW6666 or BW1234. Can anyone help?

[NeoPa]

Does the random part need to be a fixed length of four digits?

[JKing]

Here's a neat and somewhat simple way to achieve your desired results. Using some VBA you can easily generate a string in your format of BW0000.

Dim strPin As String
Dim i As Integer
 
strPin = "BW"
 
'Set seed
Call Randomize
 
For i = 1 To 4
   strPin = strPin & Int(10 * Rnd)
Next
 

Simply loops 4 times adding a random number between 0 and 9 to the string. Out of curiousity what is this going to be used for?

[NeoPa]

Does the random part need to be a fixed length of four digits?

Assuming so, simply use :

'BW' & Right(Format(Rnd() * 10000, '0000'), 4)

The Right(X, 4) bit is to ensure that a Rnd() value so close to 1 will not produce 10,000.