[VB6] Problema Operazioni

[danjwo]

Salve, premetto che conosco poco il VB6 ma sono costretto ad usarlo per esigente di hardware (Una scheda DAO i cui driver sono solo per quella versione).

Vi Spiego ho un Valore di Riferimento del tipo 0.00 (Z)
Ho un valore in lettura del tipo 0.00 (L)
Ho un valore salvato che sarà Z-L (MEM)

Ho un Valore Inferiore del tipo - 0.00 (MIN)
Ho un valore Superiore del Tipo + 0.00 (MAX)


Il primo ed il secondo sono posizionati in due label poichè sono solo in lettura

Gli altri due sono posizionati in due textbox in quanto è l'utente a deciderne il valore)

Ora ho due list: una con i pezzi Buoni ( che rientrano nel Range) una con i pezzi scarti (Al di fuori di quel range)

I Valori dovrebbero essere del tipo single (almeno la casa mi fornisce (Voltage as single))

Io ho provato a fare

IF mem > min and mem < MAX then
lstbuoni.additem(mem)
else 
lstscarti.additem(mem)

Solo che anche se il risultato rientra nel range me lo considera sempre scarto..

Grazie per l'aiuto

[oregon]

Intanto non includi gli estremi (ma questa puo' essere una scelta). Cioe', se mem = min oppure mem = max, sara' uno scarto.

Per il resto, il problema deve essere nei valori. Prova a scrivere

IF mem > min and mem < MAX then
   lstbuoni.additem(mem)
else 
   lstscarti.additem(mem)
   MsgBox min & " " & mem & " " & max
End If

e mostra il risultato della msgbox