On Fri, 27 Jul 2012, rocko wrote:
> On Fri, 2012-07-27 at 19:25 +0200, Tobias Boege wrote:
> > On Fri, 27 Jul 2012, rocko wrote:
> > > Using '.value instead of .text gives an error:
> > > "Unknown symbol "value" in class TextBox"
> > > 
> > > On Fri, 2012-07-27 at 02:05 +0200, LeszekK wrote:
> > > > 'Do not use textboxes for mathematical calculations
> > > > 
> > > > Dim prmAmnt As Integer
> > > > Dim totAmnt As Integer
> > > > Dim perAmnt As Single
> > > > 
> > > > prmAmnt = prmBox.value 'valuebox! not textbox
> > > > totAmnt = totBox.value 'valuebox! not textbox
> > > > perAmnt = Round((prmAmnt / totAmnt * 100), 2)
> > > > ValueBox1.Value = perAmnt & "%"
> > > > 
> > > > I not tested the code but it should work.
> > > > 
> > 
> > First, I herewith want to join the folks who urge to not top-post.
> > 
> > If you have a deeper look at the error message above, you'll notice that 
> > you still use TextBox
> > instead of ValueBox, right?
> > 
> > Regards,
> > Tobi
> 
> Ah yes the 'ol top vs bottom post --oh well
> Yes I figured that out and replaced my textBoxes with valueBoxes
> but still can't get it to work 
> 
> 

:)
OK, so to sum up, two things were wrong with your very first code:
a) Used TextBox without conversion -> use ValueBox instead
b) To round to decimals, the second argument to Round() must be negative
   -> use -2

This gives:

Dim prmAmnt As Integer
Dim totAmnt As Integer
Dim perAmnt As Single

prmAmnt = prmBox.Value
totAmnt = totBox.Value
perAmnt = Round(prmAmnt / totAmnt * 100, -2)

Print perAmnt

This code works for me (but without the ValueBox input stuff, I used
prmAmnt = 2 and totAmnt = 3 hard-coded instead)

If this does not work, please say what makes you feel that it didn't work.

Regards,
Tobi

------------------------------------------------------------------------------
Live Security Virtual Conference
Exclusive live event will cover all the ways today's security and 
threat landscape has changed and how IT managers can respond. Discussions 
will include endpoint security, mobile security and the latest in malware 
threats. http://www.accelacomm.com/jaw/sfrnl04242012/114/50122263/
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user

Reply via email to