vb 循环内TIMER

我把timer1写在一个WHILE循环里面，在select判断中调用，代码大致结构如下（省略不重要部分）：
构建一个TIMER控件，设置interval=100，里面的代码形如是
label1（i)=val（ss）+val（mm）
mm=mm+1
ss=ss+1
在command1_click事件里写了形如下面的代码
onRceive=true
while（onreceive=true）
select case X(0)
case 1
timer1.enable=true
case 2
timer1.enable=true
end select
loop
请问为何label1的显示频率根本达不到100毫秒，很慢，我设置了断点按F8键一步步执行，发现TIMER1控件根本不是独立定时触发，先要进行几个while循环的执行才进入timer控件执行一下，导致了定时不准，请问我该如何写才能让timer控件保持独立的线程自动按照预定间隔触发

vb timer vb中timer控件 vb timer问题 VB command 执行 timer VB timer的问题 VB的TIMER 控件 vb怎么使用timer??? 关于VB timer控件 VB Timer的应用 vb如何暂停timer？