本程序为VB编程1000例主要以例子和一些寇用的函数为主