|
Help with rock paper scissor program
I'm trying to write a vb.net program using random generation with rock paper scissor. I'm having problems writing the program. This is what I have so far. Can someone help me out with this. I need to use case structure to get it running and to play it 100 times automatically.
Dim random As New Random
Dim Rock, Paper, Scissor, P1, P2 As Integer
Rock = 1
Paper = 2
Scissor = 3
Select Case P1
Case 1
Select Case P2
Case 1
End Select
End Select
|