Printable View
I'm using a combo box (Microsoft Forms 2.0 Object Library) that has the property of being able to Match Entry by the First Letter. This combo object doesn't support the property of .ItemData or .NewIndex.
Using this combo box I want to save the index to the selected item. Can anyone help me?
Thank-u,
Donna
Are you doing this in VB6 or VBA?
Just store the index in a public variable of the form on the change event
Code:Public MyIndex as Long
Private Sub MyCombo_Change()
MyIndex = MyCombo.ListIndex
End Sub
Basically you can add a class where you have each item and its index and if you whish, also some other data too.Quote:
Originally Posted by bushmobile
But isn't Forms2 basically for VBA ? As I remember, when used in VB in compiled programs in a programs setup, I got troubles to distribute the code to other machines.
It's part of Office, so you can't distribute it. Use the VB6 control instead.
I'm using VB6 and I want to store the index for each item in the list. For other combo boxes I use:
With frmNice
While Not rs.EOF
.cboStatus.AddItem rs!Description
.cboStatus.ItemData(.cboStatus.NewIndex) = rs!Key
rs.MoveNext
Wend
End With
I added this code instead, but am having trouble extracting the index to the selected item.
iindex = 0
With frmNice
While Not rs.EOF
.cboStatus.AddItem rs!Description
.cboStatus.List(iindex,1) = rs!Key
iindex = iindex + 1
rs.MoveNext
Wend
End With
I tend to make things harder than they really are! thanx again.
There is no array. You have to use the ItemData(x) field.
Code:For x = 0 To 5
List1.AddItem Chr$(34) & x & Chr$(34)
List1.ItemData(x) = 0
Next x
The combo box from Forms 2.0 Object Library, does not support that property.
Why don't you use the Windows Combo instead? Otherwise, create an array for the key. Use the same index as the combobox.
I often load fields into array fieldnames, so I don't have to get them from the db more than once.
I'm again coming back to the point you cannot distribute a VB6 program which uses form2 controls. I kne that the hanling of the forms2 combo is near to an autocomplete combobox, but it has other problems as you see. Or do you need the program only for your own usage ? Or would you distribute it only together with the office package. In this case you would need to tell people to first install office and then installing your program. But I'm not sure if in new office versions there are still form2 controls.Quote:
Originally Posted by donna_H
It will NOT install on other machines, and the program will only run if the identical version of Word is running. It is ILLEGAL to distribute some controls that other apps use. Use the VB6 controls for free!
While you can't distribute Forms 2.0, it doesn't require Office, and it doesn't mean your distributed app can't use it.Quote:
Originally Posted by dglienna
But, I'd agree, a Forms 2.0 combo box is not the way to go. The standard VB combo box should work, even if you need something in the back end to help out with your goal, like an array (as dglienna suggested).Quote:
Originally Posted by ChaosTheEternal
Even if redistribution isn't an issue, you shouldn't use the Forms 2.0 object library - it's unstable in the VB6 environment with a tendency for "out of memory" errors - MS advise against its use.
Exactly whats my experience.Quote:
Originally Posted by bushmobile
If you dont have hundrtets of items to load into your combo but you need an autocomplete Combobox you can try to use the ActiveX Combo control which is designed in the thread
http://www.codeguru.com/forum/showpo...&postcount=123
Lesson 14 is the last version of the combo. If you want to look how to design such a Userdefined control, you can follow up the whole thread. :wave:
You will learn to create your own classes and collections so it would be easy for you to administrate very complex data if you need to do so.
Jonny Poet
Been there, done that already also. Too much grief. Heed our advice!
Here is another nice and quick sample: ComboBox Autocomplete.