I'm trying to use the example in Setting Tab Stops in a ListBox and the results are hosed.
I am running VB5.0 SP3 at home. Should I be able to use the above example?
I am rewriting the old DOS Basic doorprize drawing program for our PC Users Group. In the form that displays the "lucky numbers", I am adding the names & numbers to a list box. To make it easier to read (there are a lot of senior citizens in the club), I want to format the text.
The following code is my routine that loads the ListBox. I must point out that, as the membership file was loaded, the lengths of the longest first & last names were saved. The lengths are used to determine the tab stops.
The results look like the following. The group is small, so I have included the entire output in the hopes that some pattern may be seen. The first & last names have been replaced for privacy. Note: I have also provided a rule above the output as an aid for anyone looking at this.Code:Private Sub Form_Load() ' Load the list box Dim lTabs(2) As Long ' set my size Me.Height = 6600 Me.Width = 10155 lstReviewV.Clear lTabs(0) = 0 lTabs(1) = giFNLen + 2 ' giFNLen was set to 7 lTabs(2) = lTabs(1) + giLNLen + 2 ' giLNLen was set to 9 DoTabs lstReviewV, lTabs ' set the tabs For cntl = 1 To giRecCount ' load the listbox lstReviewV.AddItem gsFName(cntl) & vbTab & _ gsLName(cntl) & vbTab & _ "has lucky #" & Format(giNumber(cntl, 2), "000") Next cntl End Sub
Code:1234567890123456789012345678901234567890 FFFFFF LLLLLLLL has lucky #021 FFFFFF LLLL has lucky #015 FFFFFF LLLLLL has lucky #020 FFFFF LLLLLLL has lucky #008 FFFF LLLLLLL has lucky #018 FFFFF LLLLLLL has lucky #014 FFF LLLLLL has lucky #035 FFFFFF LLLLLLL has lucky #028 FFFF LLLLLLL has lucky #019 FFFFF LLLLLLL has lucky #034 FFFF LLLLLLL has lucky #031 FFFFF LLLLLLLLL has lucky #027 FFFFF LLLLLLLLL has lucky #038 FFFF LLLLLLLL has lucky #002 FFFFFF LLLLLLL has lucky #036 FFFFFF LLLLLLL has lucky #024 FFFFFF LLLLLLL has lucky #037 FFFF LLLLLL has lucky #023 FFF LLLLLL has lucky #029 FFFFFFF LLLLL has lucky #013 FFFFF LLLLLL has lucky #006 FFFFF LLLLLL has lucky #041 FFF LLLLLL has lucky #042 FFFF LLLLLL has lucky #032 FFFFF LLLLLLL has lucky #040 FFFFF LLLLLLL has lucky #012 FFFFFF LLLLLL has lucky #026 FFFF LLLLL has lucky #016 FFFFF LLLLLL has lucky #033 FFFFF LLLLLL has lucky #025 FFF LLLLLL has lucky #030 FFFF LLLLLLLLL has lucky #004 FFF LLLLL has lucky #022 FFFFF LLLLL has lucky #001 FFFFFF LLLLLL has lucky #010 FFFF LLLLL has lucky #005 FFFF LLLLLLL has lucky #011 FFFF LLLLLLLL has lucky #007 FFFFF LLLLL has lucky #039 FFF LLLLL has lucky #017 FFFFFF LLLLLL has lucky #009 FFFF LLLLLL has lucky #003




Reply With Quote