New Control At Runtime

[dubbemiah]

Sub MouseMove (X As Integer, Y As Integer) 
  Dim o As OvalShape
  If MouseX >=1 or MouseY >=1 Then
    o = New OvalShape
    'o.Visible
    o.FillColor = RGB(255,0,0)
    o.Width = 27
    o.Height = 27
    'o.Top = MouseX + 5
    'o.Left = MouseY + 5
  End if
End Sub

When trying to make a new control at runtime, which will be an OvalShape, it doesn't make the control, because the lines that I have 'commented' give me syntax errors, so RealBasic doesn't even recognize variable "o" as an OvalShape control. Can anyone tell me how to fix this?