13 lines
347 B
Plaintext
13 lines
347 B
Plaintext
|
|
[source,vbnet]
|
|
----
|
|
Private Sub MyMethod(ByVal items As List(Of MyObject))
|
|
logger.Debug("The operation started")
|
|
For Each item In items
|
|
logger.Debug($"Evaluating {item.Name}")
|
|
Dim result = Evaluate(item)
|
|
logger.Debug($"Evaluating resulted in {result}")
|
|
Next
|
|
logger.Debug("The operation ended")
|
|
End Sub
|
|
---- |