source: Option Explicit
  Dim i, sum
  sum = 0
  For i = 1 To 3
      sum = sum + i
  Next
  MsgBox "Test #7 - For loop sum: " & sum
target: Add-Type -AssemblyName Microsoft.VisualBasic
  Option Explicit
  
  $sum = 0
  for ($1 = 0; $1 -le 3; $1 += 1) {
      $sum = $sum + $i
  }
  [Microsoft.VisualBasic.Interaction]::MsgBox "Test #7 - For loop sum: " + $sum