How to figure the decimal point

[johnkoh]

Good morning,

How to find the decimal and get the number before and after decimal point?
Example - I input the number as " 12.6 " then get the before decimal "12" and after decimal "6" and save it as variable value.

[Peter.Greulich]

Re: How to figure the decimal point

int(12.6) = 12
12.6 - int(12.6) = 0.6

[Stan Mathews]

Re: How to figure the decimal point

Or if you are entering character values as your sample indicates....

value = " 12.6 "
? word(value,1,".")
= " 12"
? word(value,2,".")
= "6 "

[johnkoh]

Re: How to figure the decimal point

Thank you

[johnkoh]

Re: How to figure the decimal point

Tom and Stan

The basic concept is fine However how to hold the integral number as "10" not "1"?

dim vImperial as n
vImperial = 5.10

vBefore = int(vImperial)
vAfter = vImperial-vBefore
vC
vMetric = vBefore+vConvert

?vAfter
= 0.1 [COLOR="Red"](Wrong. It should be as 10)[/COLOR]

?vc [COLOR="Red"](Wrong. It should be as 0.833)[/COLOR]

?vmetric
= 5.008 [COLOR="Red"](Wrong. It should be as 5.833)[/COLOR]

or How to convert the Imperial number(progressing by 12th) to computer or calculator (progressing by 10th) number?

[Ed Barley]

Re: How to figure the decimal point

John,

What type of Imperial measurements are you trying to convert to and from? Mass, volume, volume-dry, distance, etc. ?

AS:

http://www.france-property-and-infor...rial-units.htm

Ed

[johnkoh]

Re: How to figure the decimal point

Ed,

I need a Imperial Calculator, not conversion.

Imperial Sample: 5 feet 10inch x 5 feet 10 inch = 34.023 Area

In Typical Calculator: 5.10 * 5.10 = 26.01 area

I have to change the 10 inch into 10th number in order to use the typical calculator
a) 10 * 0.083333 = 0.833
b) 5.833 x 5.833 =34.023

[Stan Mathews]

Re: How to figure the decimal point

Wrong answer, I was confused by your example.

[Ed Barley]

Re: How to figure the decimal point

John,

Look at this.

http://joshmadison.com/software/convert-for-windows/

Edit: Should have woke up before posting, but this is a conversion program for download.

I use mostly metric at work everyday. What mostly are you doing? Cubes, SqArea, Mass, ??

Ed

[johnkoh]

Re: How to figure the decimal point

Ed and Stan

Thank you for your information but my problem is not the conversion table issue. My problem is changing imperial number to computing number.

The Computer and most calculator is increased the number by "every 10th" but the imperial number is increase by every 12th.

Now, I'd like to calculate 5 feet 10 inch times 5 feet 10 inch. Using the Inch calculator, I have to enter as 5 feet(button on the calculator) 10 * 5 feet 10 = 34.02778

If I use the typical calculator and get the right number,
Step a - covert the Inch to 10th number, 10 * (1/12) = 0.8333 or 10/12(*inch)
Step b - Enter as 5.8333 * 5.8333 then result is 34.0256.

Here, I just found my it. Now I can apply it into my xDialog.

dim vImp as c 
vImp = "5'10"
vBef = val(word(vimp,1,"'"))
vaft = val(word(vImp,2,"'"))/12
vMetric = round(vbef+vaft,4)

dim vHts as c 
vHts = "5'10"
vBefHts = val(word(vHts,1,"'"))
vaftHts = val(word(vHts,2,"'"))/12
vMetHts = round(vbefHts+vaftHts,4)

'Final
vResult = Round(vMetric * vMetHts,2)
?vresult
= 34.03

[Stan Mathews]

Re: How to figure the decimal point

Yes, but that's a different set of parameters than you first posted. Then it was

dim vImperial as n
vImperial = 5.10
........

Much simpler issue when you use

dim vImp as c 
vImp = "5'10"

[G Gabriel]

Re: How to figure the decimal point

the imperial number is increase by every 12th.

??!!
I thought Imperial is in increments of 1/16.

At any rate, you probably need this function:
INCHESTOCM()
Or you could make your own.

[Mike Wilson]

Re: How to figure the decimal point

Right, based on the first post, it would be:

dim v1 as C="5.10"
dim v2 as C="5.10"
vn1=val(word(v1,1,"."))+(val(word(v1,2,"."))/12)
vn2=val(word(v2,1,"."))+(val(word(v2,2,"."))/12)

? round(vn1*vn2,2)
= 34.03

Gabe,
As you are aware, The 12th is 12 inches in a foot

[johnkoh]

Re: How to figure the decimal point

Mike,

Thank you and greater style.

[G Gabriel]

Re: How to figure the decimal point

Gabe,
As you are aware, The 12th is 12 inches in a foot

Yeh.. I was thinking increments per inch. If you want, you could translate the whole thing to centimeter as in:

dim vimperial as c="5'10"
?inchestocm(val(word(vimperial,1,"'"))*12+val(word(vimperial,2,"'")))
= 177.8

Mike.. I am not sure about your math?