VB6：列出可用命令，然后执行随机命令

Hallo! I'm a n00b, and I'm looking for a few lines of code in VB6 to implement this: I want to list a certain number of commands to execute, then tell my program to chose a random one among them and execute it: strictly speaking, I'm dealing with a MSAgent character, and I want him to make a face every 5 minutes. How can I achieve this, please?Hallo! I'm a n00b, and I'm looking for a few li