vb多线程:vb实现多线程

来源: 发布时间:星期四, 2008年9月25日浏览:172次评论:0

请将该部分数据保存为FORM1.frm文件
VERSION5.00
BeginVB.FormForm1
Caption=\"多线程\"
ClientHeight=3195
ClientLeft=60
ClientTop=345
ClientWidth=6450
LinkTopic=\"Form1\"
ScaleHeight=3195
ScaleWidth=6450
StartUpPosition=3\'窗口缺省
BeginVB.TextBoxText1
Height=270
Left=960
TabIndex=2
Text=\"2\"
Top=2760
Width=2415
End
BeginVB.CommandButtonCommand2
Caption=\"返回\"
Height=255
Left=3480
TabIndex=1
Top=2760
Width=1455
End
BeginVB.CommandButtonCommand1
Caption=\"StartCount\"
Height=255
Left=3480
TabIndex=0
Top=240
Width=1455
End
BeginVB.LabelLabel1
AutoSize=-1\'True
Caption=\"主线程执行结果测试:\"
Height=180
Left=600
TabIndex=3
Top=2400
Width=1710
End
End
AttributeVB_Name=\"Form1\"
AttributeVB_GlobalNameSpace=False
AttributeVB_Creatable=False
AttributeVB_PredeclaredId=True
AttributeVB_Exposed=False

\'下载地址:http://www.bssoft.com.cn/vbThread.rar

PrivateSubCommand1_Click()
\'声明了线程ID
Dimthreadid1AsLong
Dimthreadid2AsLong

\'参数一，lpThreadAttributes线程安全属性，传递为NULL
\'参数二，dwStackSize，线程堆栈大小，可以为0，表示堆栈和此应用堆栈相同
\'参数三，lpstartAddress，执行函数地址，用AddressOf获取
\'参数四，lpParameter，执行函数的参数地址，可以是一个记录或者是别的类型，用VarPtr获取参数地址（varptr为未公开函数）！！
\'参数五，dwCreationFlags，表示线程创建后的状态！，0表示立即运行，create_SUSPENDED表示线程挂起
\'参数六，lpThreadID表示分配给线程的线程号
CallCreateThread(Null,ByValO&,AddressOfModule1.OutText1,VarPtr(0),ByVal0&,threadid1)

如果本文没有解决您的问题，请进老妖怪开发者社区提问

标签：多线程如何实现 vb多线程组件 vb.net多线程 vb多线程

下载文章的 PDF文档电子版离线看

顶一下

2008-9-25 1:40:28 vb组件包:关于在VB中进行COM组件的开发(一、了解COM)-vb教程
2008-9-25 2:11:39 vb组件包:在VB组件中使用串缓冲
2008-9-25 2:11:48 vb组件包:用VB创建FTP组件(get)
2008-9-25 2:11:39 vb组件包:已调试好的asp程序在VB中转换为组件的技巧
2008-9-25 1:31:43 vb组件包:VB COM基础讲座之发布组件
2008-9-25 1:40:19 vb组件包:MX记录获取组件（vb实现）-vb教程
2008-9-25 2:11:39 vb组件asp:VB编写ASP组件的调试
2008-9-25 1:39:01 vb多线程:单元线程对象的生存周期-vb教程
2008-9-10 17:55:30 vb窗体控件:如何在vb.net2005中使用多线程访问窗体上的用户控件
2008-9-25 1:40:47 vb.net应用教程:VB创建多线程应用程序(二)-vb教程

读者评论

共0条分0页

专注于互联网--专注于架构

首页 »VB教程 » vb多线程:vb实现多线程 »正文

vb多线程:vb实现多线程

相关文章

读者评论

发表评论

热门标签

精华推荐

Dig排行

阅读排行

评论排行