vb纸牌游戏,如何洗牌?

在vb中,如何将扑克牌洗牌,就是将代码和图片结合起来,现在我能做出来一个取随机数的代码,也能显示图片,但是结合不上

产生一个1~54的随机数,这个会不会?
然后对这个数字整除4得到大小(1=A 10=J 11=Q 12=K)mod 4得到花色
根据大小花色,绘制牌面。

当然还有个做法,直接把牌放在一个ImageList里面,下标正好1-54

把纸牌放list中作为牌库,需要发自牌时使用随机数生成牌库中任意一个牌的序号,发牌后就将其移出牌库