Positioning controls at runtime

[bill1234]

Hi there, in my program im creating and positioning text box's and labels at runtime. The problem is, when i run the program on a different machine the positioning is different, even if the resolutions are the same.

Private Sub build_label(ByVal varString As String)
Dim intLbl As Integer

intLbl = Me.getNumLblCtrl + 1
Load lblDyn(intLbl)
With lblDyn(intLbl)
.Visible = True
.Top = lblDyn(intLbl - 1).Top + _
lblDyn(intLbl - 1).Height + 50
.Width = Len(varString) * 125
.Caption = varString
End With
Me.setNumLblCtrl = intLbl
End Sub

Ive gone so far as specifying a fixed width font for
lblDyn(0) and I still get the same results.
Thanks for your help!

 

[JohnYingling]

What Scalemode are you using on the Form? I use Twips.

http://www.VBCompare.com

Compare Code (Text)

http://www.VBSortGen.com

Generate Sort in VB or VBScript

 

[bill1234]

Im using the default - 1 twip.