13 lines
320 B
VB.net
13 lines
320 B
VB.net
Imports System.Runtime.CompilerServices
|
|
|
|
Module IEnumerableEx
|
|
<Extension()>
|
|
Function SetValue(Of T)(items As IEnumerable(Of T), updateMethod As Action(Of T)) As IEnumerable(Of T)
|
|
For Each item As T In items
|
|
updateMethod(item)
|
|
Next
|
|
|
|
Return items
|
|
End Function
|
|
End Module
|