[VB6] Errore di Overflow

[Artemio]

perchè se inserisco queste stringhe:

lblFine.Top = 6615 + (360 * N)
picAreaLavoro.Height = lblFine.Top + 1485

mi da questo errore?

Errore di run-time '6':

Overflow

ma mi da errore errore solo se la variabile N è maggiore di 72... cmq in seguito l'altezza di picAreaLavoro viene usata per fare i seguenti calcoli:

    HScroll.Max = Abs(picAreaLavoro.Width - Me.ScaleWidth)
    VScroll.Max = Abs(picAreaLavoro.Height - Me.ScaleHeight)

come posso risolvere il problema?

[Meldon]

In che linea viene generato l'errore esattamente?

[Artemio]

lblFine.Top = 6615 + (360 * N)

questa... ma solo nel caso in cui N sia maggiore di 72

[MdE2005]

Ciao..questo tipo di errore è correlato al tipo di dati usati; per esempio se dichiari come BYTE una variabile, e le dai come valore numerico 256 dà errore di overflow: questo perchè l'intervsllo dei dati byte deve essere compreso trs 0 e 255.
Quindi cambia il tipo di dichiarazione della variabilre, metti ad esempio "dim nomevariabile as Currency"..

Ok..?

ciao

[Artemio]

ho scoperto il problema... siccome uso queste operazioni

lblFine.Top = 6615 + (360 * N)
picAreaLavoro.Height = lblFine.Top + 1485

per calcolare il valore Max delle scroll bar, nal caso in cui il risultato sia maggiore di 32767 mi da errore xke il valore massimo che una scroll bar puo avere su max è di 32767... sai x caso cosa posso fare per risolvere?

[MdE2005]

Ciao..o crei un controllo tipo scroll autonomamente (e allora inserisci il valore massimo che vuoi) oppure cerca di dividere i valori in modo che il totale sia 32767..
Cmq prova a fare una ricerca nel forum, mi sembra che sia un argomento già trattato in passato..

ciao