Static t_inicio As DateTime
Static t_fim As DateTime
Dim t_diferenca As TimeSpan
t_inicio = Now
' t_fim = Now
't_diferenca = t_fim.Subtract(t_inicio)
' MsgBox("Tempo de carregar dados (dataset)" & t_diferenca.TotalSeconds.ToString("0.000000") & " segundos ->Registos:" & dsBD.Movimentos.Rows.Count.ToString)
Conversores de Código
Subscrever:
Enviar feedback (Atom)
Sem comentários:
Enviar um comentário