trouble with a nested loop to get different values

[mdnewman007]

I am playing with a simple poker program "concept" to better understand vb.net and help on the path to my MCAD... I am having problems defining values to be different from one another.

When the cards are created, they are created from a structure object, with a random string for the number/face equivalence and a random suit. I can generate 9 cards (to simulate a player and dealer dealt cards, then a flop, turn, river situation.

The problem comes when two identical cards come into play... as there is not such a scenario in a deck of cards. I can not seem to figure out how to loop through the cards as they are created to declare the values for the cards(8) array (all the cards), as different values.

Anyone know how to loop through the values as they are declared so at the end of the variable definition, all the values of the cards in the array are different???

Below it is the length of code.

 

[mdnewman007]

trying to get this, programmatically

I am essentually trying to get this end result, only doing it programmatically to save file size...

[SIZE=2]
[/SIZE][SIZE=2][COLOR=#0000ff]Public[/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff]Shared[/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff]Sub[/COLOR][/SIZE][SIZE=2] Define_Cards()
[/SIZE][SIZE=2][COLOR=#0000ff]Try
[/COLOR][/SIZE][SIZE=2][/SIZE][SIZE=2][COLOR=#008000]'!!!!
[/COLOR][/SIZE][SIZE=2]cards(0).randomNum = funcRandomNum()
cards(0).randomSuit = FuncRandomSuit()
cards(0).flip = cards(0).randomnum & cards(0).randomsuit
[/SIZE][SIZE=2][COLOR=#0000ff]Do
[/COLOR][/SIZE][SIZE=2]cards(1).randomNum = funcRandomNum()
cards(1).randomSuit = FuncRandomSuit()
cards(1).flip = cards(1).randomnum & cards(1).randomsuit
[/SIZE][SIZE=2][COLOR=#0000ff]Loop[/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff]Until[/COLOR][/SIZE][SIZE=2] (cards(1).flip <> cards(0).flip)
[/SIZE][SIZE=2][COLOR=#0000ff]Do
[/COLOR][/SIZE][SIZE=2]cards(2).randomNum = funcRandomNum()
cards(2).randomSuit = FuncRandomSuit()
cards(2).flip = cards(2).randomnum & cards(2).randomsuit
[/SIZE][SIZE=2][COLOR=#0000ff]Loop[/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff]Until[/COLOR][/SIZE][SIZE=2] (cards(2).flip <> cards(0).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(2).flip <> cards(1).flip)
[/SIZE][SIZE=2][COLOR=#0000ff]Do
[/COLOR][/SIZE][SIZE=2]cards(3).randomNum = funcRandomNum()
cards(3).randomSuit = FuncRandomSuit()
cards(3).flip = cards(3).randomnum & cards(3).randomsuit
[/SIZE][SIZE=2][COLOR=#0000ff]Loop[/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff]Until[/COLOR][/SIZE][SIZE=2] (cards(3).flip <> cards(0).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(3).flip <> cards(1).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(3).flip <> cards(2).flip)
[/SIZE][SIZE=2][COLOR=#0000ff]Do
[/COLOR][/SIZE][SIZE=2]cards(4).randomNum = funcRandomNum()
cards(4).randomSuit = FuncRandomSuit()
cards(4).flip = cards(4).randomnum & cards(4).randomsuit
[/SIZE][SIZE=2][COLOR=#0000ff]Loop[/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff]Until[/COLOR][/SIZE][SIZE=2] (cards(4).flip <> cards(0).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(4).flip <> cards(1).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(4).flip <> cards(2).flip) [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(4).flip <> cards(3).flip
[/SIZE][SIZE=2][COLOR=#0000ff]Do
[/COLOR][/SIZE][SIZE=2]cards(5).randomNum = funcRandomNum()
cards(5).randomSuit = FuncRandomSuit()
cards(5).flip = cards(5).randomnum & cards(5).randomsuit
[/SIZE][SIZE=2][COLOR=#0000ff]Loop[/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff]Until[/COLOR][/SIZE][SIZE=2] (cards(5).flip <> cards(0).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(5).flip <> cards(1).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(5).flip <> cards(2).flip) [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(5).flip <> cards(3).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(5).flip <> cards(4).flip
[/SIZE][SIZE=2][COLOR=#0000ff]Do
[/COLOR][/SIZE][SIZE=2]cards(6).randomNum = funcRandomNum()
cards(6).randomSuit = FuncRandomSuit()
cards(6).flip = cards(6).randomnum & cards(6).randomsuit
[/SIZE][SIZE=2][COLOR=#0000ff]Loop[/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff]Until[/COLOR][/SIZE][SIZE=2] (cards(6).flip <> cards(0).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(6).flip <> cards(1).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(6).flip <> cards(2).flip) [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(6).flip <> cards(3).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(6).flip <> cards(4).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(6).flip <> cards(5).flip
[/SIZE][SIZE=2][COLOR=#0000ff]Do
[/COLOR][/SIZE][SIZE=2]cards(7).randomNum = funcRandomNum()
cards(7).randomSuit = FuncRandomSuit()
cards(7).flip = cards(7).randomnum & cards(7).randomsuit
[/SIZE][SIZE=2][COLOR=#0000ff]Loop[/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff]Until[/COLOR][/SIZE][SIZE=2] (cards(7).flip <> cards(0).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(7).flip <> cards(1).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(7).flip <> cards(2).flip) [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(7).flip <> cards(3).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(7).flip <> cards(4).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(7).flip <> cards(5).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(7).flip <> cards(6).flip
[/SIZE][SIZE=2][COLOR=#0000ff]Do
[/COLOR][/SIZE][SIZE=2]cards(8).randomNum = funcRandomNum()
cards(8).randomSuit = FuncRandomSuit()
cards(8).flip = cards(8).randomnum & cards(3).randomsuit
[/SIZE][SIZE=2][COLOR=#0000ff]Loop[/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff]Until[/COLOR][/SIZE][SIZE=2] (cards(8).flip <> cards(0).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(8).flip <> cards(1).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(8).flip <> cards(2).flip) [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(8).flip <> cards(3).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(8).flip <> cards(4).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(8).flip <> cards(5).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(8).flip <> cards(6).flip [/SIZE][SIZE=2][COLOR=#0000ff]And[/COLOR][/SIZE][SIZE=2] cards(8).flip <> cards(7).flip
[/SIZE][SIZE=2][COLOR=#008000]'!!!!
[/COLOR][/SIZE][SIZE=2][/SIZE][SIZE=2][COLOR=#0000ff]Catch[/COLOR][/SIZE][SIZE=2] ex [/SIZE][SIZE=2][COLOR=#0000ff]As[/COLOR][/SIZE][SIZE=2] Exception
console.writeline(ex.message)
[/SIZE][SIZE=2][COLOR=#0000ff]End[/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff]Try
[/COLOR][/SIZE][SIZE=2][/SIZE][SIZE=2][COLOR=#0000ff]End[/COLOR][/SIZE][SIZE=2] [/SIZE][SIZE=2][COLOR=#0000ff]Sub
[/COLOR][/SIZE]

 

[JohnH]

Why not create the full deck of cards, shuffle it, then deal?

 

[mdnewman007]

I am trying to figure out how to programmatically do error catching.