晕！

select case 所调出牌的随机数
  case 随机数1
    label1.Caption =对应的文本1
  case  随机数2
    label1.Caption =对应的文本2
  ......
end select 

行不？

他肯定说不行。
因为他问得太含混，你任何一种回答，都是在撞大运。