Login | Register   
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: VB7
Expertise: beginner
Dec 8, 2003

Convert from grains to grams, and vice versa

' Convert from grains to grams, and vice versa

Function GrainsToGrams(ByVal grains As Double) As Double
    Return grains * 0.0648
End Function

Function GramsToGrains(ByVal grams As Double) As Double
    Return grams / 0.0648
End Function
Marco Bellinaso
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap