Thread Rating:
  • 1 Vote(s) - 5 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Curious if I am thinking about this right.
#11
Two!
Code: (Select All)
Input "Enter a Number to convert , (comma) 1 to convert to mm from inches or ,(comma) any other for inches "; num, op%
Print _IIf(op% = 1, num * 25.4, num / 25.4) ' 25.4 mm per inch

This takes advantage of being able to assign multiple input values to variables.

"I'm lazy. I like to program in a manner that supports me being as lazy as possible. Big Grin"

I am that way with typing, unfortunately NOT with Editing! Big Grin

Yeah 2 liner to show both conversions good too! Saves on variables +1
b = b + ...
Reply
#12
(2 hours ago)bplus Wrote: Two!
Code: (Select All)
Input "Enter a Number to convert , (comma) 1 to convert to mm from inches or ,(comma) any other for inches "; num, op%
Print _IIf(op% = 1, num * 25.4, num / 25.4) ' 25.4 mm per inch

This takes advantage of being able to assign multiple input values to variables.

You're going in the wrong direction here.  The usage is getting more obtuse and harder to decipher; not easier.  Keep it simple and easy to understand and use.  Lines of code don't matter for squat if you can't use the end product easily. Wink
Reply
#13
Yeah better!
Code: (Select All)
Input "Enter a Number to convert inches to mm and vice versa"; num
Print num * 25.4; "mm", num / 25.4; "inches"

Why choose get 'em BOTH! Be generous Big Grin
b = b + ...
Reply
#14
(2 hours ago)bplus Wrote: Yeah better!
Code: (Select All)
Input "Enter a Number to convert inches to mm and vice versa"; num
Print num * 25.4; "mm", num / 25.4; "inches"

That's basically what I did on the other page, except I used to PRINT USING to make certain that I didn't end up with some crazy scientific notation values for my numbers.  1 mm = 6.12345678981264827556tF+3 or such.  LOL!   Wink
Reply
#15
Is two lines small enough? No?
Code: (Select All)
Print Val(_InputBox$("Convert number from inches to mm.", "Enter a number")) * 25.4
b = b + ...
Reply
#16
(1 hour ago)bplus Wrote: Is two lines small enough? No?
Code: (Select All)
Print Val(_InputBox$("Convert number from inches to mm.", "Enter a number")) * 25.4

Half the number of lines, with less than half the functionality.  You're moving in the wrong direction again here.

What is with the obsession to try and produce the fewest possible number of lines of code for a program?   Whatever happened to readability and functionality?  Particularly when offering demos for a new user?
Reply
#17
Here -- one line, 29 characters:

Code: (Select All)
Input n:?n*25.4"mm"n/25.4"in"
Reply




Users browsing this thread: 3 Guest(s)