I have tried for next loops & while loops chr(65) to chr(122), but can not come up with a workable way to enter the alphabet as a list. I end up with all kinds of different errors & I'm just to tired to continue.
Any ideas without doing a: combo1.additem "A" combo1.additem "B", etc. ?????
David Wier http://www.*-*-*.com/ ~dwier
Fri, 19 Nov 1999 03:00:00 GMT
Graham Danie #2 / 4
Adding the alphabet in a list box or combo list
Try:
Dim I as Integer For I = 65 to 122 Combo1.AddItem Chr$(I) Next I
Quote:
> I have tried for next loops & while loops chr(65) to chr(122), but can not > come up with a workable way to enter the alphabet as a list. I end up with > all kinds of different errors & I'm just to tired to continue.
> Any ideas without doing a: > combo1.additem "A" > combo1.additem "B", etc. > ?????
> David Wier > http://www.flash.net/~dwier
Sat, 20 Nov 1999 03:00:00 GMT
Mary O'Brie #3 / 4
Adding the alphabet in a list box or combo list
Hi David, Tried the following and it seemed to work Private Sub Form_Load() Dim X For X = 65 To 90 Combo1.AddItem Chr(X) Next X Combo1.ListIndex = 0 End Sub HTH
Quote:
> I have tried for next loops & while loops chr(65) to chr(122), but can not > come up with a workable way to enter the alphabet as a list. I end up with > all kinds of different errors & I'm just to tired to continue.
> Any ideas without doing a: > combo1.additem "A" > combo1.additem "B", etc. > ?????
> David Wier > http://www.flash.net/~dwier
Sun, 21 Nov 1999 03:00:00 GMT
Dave Lindquis #4 / 4
Adding the alphabet in a list box or combo list
Quote:
>I have tried for next loops & while loops chr(65) to chr(122), but can not >come up with a workable way to enter the alphabet as a list. I end up with >all kinds of different errors & I'm just to tired to continue.
For i = Asc("A") To Asc("Z") Combo1.AddItem Chr$(i) Next i
Adding the alphabet in a list box or combo list