La maggior parte dei controlli in Visual Basic hanno una funzione associata "click" , come ad esempio Button1_Click per un controllo pulsante o PictureBox1_Click per una PictureBox . Con la scrittura di codice in queste funzioni di clic , il vostro gioco può rispondere a un evento cliccando fatta dal giocatore . Esempi di giochi cliccando includono quiz a risposta multipla , giochi di carte e puzzle. È possibile aggiungere altri elementi al tuo gioco per fornire ulteriori sfide , come ad esempio un punteggio e un timer . Ciò non mancherà di tenere i tuoi giocatori a giocare più e più volte . Istruzioni
1

Aprire Visual Basic e creare un nuovo progetto . Fare doppio clic sul controllo " PictureBox " tre volte per aggiungere tre pulsanti per il modulo , chiamato " PictureBox1 ", " PictureBox2 " e " PictureBox3 " . Fare clic e trascinare ognuno per allinearli orizzontalmente nel mezzo di la forma . Cambiare di ciascuno proprietà BackColor "rosso ".
2

Fare doppio clic sul controllo " Label " due volte per aggiungere " Label1 " e " Label2 " per la forma . Trascinare ogni modo che siano allineati verticalmente sotto le tre caselle di immagine . L'etichetta superiore visualizzerà il punteggio del giocatore . L'etichetta inferiore visualizzerà il tempo rimanente nel gioco .

3 Fare doppio clic sul controllo "Timer " per aggiungere " Timer1 " per la forma . Come il controllo del timer stesso non si presenta quando il gioco gira , non c'è bisogno di organizzare visivamente. Modificare la proprietà Enabled del controllo su "true ". Modificare la proprietà intervallo a " 100 ". Ciò che rende così il timer diminuire il tempo rimanente nel gioco ogni 10 ° di secondo.
4

doppio clic su un'area vuota sul form per aprire la finestra del codice per la funzione " Form1 Load " . Digitare il seguente codice :

Randomize ( ) Label1.Text = " Risultato: " & scoreLabel2.Text = " Tempo rimanente : " & timegetNewColor ( ) per

Il primo linea, chiamata la funzione " Randomize " , assicura si crea un numero casuale ogni volta che avete bisogno di uno . La seconda e la terza riga modificare il testo per entrambi i marchi . La quarta linea richiama una funzione si creerà per cambiare il colore della casella quando l'utente ottiene un punto .
5

Inserire il cursore sotto la dichiarazione della classe . Digitare quanto segue per dichiarare e inizializzare le seguenti variabili :

Dim punteggio As Integer = tempo 0Dim come decimale = 10,0

La prima variabile tiene traccia del punteggio utilizzando un numero intero, che consente solo tutto numeri . La seconda riga crea una variabile decimale per tenere traccia del tempo rimanente nel gioco. Valori decimali consentono frazioni. È possibile modificare il tipo di dati in base alle proprie esigenze o anche cambiare inizializzazioni di creare un gioco più o meno lungo .
6

Inserire il cursore sull'ultima riga dopo il codice esistente . Digitare quanto segue :

Private Sub getNewColor ( ) Dim num Come Integernum = CInt (Int ( ( 3 * Rnd ( ) ) + 1 )) Se num = 1 ThenPictureBox1.BackColor = Color.GreenElseIf num = 2 ThenPictureBox2 . BackColor = Color.GreenElseIf num = 3 ThenPictureBox3.BackColor = Color.GreenEnd IfEnd Sub