Vendas O.O alguém me ajuda

Connekta Informatica 22/11/2013, 13:25

Connekta Informatica: VIP; Respeito às regras :

Sexo :
Localização :
Mensagens : 1081
Registrado : 01/07/2011

Mensagem nº1

Vendas O.O alguém me ajuda

Mensagem Connekta Informatica 22/11/2013, 13:25

Bom dia

Eu estava estudando Classes do sistema Vendas 0.0, mais não consegui o que eu quero fazer.

Como pode ver no sistema, a quantidade é junto com o código de barras, como posso separa-los, ou seja, criar dois campos um txtCodigoBarras e outro txtQtde?

E que funcione com as mesma funções.

Alguém pode me ajudar?

Muito Obrigado.

.................................................................................

Untitled Document

Connekta Informática Apoia:

Chapada dos Veadeiros - Alto Paraíso de Goiás
Venha conhecer as belezas naturais desta cidade.

Clique Aqui

Lembrete: Desfrutar e Preservar é um direito de Todos.

**JPaulo** 22/11/2013, 13:27

JPaulo

JPaulo: Moderador; Respeito às regras :

Sexo :
Localização :
Mensagens : 11016
Registrado : 04/11/2009

Mensagem nº2

Re: Vendas O.O alguém me ajuda

Mensagem JPaulo 22/11/2013, 13:27

Utilize as funções Left, Mid e Right e o assunto fica resolvido.

.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

Pay-Pal R$ Aqui
Pay-Pal € Aqui

Ou ainda: Aqui (Novo)

Sucesso e Bons Estudos
Success and Good Studies

Vendas O.O alguém me ajuda Folder_announce_new

Utilize o Sistema de Busca do Fórum...
Vendas O.O alguém me ajuda Folder_announce_new

102 Códigos VBA Gratuitos...
Vendas O.O alguém me ajuda Folder_announce_new

Instruções SQL como utilizar...

Connekta Informatica 22/11/2013, 15:31

Connekta Informatica

Connekta Informatica: VIP; Respeito às regras :

Sexo :
Localização :
Mensagens : 1081
Registrado : 01/07/2011

Mensagem nº3

Re: Vendas O.O alguém me ajuda

Mensagem Connekta Informatica 22/11/2013, 15:31

Boa Tarde JPaulo.

Eu não usar essa funções, pois nunca vi. Mais como eu faço isso?

.................................................................................

Untitled Document

Connekta Informática Apoia:

Chapada dos Veadeiros - Alto Paraíso de Goiás
Venha conhecer as belezas naturais desta cidade.

Clique Aqui

Lembrete: Desfrutar e Preservar é um direito de Todos.

**JPaulo** 22/11/2013, 15:41

JPaulo

JPaulo: Moderador; Respeito às regras :

Sexo :
Localização :
Mensagens : 11016
Registrado : 04/11/2009

Mensagem nº4

Re: Vendas O.O alguém me ajuda

Mensagem JPaulo 22/11/2013, 15:41

Vamos imaginar que o código de barras tem a quantidade nos ultimos 2;

Exemplo:
CodBarras = 70300786455377412


Private Sub txtCodBarras_AfterUpdate()
   Me.txtQtde.Value = Right(Me.txtCodBarras.Value, 2)
   Me.txtCodBarras.Value = Replace(Me.txtCodBarras, Right(Me.txtCodBarras.Value, 2), "")
End Sub

A sua caixa de texto "txtQtde" irá receber o valor 12

E o seu Código de barras ficará 703007864553774.

Outra...

Vamos imaginar que a quantidade está no meio do código de barras, posição 6 e 7 = 78.

Exemplo:
CodBarras = 70300786455377412


Private Sub txtCodBarras_AfterUpdate()
   Me.txtQtde.Value = Mid(Me.txtCodBarras.Value, 6, 2)
End Sub

A sua caixa de texto "txtQtde" irá receber o valor 78

.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

Pay-Pal R$ Aqui
Pay-Pal € Aqui

Ou ainda: Aqui (Novo)

Sucesso e Bons Estudos
Success and Good Studies

Vendas O.O alguém me ajuda Folder_announce_new

Utilize o Sistema de Busca do Fórum...
Vendas O.O alguém me ajuda Folder_announce_new

102 Códigos VBA Gratuitos...
Vendas O.O alguém me ajuda Folder_announce_new

Instruções SQL como utilizar...

Connekta Informatica 22/11/2013, 16:07

Connekta Informatica

Connekta Informatica: VIP; Respeito às regras :

Sexo :
Localização :
Mensagens : 1081
Registrado : 01/07/2011

Mensagem nº5

Re: Vendas O.O alguém me ajuda

Mensagem Connekta Informatica 22/11/2013, 16:07

Bom JPaulo, pelo que entendi esse código puxa a quantidade do Codigo de barra?

Se for isso, acho que você entendeu o que eu quero.

No banco de dados Venda O.O temos o formulário de vendas, certo? E nele temos txtBox chamada "txtProdutoQtd", onde digita o código de barras * Quantidade.
Sendo o que eu quero e criar duas textbox uma para digita o código de barras e outra para digitar a quantidade.

.................................................................................

Untitled Document

Connekta Informática Apoia:

Chapada dos Veadeiros - Alto Paraíso de Goiás
Venha conhecer as belezas naturais desta cidade.

Clique Aqui

Lembrete: Desfrutar e Preservar é um direito de Todos.

**JPaulo** 22/11/2013, 16:19

JPaulo

JPaulo: Moderador; Respeito às regras :

Sexo :
Localização :
Mensagens : 11016
Registrado : 04/11/2009

Mensagem nº6

Re: Vendas O.O alguém me ajuda

Mensagem JPaulo 22/11/2013, 16:19

Já que você entendeu a mecanica da coisa e eu desconheço esse banco que fala, é bola para a frente e mãos ao trabalho.

.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

Pay-Pal R$ Aqui
Pay-Pal € Aqui

Ou ainda: Aqui (Novo)

Sucesso e Bons Estudos
Success and Good Studies

Vendas O.O alguém me ajuda Folder_announce_new

Utilize o Sistema de Busca do Fórum...
Vendas O.O alguém me ajuda Folder_announce_new

102 Códigos VBA Gratuitos...
Vendas O.O alguém me ajuda Folder_announce_new

Instruções SQL como utilizar...

**JPaulo** 22/11/2013, 16:22

JPaulo

JPaulo: Moderador; Respeito às regras :

Sexo :
Localização :
Mensagens : 11016
Registrado : 04/11/2009

Mensagem nº7

Re: Vendas O.O alguém me ajuda

Mensagem JPaulo 22/11/2013, 16:22

Já agora e se não se importar, aproveite por favor e dê uma lida nas regras, principalmente o que está grifado a vermelho;

REGRAS DO FÓRUM

1. Tenha paciência com quem coloca aqui as suas duvidas.
2. Clareza nos títulos dos tópicos e duvidas, evite a linguagem MSN.
3. Não colocar diversas vezes a mesma dúvida.
4. Explicar detalhadamente o problema e informar a versão do seu Office + Sistema Operativo.
5. Retorne sempre se deu certo, esse retorno é muito importante.
6. Respeite toda a equipe Staff e demais membros deste fórum.
7. Use sempre o botão Busca, sempre que tiver uma dúvida e antes de abrir tópicos.
8. Não usar palavras como "Urgente". O fórum é livre e ninguém é obrigado a responder com urgência.
9. A publicidade é proíbida e só pode ser feita pelo Administrador ou depois de aprovada pelo Administrador.
10. Se o seu tópico não for respondido, tem o direito de fazer um Up ao final de 24horas!
11. A colocação de Códigos ou Exemplos, devem constar sempre os créditos de quem o elaborou.
12. Fale, não GRITE! Só letras Maiúsculas, na Internet é o mesmo que gritar!
13. É proibido tirar duvidas nas Salas de Repositório, devem abrir um novo tópico nas salas de duvidas, relacionando o Exemplo em causa.

.................................................................................
Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

Pay-Pal R$ Aqui
Pay-Pal € Aqui

Ou ainda: Aqui (Novo)

Sucesso e Bons Estudos
Success and Good Studies

Vendas O.O alguém me ajuda Folder_announce_new

Utilize o Sistema de Busca do Fórum...
Vendas O.O alguém me ajuda Folder_announce_new

102 Códigos VBA Gratuitos...
Vendas O.O alguém me ajuda Folder_announce_new

Instruções SQL como utilizar...

Conteúdo patrocinado

Conteúdo patrocinado

Conteúdo patrocinado

Mensagem nº8

Re: Vendas O.O alguém me ajuda

Mensagem Conteúdo patrocinado

MaximoAccess

MaximoAccess

MaximoAccess

Vendas O.O alguém me ajuda

Vendas O.O alguém me ajuda

Re: Vendas O.O alguém me ajuda

Re: Vendas O.O alguém me ajuda

Re: Vendas O.O alguém me ajuda

Re: Vendas O.O alguém me ajuda

Re: Vendas O.O alguém me ajuda

Re: Vendas O.O alguém me ajuda

Re: Vendas O.O alguém me ajuda

Tópicos semelhantes

Tópicos semelhantes

Pesquisar

Resultados por: Mensagens Tópicos
Pesquisa avançada