MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


    [Resolvido]Botoes de 'avançar registro' não atualiza listbox

    Hadenia
    Hadenia
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 11
    Registrado : 28/08/2013

    [Resolvido]Botoes de 'avançar registro' não atualiza listbox Empty [Resolvido]Botoes de 'avançar registro' não atualiza listbox

    Mensagem  Hadenia 5/9/2013, 14:17

    Tenho um formulario de clientes, e no mesmo, uma listbox com os nomes dos clientes. No rodapé do form tenho botões de 'avança registro' 'excluir' e etc.(navegação).

    Gostaria de saber se tem como ao clicar no botão 'avançar' ou 'voltar' registro, a listbox podia atualizar também?
    avatar
    Convidado
    Convidado


    [Resolvido]Botoes de 'avançar registro' não atualiza listbox Empty Re: [Resolvido]Botoes de 'avançar registro' não atualiza listbox

    Mensagem  Convidado 5/9/2013, 14:21

    Se a listBox tiver o critério de acordo com o form, para filtrar a mesma de acordo com o registro no form, no botào pode colocar

    Me.Sualista.Requery


    Cumprimentos.
    Hadenia
    Hadenia
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 11
    Registrado : 28/08/2013

    [Resolvido]Botoes de 'avançar registro' não atualiza listbox Empty Re: [Resolvido]Botoes de 'avançar registro' não atualiza listbox

    Mensagem  Hadenia 5/9/2013, 14:29

    acho que não expliquei bem, é assim: Quando eu clicar no botão de avançar registro, na listbox também deve aparecer selecionado o proximo registro.
    avatar
    Convidado
    Convidado


    [Resolvido]Botoes de 'avançar registro' não atualiza listbox Empty Re: [Resolvido]Botoes de 'avançar registro' não atualiza listbox

    Mensagem  Convidado 5/9/2013, 15:22

    Para selecionar um registro em uma listBox

    On Error Resume Next
    Dim Selecionado As Boolean
    Dim I As Integer
    Dim strProcura As String, intPos As Integer
    Dim strList As String
        strProcura = UCase$(Me.txtBusca.Text)
        intPos = Len(strProcura)
        If intPos Then
            For I = 0 To ImageList.ListCount - 1
                strList = Me.ImageList.Column(0, I)
                If UCase$(Left(strList, intPos)) = strProcura Then
                    Me.ImageList.Selected(I) = True
                    Selecionado = True
                    Me.ImageList = Me.ImageList.Column(0)
                    Exit For
                Else
                    Me.ImageList.Selected(I) = False
                    Selecionado = False
                End If
            Next
    End If

    Lembrando que neste caso está selecionando o texto digitado em uma caixa texto: Me.txtBusca.Text

    Ou se alguma informação da list em uma coluna for condizente com uma caixa texto no form:

    Me.Sualista.Colunm(x) = Me.SuaCaixaTexto

    POdes adaptar ao que necessita


    Cumprimentos.


    Última edição por PILOTO em 1/11/2013, 01:32, editado 1 vez(es) (Motivo da edição : Tópico dado como resolvido por falta de resposta)

    Conteúdo patrocinado


    [Resolvido]Botoes de 'avançar registro' não atualiza listbox Empty Re: [Resolvido]Botoes de 'avançar registro' não atualiza listbox

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/5/2024, 06:34