Um Bem Aja a Todos
Agradeço desde já a ajuda
Tenho um ciclo sobre uma Listbox para fazer a contagem de determinados valores segundo o código abaixo.
Sucede que ao utilizar >= ou <= o contador não funciona.
Se utilizar apenas o sinal = já funciona.
Podem esclarecer-me sobre o assunto?
Private Sub Jogador2_Jogar()
Dim ContaCarta As Integer = 0
For Y As Integer = 0 To ListBox2.Items.Count - 1
If ListBox2.Items.Item(Y).ToString >= 14 Or ListBox2.Items.Item(Y).ToString <= 26 Then
ContaCarta += 1
End If
Next
End Sub
↧