Dias atrás em uma ajuda a um colega do fórum, ele postou este exemplo o qual achei interessante na fução citada no Título do Tópico, porém necessito de uma pequena modificação no mesmo, se puderem ajuda fico grato.
Questão:
ao exibir o Balão o mesmo tem um Titulo e abaixo a descrição.. O Código do sistema repete o mesmo título para todos os balões exibidos ao repousar o mouse no objeto, modificando apenas a descrição.
Pergunto:
Como colocar um título para cada objeto?
Cumprimentos.
Questão:
ao exibir o Balão o mesmo tem um Titulo e abaixo a descrição.. O Código do sistema repete o mesmo título para todos os balões exibidos ao repousar o mouse no objeto, modificando apenas a descrição.
Pergunto:
Como colocar um título para cada objeto?
Private Sub Form_Open(Cancel As Integer)
Set TTip = New clsToolTip
On Error Resume Next
Me.Combinação15.SetFocus
With TTip
Call .Create(Me)
.DelayTime = 5000
.SetToolTipTitle "Filtrar informações", 1 >>>>> Título
' ToolTip text colors
.ForeColor = 8421504
.BackColor = 15790320
.SetToolText Me.txtFiltro, "Coloque o critério que deseja filtrar e clique em Ok. " + vbNewLine _
+ "O filtro irá verificar em todos os campos o critério informado"
.SetToolText Me.cmdOk, "Exibe resultado da busca" >>>> Texto para o objeto cmdOK
.SetToolText Me.cmdReport, "Exibe o relatório com resultado das buscas" >>>> Texto para o objeto cmdReport
.SetToolText Me.txtCount, "Total de Registros encontrados na busca" >>>> Texto para o objeto txtCount
End With
End Sub
Cumprimentos.