IBM® SPSS® Amos™ 28

This example demonstrates the Title method.

Imports Microsoft.VisualBasic
Module MainModule
    ' Title Method Example
    Sub Main()
        Dim Sem As New AmosEngineLib.AmosEngine
 
        Sem.title("Example 8:" _
            & vbLf & "factor analysis" _
            & vbLf _
            & vbLf & "Holzinger and Swineford (1939) Grant-White sample." _
            & vbLf & "Intelligence factor study. Raw data of 73 female" _
            & vbLf & "students from the Grant-White high school, Chicago.")
 
        Sem.TextOutput()
        Sem.SampleMoments()
 
        Sem.BeginGroup(AmosEngine.AmosDir & "Examples\English\UserGuide.xls", "Grnt_fem")
        Sem.AStructure("visperc = (1) spatial + (1) err_v")
        Sem.AStructure("cubes = spatial + (1) err_c")
        Sem.AStructure("lozenges = spatial + (1) err_l")
        Sem.AStructure("paragraph = (1) verbal + (1) err_p")
        Sem.AStructure("sentence = verbal + (1) err_s")
        Sem.AStructure("wordmean = verbal + (1) err_w")
 
        Sem.Dispose()
    End Sub
End Module