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