[SOLUCIONADO] Usar 1 solo formulario, en vez de 2 para 2 TextBx

[JoaoM]

Tengo 2 formularios con un calendario que cada uno actúa en su TextBox

Al hacer MouseUp en alguno de los 2 TextBox se abre su respectivo formFecha

FormFechaI en el TextBox1
y
FormFechaF en el TextBox2

Quiero usar UNO solo formulario con calendario
para los 2 TextBox según haga MouseUp. Trate pero no logre

Este es el código en formulario, Consultar_Mov

Código:

Private Sub TextBox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Single, ByVal Y As Single)
    FormFechaI.Show
End Sub


Private Sub TextBox2_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Single, ByVal Y As Single)
    formFechaF.Show
End Sub

y en cada formulario formFechaF y formFechaI con calendario esto

Código:

Private Sub Calendar1_Click()
    Consultar_Mov.TextBox2.Value = Calendar1.Value
    Unload Me
End Sub

Private Sub Calendar1_Click()
    Consultar_Mov.TextBox1.Value = Calendar1.Value
    Unload Me
End Sub

¿Cómo seria la programación? también trate con IF pero no supe hacerlo
Agradezco su ayuda