i uploaded two attachment, one and then i made an upgrade, try one more time. Did you have 5 command buttons ? If not upload it again it is different.
Also throw this code in there it will display them randomly
also add a command button obiouslyVB Code:
Private Sub Command6_Click() Randomize a% = Int(Rnd * 5) + 1 BitBlt Me.hdc, 0, 0, SpriteWidth, SpriteHeight, card(a%), 0, 0, vbSrcCopy Me.Refresh End Sub![]()




Reply With Quote