I'd still suspect an array overrun. Your use of overlay I would not recommend also, let the compiler do the job:
[code:1:255918d001]Dim Tm(7) As Byte
Dim S As Byte At Tm(1) Overlay
Dim M As Byte At Tm(2) Overlay
Dim H As Byte At Tm(3) Overlay
'a.s.o.[/code:1:255918d001]
Give it a try and then report the result.
↧