Visual Basic - AYUDA URGENTE CON UN CONTROL ACTIVE X Y DATASOURCE

HOLA AMIGOS:
Nesecito crear un control activex que tiene un cuadro de texto y necesito las propieades del cuadro de texto DataField, DataFormat, DataSource y DataMember. La cuestion está en creo las propiedades y hago referencia a las propiedades del texto asi:

Public Property Get DataField() As String
DataField = Text1.DataField
End Property

Public Property Let DataField(ByVal New_DataField As String)
Text1.DataField() = New_DataField
PropertyChanged "DataField"
End Property

Y ASI PARA DATA MEMBER y para datasource lo hago con Set en lugar de let.
la cuestion está en que no puede abrir el formulario que tiene mi control porque me genera un error que dice cerrar programa, y a la hora de enlazar no me muestra ni los datamember no los datafield del dataenvironmet, aunque me muestra los datasource que hayan en el formulario o proyecto.
A QUIEN ME RESPONDA SE LO VOY A AGRADECER MUCHISIMO porque me URGE terminar una aplicacion que requiere del control
de antemano MUCHAS GRACIAS!!!!!!!!!!!!!!!!!!

HOLA A TODOS:
Gracias de antemano pero yo desarrolle la tecnica para evitar el error que me generaba el Visual Basic cuando trataba de ejecutar el formulario con el control ligado a un datasource: Bien el datasource genera el error y cierra el programa entonces en lugar de usar:
public property set DataSource(byval New_DataSource as datasource)
set text1.datasource=new_dataSource
yo cree la propiedad m_datasource asi
private m_DataSource as DataSource
y en Usercontrol_Show se hace lo siguiente:

Private Sub UserControl_Show()
If Ambient.UserMode Then
Set Text1.DataSource = m_DataSource
End If
End Sub
espero que le sirva a alguien necesitado también

HASTA LUEGO