Jump to content
Fórum Script Brasil
  • 0

multiplacação entre textbox


aurio

Question

Senhores

Tenho três textbox

1ª contém um valor numerico ex: 1500

2ª contém um valor em horas ex: 1:00

Na 3ª textbox queria que o resultado da multiplicação textbox3= textbox1*textbox2;o valor tem que ser em horas ex:(1500:00) como faço para conseguir este resultado abaixo o code

Private Sub TextBox3_Enter()

TextBox3 = Format(CDbl(TextBox1) * TimeValue(TextBox2), "hh:mm")

End Sub

Obrigado pela ajuda.

Link to comment
Share on other sites

2 answers to this question

Recommended Posts

  • 0

cara tenta explicar melhor quando for postar.

se eu entendi, você quer multiplicar o um valor inteiro por um valor de tempo é isso??

tipo assim:

1500 * 1:00 = 1500:00

2 * 1:30 = 3:00

se for isso, então você tem q transformar tempo em valor. tipo assim:

hora = TextBox1.Text * (Hour(CDate(TextBox2.Text)) + (Minute(CDate(TextBox2.Text)) / 60))

ai você vai ter o numero de horas em valor numerico, tipo 1:30 = 1,5 horas

ai pra transformar em formato de horas, você pode usar essa funcao aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=108910

ai no caso pra transformar em segundos você multiplica por 3600.

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.



  • Forum Statistics

    • Total Topics
      152k
    • Total Posts
      651.5k
×
×
  • Create New...