文章分类 | 推荐文章 | 最新文章 | 热点文章 | 最新软件 | 精品软件 | 下载排行 | 推荐下载 | 免费看大片 | WPS | 杀毒软件
清风网络
首 页 软件下载 网络学院 数码学院
QQ 电脑入门 游戏 操作系统 图形处理 办公软件 媒体动画 精文荟萃 工具软件 网络编程 程序开发 网络技术 认证考试 网站建设 文章专栏
当前位置:清风网络学院程序开发VB用Visual Basic创建多线程应用程序
精品推荐
特别推荐
·VB表格控件总览与例程分析
·用VB6.0制作画图板
·VB打造超酷个性化菜单(六)
·MSHFlexGrid 控件的应用
·Visual Basic 控件简介
·利用硬盘序列号计算软件注册码
·计算机等级考试二级VB常用算法:排序
·用diskid.dll和disk32.dll获得硬盘序列号
·VB6中使用Winsock穿越各种代理的实现
·在VFP、VB应用程序中激活鼠标功能
·vb基础(打印问题)
·想用就用,VB基础代码
·运用多媒体WAV文件格式二三例
·VB基础学习:编码规范
·VB实现程序的隐形
·使用.NET Framework从VB6中访问事件日志
·怎样把VC++代码转换成VB代码
·如何用VB程序来播放WAV文件
·VB 实用函数集
·用VB制作RM压缩软件
热点TOP10
·VB+Access设计图书管理系统
·DataGrid 控件的使用
·VB设计有语音报时和报警功能的闹钟
·窗体控件大小随窗体大小变化而变化
·Visual Basic 控件简介
·VB中使用DirectX库的简明教程
·串口通讯及其在VB平台下的实现
·用VB跟我学做记事本(很简单哟)
·VB API函数介绍--绘图函数
·用VB6.0制作画图板
·Visual Basic CommonDialog 控件的使用
·VB中使用EXCEL输出
·编写电话拨号程序时一点小技巧
·VB表格控件总览与例程分析
·用VB.net2008编写数据查询窗体
·用VB6.0设计一个打字练习软件
·用diskid.dll和disk32.dll获得硬盘序列号
·VB编程之路-如何让界面美化
·VB经典:操作.ini文件的通用类源代码
·VB网络编程中Winsock的使用

用Visual Basic创建多线程应用程序

日期:2007年6月28日 作者: 查看:[大字体 中字体 小字体]


问题背景:

  有时候我们做程序时有这样的需求:有一个需要运行时间很长的循环,那么程序只有等待循环运行结束后才执行别的程序代码,这样机器一直处于循环之中,而不能响应别的事情,对CPU资源来说是一种浪费,那么可不可以既让循环执行,又可以执行程序另外的一部分代码呢?
答案是可以的,那就要用到多线程了。

  相关知识:

  进程:是指程序在一个数据集合上运行的过程,是操作系统进行资源分配和调度运行的一个独立单位,简单来说进程就是程序的一次执行。

  进程的两个基本属性:

  1.进程是一个可拥有资源的独立单位;

  2. 进程同时又是一个可以独立调度和分配的基本单位。

  操作系统中引入进程的目的是为了使多个程序并发执行,以改善资源利用率及提高系统的吞吐量。

  线程:线是进程中的一个实体,是被系统独立调度和分配的基本单位。线程自己基本上不拥有系统资源,只拥有一些在运行中必不可少的资源,但它可与同属一个进程的其他线程共享进程所拥有的全部资源。同一个进程中的多个线程之间可以并发执行。

  问题实现:

  VB可不可以创建多线程呢?答案:VB本身不可以,但用API函数VB可以实现。

  在VB中创建线程用到以下几个API函数:

'创建线程API

'此API经过改造,lpThreadAttributes改为Any型,lpStartAddress改为传值引用:

'因为函数入口地址是由形参变量传递,如果用传址那将传递形参变量的地址而不是函数的入口地址

' 参数dwStackSize为应用程序堆栈大小,lpStartAddress为函数入口地址

Private Declare Function CreateThread Lib "kernel32" (ByVal lpThreadAttributes As Any, ByVal dwStackSize As Long, ByVal lpStartAddress As Long, lpParameter As Any, ByVal dwCreationFlags As Long, LpthreadId As Long) As Long

'终止线程API

Private Declare Function TerminateThread Lib "kernel32" (ByVal hThread As Long, ByVal dwExitCode As Long) As Long

'激活线程API,参数hThread为CreateThread创建的线程句柄

Private Declare Function ResumeThread Lib "kernel32" (ByVal hThread As Long) As Long

'挂起线程API

Private Declare Function SuspendThread Lib "kernel32" (ByVal hThread As Long) As Long
  了解完上面的API函数后请看下面的实例:

  实例效果:此实例实现三个图片框的背景色一起变色。

  实例的窗体布局见图:

用Visual Basic创建多线程应用程序

  程序的工程窗口:

用Visual Basic创建多线程应用程序
进入讨论组讨论。
源代码如下

  窗体中的代码:

Option Explicit

'开始

Private Sub Command1_Click()

 On Error Resume Next

 With myThreadleft
  .Initialize AddressOf Fillleft '传递过程地址给线程
  .ThreadEnabled = True
 End With

 With myThreadright
  .Initialize AddressOf Fillright
  .ThreadEnabled = True
 End With

 With myThreadbottom
  .Initialize AddressOf Fillbottom
  .ThreadEnabled = True

[1] [2] [3] 下一页 




上一篇:用VB编写标准CGI程序(下)

下一篇:VB COM基础讲座之创建测试程序

用Visual Basic创建多线程应用程序 相关文章:
·IE浏览器再现严重安全漏洞 微软紧急发补丁程序
·不用任何软件(木马程序)盗取账号密码
·Visual Studio 2005集成开发环境图解
·Visual C++ 实现数字化图像的分割
·破解程序及注册机使用方法
·Dreamweaver MX 2004做ASP程序(4)用户注册系统
·每周电脑应用技巧荟萃
·Windows XP 的超级应用技巧28例
·英文字体创意设计及应用作品欣赏
·C#源码读取excel数据到程序中-SQL SERVER-到dataset中
用Visual Basic创建多线程应用程序 相关软件:
·C语言程序设计
·Windows环境下32位汇编语言程序设计
·Visual Studio 2005 英文版 ISO 查看
·中文版 AutoCAD2004 应用实例与技巧
·FLASH个人简历源程序(FLA)
·C语言程序设计视频教程 CSF 教材:谭浩强《c程序设计》
·零起点教你如何破解软件和制作注册机 and 视频+程序
·Visual Basic 6.0.with.SP6大企龙卷风集成安装版
·Excel应用宝典
·Sim Aquarium v2.06 -非常漂亮的海底世界屏幕保护程序

特别声明:本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载,但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站,我们表示深深的谢意。如果本站转载的文章有版权问题请联系编辑人员,我们尽快予以更正。
[打印本页] [关闭窗口] 转载请注明来源:http://www.viphot.com
| 帮助(?) | 版权声明 | 友情连接 | 关于我们 | 信息发布
Copyright 2007 www.viphot.com All Rights Reserved. 鄂ICP备05000083号Powered by:viphot