"CajunCoiler (http://www.cajuncoiler.tk)"
<po**********@totallyspamless.cox.net> wrote in message
news:OMVpb.2867$In3.2539@lakeread01...
They seem to work ok for me... pray tell, what have you
found that is askew?
"Adrian Parker" <no@addy.com> wrote in message
news:Lb*****************@news20.bellglobal.com... Does Microsoft have a Bug Reporting form or method, so that the generaly
public can report specific bug?
I seem to have found a problem with the Caption property of Visual Basic
6.0's Labels.
Add a textbox named Text1 (Multiline property set to True). Add a label
named lblOutput3. Set the font of both to Courier New.
Now use the code below. Notice that the alignment in the textbox is right
aligned, as is proper, but in the label every line after the first has a
single space improperly padded to the right of the string. That or it's
only printed to a string which is only 6 characters wide, which is still
wrong at any rate.
Dim intQuantity As Long
Dim curTicketPrice As Currency
Dim curFee As Currency
Dim curSubtotal As Currency
intQuantity = 24
curTicketPrice = 22.34
curFee = 2.567
curSubtotal = curTicketPrice + curFee
lblOutput3.Caption = Format(intQuantity, "@@@@@@@") & vbCrLf _
& Format(Format(curTicketPrice, "fixed"), "@@@@@@@") & vbCrLf _
& Format(Format(curFee, "fixed"), "@@@@@@@") & vbCrLf _
& Format(Format(curSubtotal, "fixed"), "@@@@@@@") & vbCrLf & vbCrLf
Text1.Text = lblOutput3.Caption
Debug.Print lblOutput3.Caption
Adrian