san115592

problema: uma firma tem viaturas de 7, 4 e 1m lugar , progarama que receba um x nunero de pessoas e faça a distribuição possivel de forma a utilizar o menos número de carros.
Sou iniciante no VB, e neste problema n posso usar os IF o Then e Else, algém me ajuda, apenas posso usar os operadores >e < =,
já escrevi este código está meio errado, porque se inserir 6 pessoas deveria dar-me a opção de um carro de 7, fiz-me compreender?
Estou aflita alguém me pode ajudar.
Este foi o codigo que já fiz mas fala-me aqui algo, pf ajudem, acho que bloquei

Dim carros7 As Integer
Dim Npessoas As Integer
Dim carros4 As Integer
Dim carros1 As Integer
Dim Result1 As Integer
Dim result2 As Integer
Dim Result3 As Integer
Npessoas = TextBox1.Text
carros7 = Npessoas \ 7
Result1 = Npessoas Mod 7
Label7.Text = carros7 & " carros" & " de 7 lugares"
carros4 = Result1 \ 4
result2 = Result1 Mod 4
Label4.Text = carros4 & " carros" & " de 4 lugares"
carros1 = result2 \ 1
Result3 = result2 Mod 1
Label1.Text = carros1 & " carros" & " de 1 lugar"

Obrigada fico a aguardar
Um bem haja!