View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Mark Driscol Mark Driscol is offline
external usenet poster
 
Posts: 18
Default UserForm Label & Format Problems

I'm trying to format some labels on a UserForm but am not getting results I
expect. The formats don't seem to act the same as if one were formatting a
cell in a worksheet. In fact, I had used these formats when formatting a
worksheet cell using a macro in a standard module and got the desired
results. Now that I am building a UserForm do to the same things, I get
different results. Any input into what I may be doing wrong would be
sincerely appreciated.


1. Me.ClosestLabel.Caption = "Closest: " & Format(MySum, "General")

will produce a label like "Closest: Ge43eral" if MySum, a declared Double
variable, has a value of 1843.78. If I try

Me.ClosestLabel.Caption = "Closest: " & Format(MySum, "0")

the label reads "Closest: 1843" for MySum with a value of 1843.78.


2. Me.IterationsLabel.Caption = "Iterations: " & Format(Counter,
"#,##0_);(#,##0);""-""_)")

produces labels like "Iterations: 145_)" for Counter, a declared Long
variable, being a positive number. This is different from how cells can be
formatted in that the "_)" is displayed instead of just leaving a space for
the right parenthesis.


3. Me.ElapsedTimeLabel.Caption = "Elapsed time: " & Format(Now -
StartTime, "[h]:mm:ss")

will show a value of ":12:02" after an elapsed time of two seconds.
StartTime is declared as a Double variable, and had previously been sent to
Now. I had expected it to show "0:00:02".


Mark