Ele serve principalmente para fazer uma verificação com muitas variações como por exemplo, se estivessemos fazendo uma pesquisa na rua de quantas pessoas passam usando camisetas de cores amarelas, azuis, brancas e pretas. Vamos ver na prática:
Select Case |
Dim totalAmarelo, totalAzul, totalBranco, totalPreto As Integer Select Case(cor) Case "amarelo" : totalAmarelo = totalAmarelo + 1 Case "azul" : totalAzul = totalAzul + 1 Case "branco" : totalBranco = totalBranco + 1 Case "preto" : totalPreto = totalPreto + 1 End Select |
Nenhum comentário:
Postar um comentário