vb 如何实现多线程

我用timer 控件产生数据  处理  并入库
但当  timer 的  interval 设的太小时  根本来不及处理  入库也会出错  我想用三个线程  在第一个线程中产生数据   在第二个线程中处理数据   在第三个线程中入库请问如何   制作这三个线程最好给一个完整的源码
   邮箱  [email protected]
         [email protected]
   thank  you