'Target' module rotation error

Hi,

I have filled out my first module and appear to have erred somewhere.

My code -

Sub Main()
'Declare Variables
Dim MyLine As LineElement
Dim MyCir As EllipseElement
Dim CenPt As Point3d
Dim LineSt As Point3d
Dim LineEn As Point3d
Dim RotMatrix As Matrix3d
'Create Horizontal Line
LineSt.X = -1
LineEn.X = 1
Set MyLine = Application.CreateLineElement2(Nothing, LineSt, LineEn)
Application.ActiveModelReference.AddElement MyLine
'Create Vertical Line
LineSt.X = 0: LineSt.Y = 1
LineEn.X = 0: LineEn.Y = -1
Set MyLine = Application.CreateLineElement2(Nothing, LineSt, LineEn)
Application.ActiveModelReference.AddElement MyLine
'Create Circles
Set MyCir = Application.CreateEllipseElement2(Nothing, CenPt, 0.25, 0.25, RotMatrix)
Application.ActiveModelReference.AddElement MyCir
Set MyCir = Application.CreateEllipseElement2(Nothing, CenPt, 0.5, 0.5, RotMatrix)
Application.ActiveModelReference.AddElement MyCir
End Sub

'Front View'

 How do I get the target to face up in the top view?

 

Cheers