Comment trier un tableau au hasard

Comment trier un tableau au hasard et très rapidement ?
Prenons un exemple:
Vous faite un jeu questionnaire à choix multiple.
Lors de chaque démarrage de ce jeu vous ne voulez pas retrouver les même questions dans le même ordre.  
Vous devez alors proposer les question en les tirant au hasard (RANDOM).  
Oui, j'y avais pensé, mais la simple utilisation du RANDOM risque de me faire tomber à plusieurs reprises sur la même questions pendant la durée du jeu.  
Je vous donne ma solution.  

Code:


' ******************************************************************************
' *                                                                            *
' *                 Tirage au sort dans un tableau de variable                 *
' *                sans jamais avoir deux fois le meme r‚sultat                *
' *                                                                            *
' ******************************************************************************
'
DIM a_trier%(100)
DIM a_trier_provisoire%(100)
'
' --------------- On cr‚e un tableau provisoire pour les RANDOM
FOR i%=0 TO 99
  a_trier_provisoire%(i%)=i%
NEXT i%
'
' --------------- On va commencer ici
'
' --------------- On prend la valeur du TIMER pour controler la dur‚e
t=TIMER
'
' --------------- On d‚fini le nombre de RANDOM … effectuer
nombre%=99
max%=nombre%
'
FOR i%=0 TO nombre%
  r%=RANDOM(max%+1)
  a_trier%(i%)=a_trier_provisoire%(r%)
  DELETE a_trier_provisoire%(r%)
  DEC max%
NEXT i%
'
' --------------- On reprend le TIMER
t2=(TIMER-t)/200
'
' --------------- On affiche les r‚sultats
CLS
FOR i%=0 TO nombre%
  PRINT a_trier%(i%);" - ";
NEXT i%
PRINT
PRINT
PRINT
PRINT t2;" secondes"
'
~INP(2)


Durée de ce tri 0,1 seconde pour un tableau de 100 éléments, à vous de l'adapter à vos besoins.

Merci Shadow!!!