Problema de milisegundos del temporizador VB

Opción explícita

Private Declare Sub GetLocalTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) 'Pass Back Local Time

Tipo privado SYSTEMTIME

wAño como entero

wMes como entero

wDayOfWeek AsWYear como entero

wMes como entero

wDayOfWeek Como entero

wDía como entero

wHora como entero

wMinuto como entero

wSegundo como entero

wMilisegundos Como entero

Tipo final

Dim SysTime como SYSTEMTIME

Private Sub Form_Load()

Text1.Text = "00:00: 00:00 "

Command1.Caption = "Inicio"

Command2.Caption = "Fin"

Command2.Enabled = False

Temporizador1. Intervalo = 1

Temporizador1.Enabled = Falso