vb.net2019-多线程并行计算(5)

本文介绍了vb.net2019中线程状态的概念,详细解析了Process和ProcessThread类,阐述了线程的生命周期、优先级、处理器时间等关键属性,并展示了如何查看线程的等待原因,以及线程状态的监测方法。
摘要由CSDN通过智能技术生成

一、线程状态涉及的CLR类
1)Process 类

提供对本地和远程进程的访问并使您能够启动和停止本地系统进程

GetCurrentProcess 获取新的 Process 组件并将其与当前活动的进程关联。

2)ProcessThread 类

使用 ProcessThread 来获取系统上当前运行的线程的信息。 例如,这样做将使您能够监视线程的性能特性。

线程是沿程序执行的路径。 它是 Win32 安排的最小执行单位。 它由堆栈、CPU 注册的状态和系统计划程序的执行列表中的项组成。

进程包括一个或多个线程和代码、数据和内存中的其他程序资源。 典型的程序资源是打开的文件、信号灯和动态分配的内存。 进程的所有线程共享该进程的每一资源。

当系统计划程序给程序的线程之一执行控制权时,程序便执行。 计划程序确定哪些线程运行以及何时运行。 在较高优先级的线程完成任务的时候,较低优先级的线程可能会被迫等待。 在多处理器计算机上,计划程序可将单个线程移到不同的处理器上,从而对 CPU 负荷进行平衡。

每个进程启动时都具有一个线程,该线程称为主线程。 任何线程都可以创建附加线程。 进程中的所有线程共享该进程的地址空间。

常用方法如下:

BasePriority 获取线程的基本优先级。
CanRaiseEvents 获取一个指示组件是否可以引发事件的值。 (继承自 Component。)
Container 获取 IContainer,它包含 Component。 (继承自 Component。)
CurrentPriority 获取线程的当前优先级。
DesignMode 获取一个值,用以指示 Component 当前是否处于设计模式。 (继承自 Component。)
Events 获取附加到此 Component 的事件处理程序的列表。 (继承自 Component。)
Id 获取线程的唯一标识符。
IdealProcessor 设置让此线程在其上运行的首选处理器。
PriorityBoostEnabled 获取或设置一个值,该值指示每当关联线程的进程主窗口接收焦点时,操作系统是否暂时提升该线程的优先级。
PriorityLevel 获取或设置线程的优先级别。
PrivilegedProcessorTime 获取线程在操作系统内核中运行代码所用的时间。
ProcessorAffinity 设置关联线程可以在其上运行的处理器。
Site 获取或设置 Component 的 ISite。 (继承自 Component。)
StartAddress 获取操作系统调用的、启动此线程的函数的内存地址。
StartTime 获取操作系统启动该线程的时间。
ThreadState 获取此线程的当前状态。
TotalProcessorTime 获取此线程使用处理器的时间总量。
UserProcessorTime 获取关联的线程在应用程序内运行代码所用的时间。
WaitReason 获取线程等待的原因。

属性为:

BasePriority 获取线程的基本优先级。
CanRaiseEvents 获取一个指示组件是否可以引发事件的值。 (继承自 Component。)
Container 获取 IContainer,它包含 Component。 (继承自 Component。)
CurrentPriority 获取线程的当前优先级。
DesignMode 获取一个值,用以指示 Component 当前是否处于设计模式。 (继承自 Component。)
Events 获取附加到此 Component 的事件处理程序的列表。 (继承自 Component。)
Id 获取线程的唯一标识符。
IdealProcessor 设置让此线程在其上运行的首选处理器。
PriorityBoostEnabled 获取或设置一个值,该值指示每当关联线程的进程主窗口接收焦点时,操作系统是否暂时提升该线程的优先级。
PriorityLevel 获取或设置线程的优先级别。
PrivilegedProcessorTime 获取线程在操作系统内核中运行代码所用的时间。
ProcessorAffinity 设置关联线程可以在其上运行的处理器。
Site 获取或设置 Component 的 ISite。 (继承自 Component。)
StartAddress 获取操作系统调用的、启动此线程的函数的内存地址。
StartTime 获取操作系统启动该线程的时间。
ThreadState 获取此线程的当前状态。
TotalProcessorTime 获取此线程使用处理器的时间总量。
UserProcessorTime 获取关联的线程在应用程序内运行代码所用的时间。
WaitReason 获取线程等待的原因。

Imports System
Imports System.Threading
Imports System.Diagnostics
Imports System.Diagnostics.ThreadState
















Module Module1


    Sub Main()


        Dim mythread1 As Thread
        Dim mythread2 As Thread
        Dim mythread3 As Thread










        '创建线程对象
        mythread1 = New Thread(AddressOf mythreadrun)
        mythread2 = New Thread(AddressOf mythreadrun)
        mythread3 = New Thread(AddressOf mythreadrun)
        Console.WriteLine(Now.ToLongTimeString & "线程对象创建完毕,开始执行线程")


        '执行线程
        mythread1.Start("线程1")
        mythread2.Start("线程2")
        mythread3.Start("线程3")








        '等待线程完成
        mythread1.Join()
        mythread2.Join()
        mythread3.Join()




        '线程执行完毕
        Console.WriteLine(Now.ToLongTimeString & "线程执行完毕!")
    End Sub
    Public Sub mythreadrun(ByVal data As Object)
        Dim mynum As Integer








        'GetCurrentProcess  获取新的 Process 组件并将其与当前活动的进程关联。 






        '分配一个新的槽,这个槽存放线程本地数据,槽名称为
        'myjg,名称必须唯一
        Dim jg As LocalDataStoreSl
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值