TIME
Alguem sabe como pegar o decimo de segundo na função time, pois ela só retorna HH:mm:ss e eu preciso de hh:mm:ss:ds?
MsgBox Format(Time, [Ô]HH:mm:ss:ms[Ô])
ou
MsgBox Format(Now, [Ô]HH:mm:ss:ms[Ô])
Eu já havia feito isso mais não deu certo, faça o teste com o código abaixo e veja que não marca o tempo correto:
Open [Ô]c:\Teste.txt[Ô] For Output As #1
For i = 1 To 999999
Print #1, Format(Now, [Ô]HH:mm:ss:ms[Ô])
Next
Close #1
Open [Ô]c:\Teste.txt[Ô] For Output As #1
For i = 1 To 999999
Print #1, Format(Now, [Ô]HH:mm:ss:ms[Ô])
Next
Close #1
Aqui gravou tudo certinho. Teve uma pequena variação nos milissegundos. Quanto mais rápido for o processador, menos variação terá, podendo até mesmo nem existir uma variação se o processamento for muito rápido.
Tópico encerrado , respostas não são mais permitidas