trovare l'errore

[dan1988]

ciao, uso visual basic 6 per la prima volta e non riesco ad uscire da uno stupidissimo programmino da 4 semplicissime righe!
chi mi sa trovare l'errore e risolverlo?

Private Sub cmdcalcola_Click()

Dim prezzo As Integer
Dim quantita As Integer
Dim totale As String * 10

prezzo = Val(txtprezzo.Text)
quantita = Val(txtquantita.Text)
totale = Val(txttotale.Text)

totale = prezzo * quantita

End Sub

grazie
daniele

[oregon]

Beh ... di quale errore stai parlando?

P.S. Dai un'occhiata al regolamento di questo forum ...

[dan1988]

sorry, quale punto del regolamento ho infranto?

l'errore del codice consiste nel non avere nessun risultato nella txtbox totale

[Giulio C.]

Ciao.

Io prima calcolerei il totale e poi lo mostrei sulla textbox da te dedicata. Leggendo il tuo codice così come lo posti, la variabile "totale" assume prima il valore della casella di testo (a quel punto vuota) e dopo viene calcolata dalla moltiplicazione, ma il risultato non viene mostrato...

In soldoni:

1) totale = prezzo * quantita
2) txttotale.text = totale


Fammi sapere.

[oregon]

Originariamente inviato da dan1988
sorry, quale punto del regolamento ho infranto?

Beh ... dagli un'occhiata ... Regolamento

l'errore del codice consiste nel non avere nessun risultato nella txtbox totale

Tecnicamente non e' un errore ... non scrivi mai nella textbox del totale ... quindi ...

Private Sub cmdcalcola_Click()
  Dim prezzo As Double
  Dim quantita As Long

  prezzo = Val(txtprezzo.Text)
  quantita = Val(txtquantita.Text)
  
  txttotale.Text = CStr(prezzo * quantita)
End Sub

[alka]

Originariamente inviato da dan1988
sorry, quale punto del regolamento ho infranto?

Se lo leggi, lo troverai alquanto evidente.

Ma volendo riassumere... il linguaggio anche nel titolo, assieme alla versione, e soprattutto una descrizione significativa.

Passo e chiudo.