RandArray

Posted: 2020-08-31
By: vb6boy
Viewed: 153

Filed Under:

Visual Basic 6, Visual Basic 6

This code demonstrates how to efficiently randomize an array of user defined type (UDT) items.

Basically, you include a "randValue" property in definition of the UDT, and any time you want to randomize the order, set this value to rnd() for each element, and then sort on that property. Pretty useful for a lot of applications. For example, I originally wrote this to randomly and repeatedly select 5-10 items from an array of thousands of members.

If you like this, please vote. If you don't like it, don't vote. I hope somebody finds something useful in this.

To use:

1. Click on the "Build UDT Data" button and enter the number of items you wish to create. The listbox on the main form will be populated with the UDT items order alphabetically by last name.
2. To Randomize the items, click on the "Randomize" button. You can do this over and over.
3. If you want to re-order the UDT items alphabetically, click on the "Alpha" button.

Original Author: Bikeguy

Comments on this post

No comments have been added for this post.

You must be logged in to make a comment.