Página 1 de 1
Restrição TextBox - Peso
Enviado: 31 Mai 2017 às 17:23
por nandopg
Boa tarde, pessoal!
Preciso de uma ajudinha de vocês???
Estou tentando montar um rotina de restrição para TextBox, mas não estou conseguindo. Trata-se de uma TextBox de peso de amostra, ou seja, quando digitar por exemplo a quantidade 0,99 gramas quero que apareça uma mensagem "Peso insuficiente para cadastrar", abaixo de 100gr não deixar cadastrar.
Se alguém puder me ajudar fico agradecido!
Att.
Luis Fernando
Restrição TextBox - Peso
Enviado: 31 Mai 2017 às 23:14
por gfranco
Boa noite.
Experimente colocar uma condicional "IF" para verificação do peso.
Algo do tipo...
Código: Selecionar todosIf textbox1.value<99 then....msgbox "Peso insuficiente para cadastrar" else.....continue o código
Re: Restrição TextBox - Peso
Enviado: 01 Jun 2017 às 09:02
por nandopg
Bom dia!
Testei com a condicional "If" e não deu certo.
Qualquer valor que digita na TextBox1 aparece a MsgBox "Peso insuficiente para cadastrar"
Att.
Luis
Restrição TextBox - Peso
Enviado: 01 Jun 2017 às 09:08
por gfranco
Bom dia.
Sugiro postar sua planilha.
Re: Restrição TextBox - Peso
Enviado: 01 Jun 2017 às 09:29
por nandopg
Segue em anexo a planilha.
Restrição TextBox está no Form_Amostra.
Desde já muito obrigado pela atenção.
Att.
Luis Fernando
Re: Restrição TextBox - Peso
Enviado: 01 Jun 2017 às 10:40
por gfranco
Bom dia.
Veja se lhe ajuda
Re: Restrição TextBox - Peso
Enviado: 01 Jun 2017 às 11:25
por nandopg
Perfeito! Isso mesmo!
Mas, o que eu estava pensado e queria se tivesse jeito era colocar um zero antes da virgula, por ex: 0,098gr
Eu coloquei a função "Format", mas não deu certo.
If Me.TXT_AMOSTRA.Value < Format(Me.TXT_AMOSTRA, "#.##0,099") Then
Nessa condição prossegue para gravar...
Att.
Luis Fernando
Restrição TextBox - Peso
Enviado: 01 Jun 2017 às 15:32
por gfranco
Boa tarde Luis.
0,098gr sempre será menor que 100 gr.
Re: Restrição TextBox - Peso
Enviado: 01 Jun 2017 às 15:52
por nandopg
Não entendi.
Att.
Luis Fernando