'线程安全属性数据结构;
'这个是鼡于多85e5aeb637线程访问临界资源同步Api的数据结构
'为什么用GDI 函数绘图原因等下再讲
'请注意;createThread APi声明已被我修改过,修改的地方请自行参照APIView复制的内嫆
'这个是sleep,作用就是让两个线程绘图频率不一致效果才明显。
'ObjPtr:返回对象实例私有域的地址
'StrPtr:返回字符串第一个字的地址。
'VarPtr:返回变量嘚地址
'全局的form的句柄!
' 上下表示该处为临界区,如果要对工程全局变量做操作最好在该区域内
' 否则线程同步过程中,非常容易让程序崩溃
'关于为何使用gdi 函数输出文本这是一个很重要的内容;
'程序在记数时用了难用的TextOut 函数,而没有使用标签控件这是因为
'vb的组件不都是線程安全的,当多线程访问不是线程安全的组件那么会
'参数二,dwStackSize 线程堆栈大小,可以为0表示堆栈和此应用堆栈相同
'参数四,lpParameter 执行函数的参数地址,可以是一个记录或者是别的类型用VarPtr获取参数地址(varptr为未公开函数)!!
'参数六,lpThreadID 表示分配给线程的线程号
'该事件运行於主线程!
'保存窗体句柄全局变量用于在form 上绘图
其实用vb开发多线程效率是很低的!