Quando você começar com um negócio de varejo, você precisa de um POS (Point of Sale) dispositivo para tocar-se seus clientes. Você poderia sair e comprar um programa de registo de dinheiro, mas que podem custar centenas de dólares. A outra alternativa, que é gratuita, se tiver Visual Basic 6, é digitar o código de um registo VB6. Os inteiros necessários para um registo de dinheiro é bastante simples, por isso mesmo se VB6 não é seu forte, você ainda terá um registro funcional, sem muito trabalho.
Abrir VB6 seleccionando "Visual Basic 6" a partir de "Programa" no "Começar" menu do botão.
Digite o código de registo de dinheiro começando como este para o painel central VB6:
declarar variáveis
preço dim como inteiro
subtotal dim como decimal
total de dim como decimal
Este é usado para declarar todos os valores necessários para o registo.
Tipo de codificação para o programa de registo como o seguinte:
preço = val (pricetextbox.text)
subtotal = val (subtotallabel.text)
Total = subtotal + preço
Se pricegt; 0, em seguida
Total = val (subtotallabel.text) + preço
fim se
subtotallabel.text = string.format (total)
pricetextbox.text =""
Salve o registo com "CTRL + S" e pressione "F5" para executar o registo.