Access inicio | | | | | |
Olá,
Seja Bem Vindo ao Blog.

Conecte-se ou registre-se e utilize gratuitamente este equipamento, temos exemplos referente a criação de banco de dados e desenvolvimento de softwares e programas utilizando o Microsoft Access.


Administração do Blog AccessDoProgramador.

Carregar-popular ListBox desvinculada com Front-End Desvinculado sem senha

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

18022012

Mensagem 

Carregar-popular ListBox desvinculada com Front-End Desvinculado sem senha






Seção de origem no Blog: Desvinculos


Carregando a ListBox apartir de outro banco (BackEnd) sem senha.

No evento ao carregar do formulário utilize:
Código:
Dim MeuCaminho As String
     Dim nSQL As String

        'Armazenando o caminho do banco de dados na variável "MeuCaminho"
           MeuCaminho = Application.CurrentProject.Path & "\banco\BackEnd.mdb"

                'Armazenando os registros na variável nSQL:
                  nSQL = "SELECT CdPais, Pais FROM Paises IN" & " '" & MeuCaminho & "'" & "ORDER BY Pais;"
  
                'Define a propriedade tipo de origem da linha como Tabela/Consulta.
               Me.Lista.RowSourceType = "Table/Query"

            'Limpa a origem da linha da listbox.
           Me.Lista.RowSource = ""

         'Define a propriedade número de colunas = 2 colunas.
        Me.Lista.ColumnCount = 2

      'Define a propriedade coluna acoplada = 1 (cujo valores serão utilizados como valor do controle).
     Me.Lista.BoundColumn = 1

   'Define dois valores na propriedade largura das colunas, haja vista ter declarado acima 2
  Me.Lista.ColumnWidths = "1cm;2cm"

'Set rs = Db.OpenRecordset(nSQL, dbOpenDynaset)
Me.Lista.RowSource = nSQL

Faça download do exemplo:
Download

Até study


avatar
Dilson
Facilitador
Facilitador

Brasil


http://www.dadosweb.com

Voltar ao Topo Ir em baixo

- Tópicos similares
Compartilhar este artigo em: BookmarksDiggRedditDel.icio.usGoogleLiveSlashdotNetscapeTechnoratiStumbleUponNewsvineFurlYahoo!Smarking

 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum