Italian Inziare la numerazione a 3 cifre partendo da 001

fifiddu70

Well-Known Member
Licensed User
Longtime User
Ciao a tutti, qualcuno mi sa dire come creare un contatore che inzia a contare a 3 cifre partendo con 001 e successivi 002 etc, al posto di inziare con 1 senza gli zeri iniziali?
 

fifiddu70

Well-Known Member
Licensed User
Longtime User
LucaMs non capisco dove sbaglio, mi da sempre 1 al posto di 001
questo dove ho inserito il codice che successivamente stampa il tutto:
B4X:
Sub btncarica_Click
    
    If  spquantity.SelectedItem = 1 Then
        
        txtdisplay.Text = txtintestazione.Text & CRLF & "Ticket:  " & txtcorsa.Text & CRLF & "Emesso:  " & DateTime.Date(now) &  "   " &  DateTime.time(now) &  CRLF & "Da: " &  txtfrom.Text &  CRLF & "A : "& txtto.Text & CRLF &  "Passeggeri: " & txtquantity.Text & CRLF & "Importo: " & txtprice.Text & CRLF & "                      " & CRLF
        NumberFormat2(txtcorsa.Text, 3, 0, 0, False)

     Else
    
        txtdisplay.Text = txtintestazione.Text & CRLF & "Ticket:  " & txtcorsa.Text & CRLF & "Emesso:  " & DateTime.Date(now) &  "   " &  DateTime.time(now) &  CRLF & "Da: " &  txtfrom.Text &  CRLF & "A : "& txtto.Text & CRLF &  "Passeggeri: " & txtquantity.Text & CRLF & "Importo: " & txtprice.Text & CRLF & "                      " & CRLF
        NumberFormat2(txtcorsa.Text, 3, 0, 0, False)

        
    End If
    If connected Then
    
    Else
    mnuConnect_Click
    End If
    
End Sub
 

LucaMs

Expert
Licensed User
Longtime User
LucaMs non capisco dove sbaglio, mi da sempre 1 al posto di 001
Probabilmente perché gli passi:
txtcorsa.Text
che è un testo, anche se contiene solo numeri.

E' una cosa sbagliata in generale, usare le View in quel modo.
Crea una variabile Int, passagli il valore della txtcorsa.Text e poi passa questa variabile al NumberFormat2.

Ovviamente immagino che sia così, non ho provato.

P.S. Ora ho provato (B4J) e pare non sia quello il motivo; ergo, rileggo il tuo sorgente...
Riletto; è che sono un pirla, non ti ho spiegato bene! ?

NumberFormat2 è una funzione, ti restituisce la stringa "001", in quel caso, ma se lo scrivi da solo, come fosse un comando, è ovvio che non faccia niente alcunché.

Se, ad esempio, tu scrivessi:

B4X:
Log(NumberFormat2(txtcorsa.Text, 3, 0, 0, False))

lo vedresti.
 
Last edited:

Sabotto

Well-Known Member
Licensed User
Riletto; è che sono un pirla, non ti ho spiegato bene! ?

NumberFormat2 è una funzione, ti restituisce la stringa "001", in quel caso, ma se lo scrivi da solo, come fosse un comando, è ovvio che non faccia niente alcunché.
Mi piace Luca che aiuta, dà la soluzione e poi si autocazzeia...???
 

Star-Dust

Expert
Licensed User
Longtime User
Io cedo le armi ....
?????
 

Star-Dust

Expert
Licensed User
Longtime User
Top