The VB statement Randomize will set the seed.

http://mac2.microsoft.com/vb/1033/default.aspx