Backup and recover physical and cloud-based servers and workstations, as well as endpoint devices that belong to remote users. Avoid downtime and data loss quickly and easily for Windows-based physical or public cloud-based workloads!
#Region "RunnerPoolDristrabution" Private poollist As New ArrayList Public Sub RunnerDistrabution() Dim i As Decimal = 0 Dim ipool As Decimal = 0 Dim q As Decimal = 0 Dim count As Integer = 0 For Each item As ListViewItem In ListView7.Items i = (winpool - ipool) / CDec(item.SubItems(1).Text) item.SubItems(8).Text = (i + (0.2 * i)).ToString("N2") If poollist(count).ToString <> item.SubItems(8).Text Then poollist. ((i + (0.2 * i)).ToString("N2")) End If ipool = ipool + i count += 1 Next For Each item As ListViewItem In ListView7.Items q = CDec(item.SubItems(8).Text) item.SubItems(9).Text = (i + (0.2 * i) - CDec(q)).ToString("N2") Next End Sub #End Region
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.