bluedragon99
asked on
MSFLEX text justify problem vb6
How would I center justify this line this doesn't seem to work: Alerter.AlertGrid.Centerce nter
Alerter.AlertGrid.AddItem "Source IP" & vbTab & FirstField & vbTab & SecondField & vbTab & ThirdField & vbTab & FourthField & vbTab & FifthField & vbTab & SixthField & vbTab & SeventhField & vbTab & EighthField, 1
Alerter.AlertGrid.AddItem "Source IP" & vbTab & FirstField & vbTab & SecondField & vbTab & ThirdField & vbTab & FourthField & vbTab & FifthField & vbTab & SixthField & vbTab & SeventhField & vbTab & EighthField, 1
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
This does work but time execution is very critical on this app is there a way to do it without a loop? tell it to justify everything that way then populate tables?
ASKER
Yup this is def a problem, I need this to run due to my grid being 2000 lines I can't populate the grid then reformat it it adds to much time even with redraw off. Help!
ASKER
can you tell it to be centered before population
ASKER
nevermind got it with this:
.ColAlignment(i - 1) = flexAlignCenterCenter
.ColAlignment(i - 2) = flexAlignCenterCenter
.ColAlignment(i) = flexAlignCenterCenter
.ColAlignment(i + 1) = flexAlignCenterCenter
.ColAlignment(i + 2) = flexAlignCenterCenter
.ColAlignment(i + 3) = flexAlignCenterCenter
.ColAlignment(i + 4) = flexAlignCenterCenter
.ColAlignment(i + 5) = flexAlignCenterCenter
.ColAlignment(i + 6) = flexAlignCenterCenter
.ColAlignment(i + 7) = flexAlignCenterCenter
.AddItem FirstField & vbTab & SecondField & vbTab & ThirdField & vbTab & FourthField & vbTab & FifthField & vbTab & SixthField & vbTab & SeventhField & vbTab & EighthField, 1
.ColAlignment(i - 1) = flexAlignCenterCenter
.ColAlignment(i - 2) = flexAlignCenterCenter
.ColAlignment(i) = flexAlignCenterCenter
.ColAlignment(i + 1) = flexAlignCenterCenter
.ColAlignment(i + 2) = flexAlignCenterCenter
.ColAlignment(i + 3) = flexAlignCenterCenter
.ColAlignment(i + 4) = flexAlignCenterCenter
.ColAlignment(i + 5) = flexAlignCenterCenter
.ColAlignment(i + 6) = flexAlignCenterCenter
.ColAlignment(i + 7) = flexAlignCenterCenter
.AddItem FirstField & vbTab & SecondField & vbTab & ThirdField & vbTab & FourthField & vbTab & FifthField & vbTab & SixthField & vbTab & SeventhField & vbTab & EighthField, 1
ASKER