Visual basic code for 2player dice game with message box saying which player wins?

Answer 1

Here's a simple Visual Basic code snippet for a two-player dice game that rolls dice for each player and displays a message box indicating the winner:

Dim player1Score As Integer = CInt(Int((6 * Rnd()) + 1))
Dim player2Score As Integer = CInt(Int((6 * Rnd()) + 1))

If player1Score > player2Score Then
    MessageBox.Show("Player 1 wins with a score of " & player1Score & "!")
ElseIf player2Score > player1Score Then
    MessageBox.Show("Player 2 wins with a score of " & player2Score & "!")
Else
    MessageBox.Show("It's a tie with both players scoring " & player1Score & "!")
End If

This code randomly generates scores for both players and uses a message box to announce the winner or if there's a tie.