.NET Decompiler with support for PDB generation, ReadyToRun, Metadata (&more) - cross-platform!
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
 
 

14 lines
330 B

Imports System
Imports Microsoft.VisualBasic
Module VBCompoundAssign
Function Sum3(v As Int32()) As Double()
Dim arr(3) As Double
For i = 0 To UBound(v) Step 3
arr(0) += v(i)
arr(1) += v(i + 1)
arr(2) += v(i + 2)
Next
Return arr
End Function
End Module