bonattinho
-
Total de itens
3 -
Registro em
-
Última visita
Tudo que bonattinho postou
-
carrega as informações do arquivo existente na memória, apaga o arquivo, edita as informações que precisa e cria outro arquivo com as novas informações
-
Print #1, Chr$(27) & Chr$(48); 'linhas em 1/8" Print #1, Chr$(27) & Chr$(50); 'linhas em 1/6"
-
Nessa parte: If rs.EOF And rs.BOF Then MsgBox "Nenhum registro cadastrado na tabela de CIDADES" Else frmcademp.cboUF.Text = rs!UF Exit Sub End If você está apenas setando o texto do combo com o que veio da consulta e saindo da função. se voce quer carregar o combo com o que veio da consulta, primeiro voce tem que tirar o Exit Sub e limpar o combo frmcademp.cboUF.Clear para depois carregar o combo novamente