VB에서 타이머를 코드로만 작성하는 방법

타이머를 코드로 추가하려고 아래처럼 작성했는데 두 번째 구문에서 오류가 나요.
Dim timer1 as timer
Set timer1 = Controls.Add(VB.Timer, timer)
어떻게 고치면 될까요?