Acquista i nostri libri consigliati su Amazon.it
+ Rispondi al messaggio
Pagina 1 di 2 12 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 16

somma textbox

  1. #1
    oilcrovara non  in linea Scolaretto
    ciao a tutti
    mi sto perdendo in un passaggio banale!!
    vorrei la somma totale sulla text 43 della text 20 + text 42....
    dove sbaglio?
    grazie


    Private Sub TextBox1_change()
    'TextBox1.Text = Format(TextBox1.Text, "#,###")
    TextBox19.Text = Val(TextBox1.Value) + Val(TextBox2.Value)
    'TextBox19.Text = Format(TextBox19.Text, "#,###.00")
    TextBox15.Text = Val(TextBox1.Value) + Val(TextBox2.Value) + Val(TextBox18.Value)
    'TextBox15.Text = Format(TextBox15.Text, "#,###.00")
    TextBox40.Text = Val(TextBox15.Value) + Val(TextBox35.Value)
    'TextBox40.Text = Format(TextBox40.Text, "#,###")
    TextBox20.Text = Val(TextBox15.Value) * "0,027250"
    TextBox20.Text = Format(TextBox20.Text, " 0.00")
    TextBox43.Text = Val(TextBox20.Value) + Val(TextBox42.Value)
    TextBox43.Text = Format(TextBox43.Text, " 0.00")

    End Sub

  2. #2
    L'avatar di Elimar
    Elimar non  in linea Scribacchino
    prova a vedere qui

    Fammi sapere se quello che cercavi.
    ℹ️ Leggi di pi su Elimar ...

  3. #3
    oilcrovara non  in linea Scolaretto
    grazie mille....
    non quello che cercavo...

    ma dove sbaglio??

  4. #4
    oilcrovara non  in linea Scolaretto
    ciao..
    ho provato il tuo consiglio senza risultato!

    Private Sub calcolo()
    Dim i, j As Integer
    Sum = 0
    sum1 = 0
    sum2 = 0
    For i = 20 To 42
    On Error Resume Next
    sum1 = sum1 + Controls("textbox.20" & i).Value
    Next i
    For j = 20 To 42
    On Error Resume Next
    sum2 = sum2 + Controls("textbox.42" & j).Value
    Next j
    Sum = sum1 + sum2
    TextBox43.Value = Sum
    End Sub

  5. #5
    L'avatar di @Alex
    @Alex non  in linea Moderatore Globale
    Quote Originariamente inviato da oilcrovara Visualizza il messaggio
    ciao..
    ho provato il tuo consiglio senza risultato!
    Si immagino, il codice che hai scritto sbagliato.

    Il Debug dovrebbe essere una delle prime cose da imparare, mentre invece si impara solo a fare Copy/Paste e basta...

    Prova cos:
    Private Sub calcolo()
    Dim i As Integer
    sum1 = 0
    For i = 20 To 42
    On Error Resume Next
    sum1 = sum1 + Controls("textbox" & i).Value
    Next i
    TextBox43.Value = Sum1
    End Sub
    
    Ora sperimenta cosa succede, verifica bene e cerca di comprendere il codice.
    Fatto questo modificalo per renderlo completo.

    Nel codice iniziale ci sono moltissimi errori, in particolare la dichiarazione delle variabili ed anche l'uso di parole riservate come "SUM"...!

    Fai attenzione.
    ℹ️ Leggi di pi su @Alex ...

  6. #6
    L'avatar di Elimar
    Elimar non  in linea Scribacchino
    Ciao Alex,
    come sempre sono stato battuto sul tempo e sulla competenza.
    ℹ️ Leggi di pi su Elimar ...

  7. #7
    L'avatar di @Alex
    @Alex non  in linea Moderatore Globale
    Quote Originariamente inviato da Elimar Visualizza il messaggio
    Ciao Alex,
    come sempre sono stato battuto sul tempo e sulla competenza.
    Solo perch avevo 5minuti liberi...
    ℹ️ Leggi di pi su @Alex ...

  8. #8
    oilcrovara non  in linea Scolaretto
    non riesco a farlo funzionare!!!!
    Private Sub calcolo()
    Dim i As Integer
    sum1 = 0
    For i = 20 To 42
    On Error Resume Next
    sum1 = sum1 + Controls("textbox" & i).Value
    Next i
    TextBox43.Value = Sum1
    End Sub

    il for i 20 to 42...cosas mi indica?

    dove inserisco la text 20 e la 42 per eseguire il calcolo?

  9. #9
    L'avatar di Elimar
    Elimar non  in linea Scribacchino
    Quote Originariamente inviato da oilcrovara Visualizza il messaggio
    il for i 20 to 42...cosa mi indica?
    E' un comando ciclico, vuol dire che per l valore di i che va da 20 a 42 gli farai fare ci che c' scrittto tra la riga For e la Riga Next, il comando Next incrementa i di 1 (volendo, utilizzando il comando STEP possibile incrementare un valore di + di uno oppure decrementarli mettendo un segno meno davanti al numero)

    Quote Originariamente inviato da oilcrovara Visualizza il messaggio
    dove inserisco la text 20 e la 42 per eseguire il calcolo?
    inserito in questa parte di codice:
    ("textbox" & i)
    
    dove i, come ti dicevo precedenza, prendera i valori da 20 a 42

    Usa il Debug per capire quello che avviene, aiuta.

    Se interverr nuovamente Alex, ti spiegher meglio quanto ti ho detto.
    ℹ️ Leggi di pi su Elimar ...

  10. #10
    oilcrovara non  in linea Scolaretto
    ti ringrazio per la tua gentilezza....
    a me non servono i valori che vanno da 20 a 42

    a me serve che nella textbox 43 mi esegua un semplice calcolo di matematica

    deve sommare la textbox20+textbox42

    nelle textbox sopraccitate viene fatto un calcolo di altre text e funziona molto bene...sempre grazie ai vostri insegnamenti....adesso una cosa semplice...mi sta facendo sudare!!!

    grazie ancora

+ Rispondi al messaggio
Pagina 1 di 2 12 ultimoultimo

Potrebbero interessarti anche ...

  1. Somma due textbox totale terza textbox
    Da freddy60 nel forum Visual Basic .Net
    Risposte: 2
    Ultimo Post: 20-06-2020, 16:21
  2. Somma fra textbox
    Da freddy60 nel forum Visual Basic .Net
    Risposte: 10
    Ultimo Post: 29-11-2019, 15:25
  3. Somma textbox con decimali
    Da freddy60 nel forum Visual Basic .Net
    Risposte: 11
    Ultimo Post: 20-11-2019, 10:31
  4. Info per somma textbox
    Da tolos nel forum Visual Basic .Net
    Risposte: 7
    Ultimo Post: 15-02-2014, 14:49
  5. Somma algebrica tra pi textbox
    Da fabiro77 nel forum Visual Basic 6
    Risposte: 17
    Ultimo Post: 08-06-2007, 09:43