Yocker
  1. Yocker
  3. Come faccio a mescolare e distribuire le carte una alla volta ai giocatori?
Intereting Posts
Che cos’è una connessione sicura? Come assegnare un nome alla colonna size ()? Differenza tra matches () e find () in Java Regex Aggiunta di file a classpath java in fase di runtime Annulla l’iscrizione al metodo anonimo in C # Quali caratteri sono vietati nei nomi delle directory Windows e Linux? Come annullare il caricamento HTTP dagli eventi di dati? Utilizzo di statement vs. IDisposable.Dispose () Cosa usare? MVC, MVP o MVVM o …? Il modo più semplice per analizzare la risposta JSON Perché maven? Quali sono i vantaggi? Come passare array come argomento a una funzione in Bash Come si esegue un GROUP BY su una colonna con alias in MS-SQL Server? Spring-Data FETCH JOIN con Paging non funziona LAST_INSERT_ID () MySQL

Come faccio a mescolare e distribuire le carte una alla volta ai giocatori?

Questo è quello che ho ottenuto finora e mi trovo bloccato. = / 

Private Sub Dealbtn_Click(sender As Object, e As EventArgs) Handles Dealbtn.Click Dim Suits() As String = {"S", "D", "C", "H"} Dim Faces() As String = {"2", "3", "4", "5", "6", "7", "8", "9", "T", "J", "Q", "K", "A"} Dim rand As New Random Dim rand1 As Integer = rand.Next(12) Dim rand2 As Integer = rand.Next(3) Label2.Text() = Faces(rand1) + Suits(rand2) End Sub