Hola a todos! gracias por las sugerencia, pero Leandro tiene razón, implementé tal cual como lo dice:
en el usercontrol le agregué la propiedad "hwnd" y la rutina para ubicar el form es la siguiente
Public Sub UbicarFORM(ByVal hWndRelativeTo As Long, ByVal X As Long, ByVal y As Long)
Dim rc As RECT, rcBt As RECT
If m_fbt_hWnd > 0 Then Exit Sub
With Me
m_hWndRelativeTo = hWndRelativeTo
m_fbt_hWnd = .hWnd
GetWindowRect hWndRelativeTo, rc
GetWindowRect m_fbt_hWnd, rcBt
If (rc.Left * Screen.TwipsPerPixelX) + X + 45 > Screen.Width Then
X = X - (((rc.Left * Screen.TwipsPerPixelX) + X + 45) - Screen.Width)
End If
If (rc.Top * Screen.TwipsPerPixelY) + y + .Height + 45 > Screen.Height Then
y = y - (((rc.Top * Screen.TwipsPerPixelY) + y + .Height + 45) - Screen.Height)
End If
.Move (rc.Left * Screen.TwipsPerPixelX) + X, (rc.Top * Screen.TwipsPerPixelY) + y
SetWindowPos .hWnd, HWND_TOPMOST, core_HOME.UcSCaption.Left, 0, 0, 0, _
SWP_NOACTIVATE Or _
SWP_NOMOVE Or _
SWP_NOSIZE Or _
SWP_SHOWWINDOW Or _
SWP_NOOWNERZORDER
End With
End Sub
----
'LA LLAMO ASÍ
ubicarFORM UC.hWnd, UC.Width - UC.Width, UC.Height