C# / VB.NET - Programma simula registratore cassa

Forum - C# / VB.NET - Programma simula registratore cassa

Pagine: [ 1 2 3 ]

ginmile77 (Normal User)
Newbie

Messaggi: 15
Iscritto: 06/08/2014

Postato alle 8:15
Mercoledì, 06/08/2014

Ciao a tutti. Ho ricreato in VB il funzionamento del registratore di cassa della mia attività. Non sono riuscito perchè non ho idea di come fare per eseguire questa particolarità. Praticamente nel momento in cui si digita sulla cassa, il display parte con 0,00. Se si inizia a digitare ad esempio 50 centesimi lui parte da destra e prosegue verso sinistra. Con la virgola sempre fissa. Non so come ricreare questa funzione. Mi aiutate?

Snogar (Normal User)
Pro

Messaggi: 145
Iscritto: 09/01/2012

Postato alle 9:06
Mercoledì, 06/08/2014

Mmmmm se ho capito bene come funziona potresti provare a creare due variabili una per i centesimi e una per gli euro, a seconda del loro riempimento visualizzi virgola e affini.

ginmile77 (Normal User)
Newbie

Messaggi: 15
Iscritto: 06/08/2014

Postato alle 9:31
Mercoledì, 06/08/2014

Ho provato con una maskedtexbox __,__ ma non mi permette di digitare da destra a sinistra. Avete una soluzione?

vankraster (Member)
Rookie

Messaggi: 32
Iscritto: 05/11/2010

Postato alle 18:24
Mercoledì, 06/08/2014

è facile, ti metto un pseudocodice c#

Nel Textbox fai proprietà- TextAlign:Right
poi nel evento KeyPress collega questo codice:

Codice sorgente - presumibilmente C#

int numero = 0;
        bool firstPRESS = true;
 
        private void textBox2_KeyPress(object sender, KeyPressEventArgs e)
        { 
            if (firstPRESS)
            {
                firstPRESS = false;
                textBox2.Text = "0,0" + e.KeyChar.ToString();
                int.TryParse(e.KeyChar.ToString(), out numero);
            }
            else
            {
                int T_num = 0;
                int.TryParse(e.KeyChar.ToString(), out T_num);
                numero = (10 * numero) + T_num;
                 
                decimal res = (decimal)numero / 100m;
                textBox2.Text = res.ToString("######0.00");
            }
 
            e.Handled = true;
        }

ginmile77 (Normal User)
Newbie

Messaggi: 15
Iscritto: 06/08/2014

Postato alle 19:30
Mercoledì, 06/08/2014

Appena arrivo a a casa provo. Comunque grazie mille

ginmile77 (Normal User)
Newbie

Messaggi: 15
Iscritto: 06/08/2014

Postato alle 1:22
Giovedì, 07/08/2014

Perfetto funziona. Hai la possibilità di tradurlo in Vb.net? mille grazie

dnha (Member)
Pro

Messaggi: 137
Iscritto: 24/07/2014

Postato alle 8:26
Giovedì, 07/08/2014

Codice sorgente - presumibilmente VB.NET

Dim numero As Integer = 0
    Dim firstPRESS As Boolean = True
 
    Private Sub TextBox2_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox2.KeyPress
        If firstPRESS Then
            firstPRESS = False
            TextBox1.Text = "0,0" + e.KeyChar.ToString()
            Integer.TryParse(e.KeyChar.ToString(), numero)
        Else
            Dim T_num As Integer = 0
            Integer.TryParse(e.KeyChar.ToString(), T_num)
            numero = (10 * numero) + T_num
 
            Dim res As Decimal = CDec(numero) / 100D
            TextBox1.Text = res.ToString("######0.00")
        End If
 
        e.Handled = True
    End Sub

ginmile77 (Normal User)
Newbie

Messaggi: 15
Iscritto: 06/08/2014

Postato alle 8:35
Giovedì, 07/08/2014

Ti ringrazio. Non riesco a capire la parte if firstpress then senza una assegnazione

dnha (Member)
Pro

Messaggi: 137
Iscritto: 24/07/2014

Postato alle 9:00
Giovedì, 07/08/2014

If firstPRESS equivale a If firstPRESS = True

Pagine: [ 1 2 3 ]