** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Problemas al asignar Event Procedure a OnClick
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoProblemas al asignar Event Procedure a OnClick

 Responder Responder
Autor
Mensaje
dokk Ver desplegable
Habitual
Habitual


Unido: 15/Mayo/2020
Localización: Hendaye
Estado: Sin conexión
Puntos: 166
Enlace directo a este mensaje Tema: Problemas al asignar Event Procedure a OnClick
    Enviado: 24/Mayo/2023 a las 08:27
Buenos días:

Estoy tratando de añadir código a una etiqueta a través de código. Para ello uso lo siguiente:

With Me.Controls("Etiqueta" & i)
                .Properties.Item("OnClick") = "[Event Procedure]"
                strcode = "Private Sub " & .name & "_Click()" & vbCr _
                  & "    WODetail.Visible = True" & vbCr _
                  & "End Sub"
                Set mdl = Forms("Gantt").Module
                  mdl.InsertText strcode
End With

El código me lo inserta en el módulo correctamente, pero al evento "Al hacer click" no se le asigna el "Procedimiento de evento".

Lo curioso es que si sustituyo "OnClick" por "OnDblClick", sí se asigna el "Procedimiento de evento" a  "Al hacer doble click" (evidentemente no vinculado al código que le asigno ya que éste es para hacer sólo click).

Seguro que es alguna chorrada, pero no termino de verla.

Gracias de antemano. 



Albert Hostein
Aprendiendo cayendo
Arriba
dokk Ver desplegable
Habitual
Habitual


Unido: 15/Mayo/2020
Localización: Hendaye
Estado: Sin conexión
Puntos: 166
Enlace directo a este mensaje Enviado: 26/Mayo/2023 a las 14:53
Al final lo he puesto a manija. Se puede cerrar.
Albert Hostein
Aprendiendo cayendo
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable