Ir para conteúdo
Fórum Script Brasil
  • 0

Como calcular as porcentagens


Fly1

Pergunta

Esse e um trecho dos calculos das porcentagens alguém podia m dizer s e isso ou terei d criar uma fcao para calcular as %?

Private Sub txtPercGasoleo_LostFocus()
 txtPercGasoleo.Text = CDbl(txtTotalConsumoGasoleo) / CDbl(txtTotalKilometro) * 100

End Sub


Private Sub txtPercKmDia_LostFocus()

 txtPercKmDia.Text = CDbl(txtTotalKilometro) / 30
End Sub

Private Sub txtPercOleo_LostFocus()


txtPercOleo.Text = CDbl(txtTotalConsumoOleo) / CDbl(txtTotalKilometro) * 100


End Sub


Private Sub txtPercOleoGasoleo_LostFocus()
txtPercOleoGasoleo.Text = CDbl(txtTotalConsumoOleo) / CDbl(txtTotalConsumoGasoleo) * 100

End Sub

Editado por kuroi
Adicionar tag CODE
Link para o comentário
Compartilhar em outros sites

4 respostass a esta questão

Posts Recomendados

  • 0

a mas como a gente vai saber o q você quer fazer?? tipo quem sabe os calculos q você quer é você, se você não explicar, a gente não pode adivinhar.

mas tipo, se os calculos aparecerem certos pra você, significa q ta certinho, veja ai, qualquer coisa poste.

Link para o comentário
Compartilhar em outros sites

  • 0
a mas como a gente vai saber o q você quer fazer?? tipo quem sabe os calculos q você quer é você, se você não explicar, a gente não pode adivinhar.

mas tipo, se os calculos aparecerem certos pra você, significa q ta certinho, veja ai, qualquer coisa poste.

O q eu quero e calcular os racios(porcentagens)

d oleo por cada 100kms q tem como formula oleo/100kms=(Totaloleo:totalKMs)*100;

Gasoleo/100kms=(TotalGasoleo:TotalKm)*100;

%Oleo/gasoleo=(TotalOleo:TotalGasoleo)*100;

e por ultimo Kms/Dia=(totalKms:30dias) [ou 31 dias conforme o mes em questao]

estou usando isso no lost focus sera a melhor opcao?

um abraco a todos

Link para o comentário
Compartilhar em outros sites

  • 0

"estou usando isso no lost focus sera a melhor opcao?"

Outra coisa que também depende do modo do seu programa se tipo for para aparecerem porcentagens e calculos conforme o cliente queira então o cliente digitaria em text's ou escolheria algo em combos e num click dum botão os calculos seriam executados através de Select's no BD ou ainda poderiam aparecer logo com o Form_Load buscando dados no BD, calculando e lançando em controles como Datagrid's ou textbox para ficarem visiveis.

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,8k
×
×
  • Criar Novo...