MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    ao passar o mouse fazer a observação do campo aparecer

    Compartilhe

    crysostomo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 40
    Registrado : 23/01/2018

    ao passar o mouse fazer a observação do campo aparecer

    Mensagem  crysostomo em Qui 8 Mar - 11:58

    Amigos boom dia.]
    Ao passar o mouse em cima de uma imagem  não consigo fazer que a observação do campo aparece( "clique aqui para imprimir"), só consigo fazer isso se passar o mouse em um campo.
    já pequei uns anexo daqui e não consegui inverte.
    O Objetivo é que assim é que o usuário abrir o relatório o aviso tem que aparecer, e ao passar o mouse na imagem o aviso tem que desaparecer
    ---
    Option Compare Database

    Dim strEsconde As Boolean

    Private Sub Form_Load()
           lblAviso.Visible = true
       
    End Sub

    Private Sub Detalhe_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
     Dim varRet
     varRet = SysCmd(acSysCmdSetStatus, " ")
     
       If strEsconde = false Then
           strEsconde = true
           lblAviso.Visible = False
         
       End If
       
    End Sub


    Private Sub txtBarra_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Dim varRet
     varRet = SysCmd(acSysCmdSetStatus, "Informação com Recurso à Barra de Status...")
    End Sub

    Private Sub imagemAviso_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
       If Len(lblNome.Caption & "") <> 0 Then
            strEsconde = True
            lblAviso.Visible = flase
       End If
    End Sub

      Data/hora atual: Sex 25 Maio - 15:45