OK had to change it about to this :- PUBLIC SUB CSales_Change() TotalSales.Value = 0 IF BarSales.Text <> NULL THEN TotalSales.Value = BarSales.Value / SDiv[CheckItem.Index + 1] IF OSSales.Text <> NULL THEN TotalSales.Value = TotalSales.Value + OSSales.Value IF OSMultiSales.Text <> NULL THEN TotalSales.Value = TotalSales.Value + OSMultiSales.Value END
-- View this message in context: http://www.nabble.com/Looking-for-a-little-help-with-an-app.-tp23480295p23504809.html Sent from the gambas-user mailing list archive at Nabble.com. ------------------------------------------------------------------------------ The NEW KODAK i700 Series Scanners deliver under ANY circumstances! Your production scanning environment may not be a perfect world - but thanks to Kodak, there's a perfect scanner to get the job done! With the NEW KODAK i700 Series Scanner you'll get full speed at 300 dpi even with all image processing features enabled. http://p.sf.net/sfu/kodak-com _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user