Olá boa tarde a todos.
é o seguinte addicionei ums rotulos da seguinte forma
'Cria a controle labl com os dados
Set ctlText = CreateControl("FormVisualizarContasBancarias", acLabel, acDetail, , campo, esquerdaText, topoText, larguraText, alturaText)
ctlText.Name = banco & "campo" & j
' Cria label do controle.
Set ctlLabel = CreateControl("FormVisualizarContasBancarias", acLabel, acDetail, , rotulo, esquerdaLabel, topoLabel, larguraLabel, alturaLabel)
ctlLabel.Name = banco & "rotulo" & j
estou tentando remover conforme código abaixo, mas esta dando o seguinte erro:
erro de compilação: o tipo definido pelo usuário não foi definido.
Dim c As Control
For Each c In Controls
If TypeOf c Is MSForms.Label Then
Me.Controls.Remove c.Name
End If
Next
desde já agradeço a atenção
é o seguinte addicionei ums rotulos da seguinte forma
'Cria a controle labl com os dados
Set ctlText = CreateControl("FormVisualizarContasBancarias", acLabel, acDetail, , campo, esquerdaText, topoText, larguraText, alturaText)
ctlText.Name = banco & "campo" & j
' Cria label do controle.
Set ctlLabel = CreateControl("FormVisualizarContasBancarias", acLabel, acDetail, , rotulo, esquerdaLabel, topoLabel, larguraLabel, alturaLabel)
ctlLabel.Name = banco & "rotulo" & j
estou tentando remover conforme código abaixo, mas esta dando o seguinte erro:
erro de compilação: o tipo definido pelo usuário não foi definido.
Dim c As Control
For Each c In Controls
If TypeOf c Is MSForms.Label Then
Me.Controls.Remove c.Name
End If
Next
desde já agradeço a atenção