IBM® SPSS® Amos™ 28

The following plugin changes the orientation of regression weights to oblique. The UndoToHere / UndoResume method pair allows you to undo the changes by pressing .

Imports Microsoft.VisualBasic
Imports Amos
Imports Amos.pd
<System.ComponentModel.Composition.Export(GetType(IPlugin))>
Public Class CustomCode
    Implements IPlugin
 
    Public Function Mainsub() As Integer Implements IPlugin.Mainsub
        Dim E As PDElement
        UndoToHere()
        For Each E In PDElements
            If E.IsPath Then
                E.ParameterOrientation = 1
            End If
        Next
        DiagramRedrawDiagram()
        UndoResume()
    End Function
 
    Public Function Name() As String Implements IPlugin.Name
    End Function
 
    Public Function Description() As String Implements IPlugin.Description
    End Function
End Class