Alex, posta um exemplo para ser mais fácil de verificar.

Amigo Wagner, em partes é isto que eu preciso. Só tem um detalhe: a diferença do tamanho das telas, ou seja, no note o tamanho é um, mas quando olhar ...

Coloquei em anexo o arquivo. Se olhar o projeto dele e comparar com o gráfico, o tamanho é adequado. Porém ao abrir o formulário, com o comando que c...

Amigo, este comando não resolveu....vamos procurando, uma hora destas eu acho.

Wagner Ficou muito bom. Muito obrigado pela ajuda. Eu não gosto de usar o listbox pois acho que os recursos são muito reduzidos. Mas o cliente é resis...

Boa tarde Amigo Não sei se é exatamente o que vc precisa, mas segue: Private Sub cboCondicoes_Enter() lblmsg.Caption = " Escolha a forma d...

Wagner desculpe... realmente errei postando daquela forma. Eu andei meio afastado e esqueci...mas alterei. Obrigado por lembrar (novamente). Tentei ...

Fernandox Eu uso assim e funciona. Para Salvar: Private Sub SalvaRegistro(ByVal id As Long, ByVal indice As Long) If txtdata.Value = &q...

Resolvido alterando o comando: Microsoft.JET.OLEDB.4.0 por Microsoft.ACE.OLEDB.12.0 Fica o registro se alguém mais enfrentar o mesmo problema.

Bom dia Obrigado amigo pela sua ajuda

Amigo MPrudencio Como não conseguimos ir adiante e eu continuei procurando, acabei indo para o outro post: viewtopic.php?f=23&t=28765 Que ainda n...