IBM Lotus Symphony


Função GetSystemTicks [Tempo de Execução]

Retorna o número de tiques fornecido pelo sistema operacional. Você pode usar essa função para otimizar determinados processos.

Sintaxe:

GetSystemTicks()

Valores de Retorno:

Longo

Códigos de Erro

5 Chamada de procedimento inválida

Exemplo:

Sub ExampleWait

Dim lTick As Long

lTick = GetSystemTicks()

wait 2000

lTick = (GetSystemTicks() - lTick)

MsgBox "" & lTick & " Ticks" ,0,"The pause lasted"

End Sub


Feedback do Produto | Documentação Adicional | Marcas Registradas