Imports System Imports System.IO Imports System.Threading Imports System.Threading.Tasks Imports Parallel_class Public Class Class1 Dim processorcount As New ParallelOptions Public Sub Parallel_processing() 'this is where all the process will happen End Sub Public Sub TestMethod1() processorcount.MaxDegreeOfParallelism = Environment.ProcessorCount 'Parallel.ForEach(0, processorcount, AddressOf Parallel_processing) end sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)