那位朋友能看看这个小程序应该怎么写（万分感谢）！！！！！！！！！

Question

完成这样一个小程序：输入一个值x,按"确定"键开始,当x=1时，1号小灯每1ms（毫秒）闪一次，x=10时。1号小灯每10ms闪一次（如果可能的话，当x=0.1时，每0.1ms闪一次）。与此同时，2号小灯恒定的每100ms闪一次。1号小灯闪100次后停止。同时2号小灯也停止闪烁。中途如果按"关闭"键可以停止循环

Answer 1

用一个Timer。不过，1ms闪一次，你能看出来？
在command1_click中：
Timer1.interval=1
Timer1.enable=true
在Timer1_Timer里：
‘灯闪
’灯灭

Answer 2

用timer控件，很容易的。自己做吧

Answer 3

form_load
  timer1.interval=x
  timer1.enabled=true
  timer2.interval=100
  timer2.enabled=truetimer1_timer
  static i as integer
  i=i+1
  灯1.flash
  if i=100 then
    timer1.enabled=false
    timer2.enabled=false
  end iftimer2_timer
  灯2.flashcmdStop_Click
  timer1.enabled=false
  timer2.enabled=false

Answer 4

form_load
  timer1.interval=x
  timer1.enabled=true
  timer2.interval=100
  timer2.enabled=truetimer1_timer
  static i as integer
  i=i+1
  灯1.flash
  if i=100 then
    timer1.enabled=false
    timer2.enabled=false
  end iftimer2_timer
  灯2.flashcmdStop_Click
  timer1.enabled=false
  timer2.enabled=false

Answer 5

rappercn(rappe 的程序应该没什么问题，达到你的要求了

Answer 6

Timer不准，系统忙的时候就不走了