AfterSimulationEvent

Private Sub PortfolioOptRuntime_AfterSimulationEvent( _
    IterationsCompleted As Long, _
    Trials As Long, _
    MaxTrials As Long, _
    Progress As Double, _
    WasAborted As Boolean, _
    WasStoppedOnError As Boolean, _
    WasStoppedOnPrecision As Boolean, _
    HasNewBestSolution As Boolean)

   'Your code is here
End Sub

In this signature, parameters or arguments are defined as follows: