Trabalho de programação

Public Class Form1
Public x As Integer ' Variável usada para contagem do número de execuções do looping do programa, usada também para determinar a posição no vetor, e na contagem do tempo de reposta do programa.
Public value As Integer ' Variável usada para alocar o número aleatório que determina qual retângulo será selecionado.
Public vetor(6) As Integer ' Vetor onde é guardado que retângulos foram selecionados.
Public vetor2(6) As Integer ' Vetor onde é guardado que retângulos foram selecionados pelo jogador.
Public i As Integer ' Variável que indica que posição do vetor quardará o valor do retângulo selecionado.
Public v As Integer ' Variável que guarda a contagem utilizada para preencher o vetor2.
Public saida As String ' Variável auxiliar que faz a saída do Random.
Public truefalse As String ' Variável que guarda o valor para a propriedade enabled dos retângulos.
Public s As Integer ' Variável usada no cálculo do tempo de resposta.
Public d As String ' Variável usada para guardar o texto do resumo da partida.

' Carrega o jogo
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load truefalse = "false"
Ativdesativbotao()
End Sub

Private Sub Button29_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button29.Click

' Inicio do jogo. Configura o programa para uma nova rodada após o jogador clicar no botão iniciar.
' Desabilita o botão de começar.
' Desabilita os botões de nível do jogo.
' Zera a barra de progresso.
' Zera os vetores.
' Retorna a cor original dos retângulos.
' Desativa a seleção dos retângulos durante a execução do início do jogo.
' Zera as variáves e reinicia os timers.

Button29.Enabled = False
RadioButton1.Enabled = False
RadioButton2.Enabled = False
RadioButton3.Enabled = False
ProgressBar1.Visible = False
ProgressBar1.Value = 0 apagavetores() Descolore()