Wildflower, you really should post this as "Visual" Basic in the future since there is such a thing as "Visio" also which is different.

Degrees F to degrees C:
Need one input box and an output:
(after initialization)
numFahrenheit = Val(Text1.text)
numCelsius = (numFahrenheit - 32)/1.8
Picture1.Print numCelsius
Ideal Age
numManAge = Val(Text1.text)
numWifeAge = numManAge / 2 + 7
Picture1.Print numWifeAge
Tips:
numSubTotal = Val(Text1.text)
numFifteenpercent = numSubTotal * 1.15
numTwentypercent = numSubTotal * 1.20
Picture1.Print "Subtotal plus 15% tip is: " + numFifteenpercent
Picture1.Print "Subtotal plus 20% tip is: " + numTwentypercent
(The code for printing is off the top of my head, so you should check your documentation for syntax, I think its close but been a while since I've done VB.)