How Can We Know The Index Of An Item Data Value In A DropDownList Combo In VB6
I would like to receive help on the following described issue.
In my form I have a dropdown list combobox, which is populated with 'additem' and 'Itemdata' methods. during program execution, I know only a particular value stored in the itemdata. I dont know index and listed values.
I want to get the index corresponding to the Itemdata Value. How can i get that?
Thanking everybody,
sreeraj
View Complete Forum Thread with Replies
See Related Forum Messages: Follow the Links Below to View Complete Thread
Click Item In Listview Then Show That Item In Combo As Index = 0
Hi guys,
I have a listview (lvwUserPunchedOut) that is populated with records in a database (persons first name in one column and last name in the second column), what I am looking to do is if I select a persons name by clicking on it in the listview on frmMain, and then bring up frmSearchCriteria, i would like to show that selected name in the combobox as default (cboEmployee.ListIndex = 0) on frmSearchCriteria (the combobox is sorted = True and is also populated with first name and last name of the person)
How would this be done? Hope I make sense. Thanks in advance.
Cannot Get Index Of Item In Combo
i have added each printer on the system to a combo box:
for each prn in printers
cboPrinter.additem prn.devicename
next
then set the first item to be systems default printer:
cboPrinter.Text = Printer.DeviceName
When i click a button to get the index of the item in the dropdown box:
For i = 0 To cboPrinter.ListCount - 1
MsgBox cboPrinter.List(i) & cboPrinter.ListIndex
Next
it says the listindex for each item is -1. Shouldn't it be 1 to how many printers there are in the list ie:
printer 1 = index 1
printer 2 = index 2
etc?
Or is that method of setting the default printer wrong and interfering?
thanks for your time.
Getting Item Data Index With Listbox Value
I'm trying to get the itemdata int value from a listbox using the listbox text value. For example:
populate the listbox using a query:
rst = select id, value from table
While (Not (rs.EOF))
lstbox.AddItem rst!value
lstbox.ItemData(lstbox.ListCount - 1) = rst![id]
rstSiteID.MoveNext
Wend
So what i want to do is get the "id" value from a selected
"value" in a listbox.
Any help would be appreciated.
Combo Data Select With Id Index
Hello...
I'm trying to do something like this:
I have few comboboxes with text boxes next to them.
Combo's are filled from Access database trough Ado
and they have autocomplete function.
I would like to insert Id in textbox and in the combo
would show data with that Id.
Any idea...?
Combo Box - Item Data
Problem, i have just started coding in V.B and i am setting up a username and password entry, the username box is a combo which i would like to link to an external database created in access. I have not a clue of how to code it to look to the database for the info
Second problem, how do i code so the enter button checks the entries with the database??
Any help would be great...
Cheers
Combo Box Item Data
i have a combo box which i have filled in it with a few items, for example
Do While Not rst.EOF
cmbSupp.AddItem rst("SupplierName")
cmbSupp.ItemData(cmbSupp.NewIndex) = rst("SupplierId")
rst.MoveNext
Loop
in some cases i have the text which should be shown in combo box ,suppose Show_SUpplierName, i want this supplier Name and its Id be active in combox box, for text i did so:
cmbSupp.Text = rstTmp("SupplierName")
but what should i do active the supplier Id in Itemdata of Combo box?
thanks
Combo Box Item Data
Hi,
I've just started trying to learn a few things in visual basic but one thing that i cannot figure out how to do is to read the itemdata from a combobox that is relative to the name selected in the combo box. I inserted 10 items into the combo boxes list, then i inserted 10 pieces of data into its itemdata and now i cannot figure out how to use these datas together. I want it so that when i click on a name in the combo box it outputs the corresponding itemdata to a text box but i cannot figure out how to do it. All i get is the first item data value. Any post or help would be great. Thanks alot.
Tim Conway
Combo Box / Item Data Problems
Hi Guys,
I am populating a Combo Box from a database, and then I want to fill in some textboxes depends on the name the user clicks on in the combo box.
If there is a better way to do this or a TUT please tell me.
Right now I am populating the combo box like this:
With MyRecSet
Do Until .EOF
Combo1.AddItem MyRecSet("name")
Combo1.ItemData(Combo1.NewIndex) = MyRecSet("clientID")
.MoveNext
Loop
End With
This populates the combo box, but when it is clicked on, it just returns the values of the very last entry.it also thinks the ItemData(combo1.NewIndex) value is either 1 or 12 .... which ... well there are only 6 entries in the database.
Here is my code for the fill in:
Private Sub Combo1_Click()
With MyRecSet
.MoveFirst
Do Until .EOF
If Combo1.ItemData(Combo1.NewIndex) <> MyRecSet("clientID) Then
.MoveNext
Else
txtbox.Text = MyRecSet("name")
Exit Do
End If
LOOP
End With
End Sub
Where am I messing this up?
Data Combo Box Keeps On Selecting 1st Item When Compiled
im having problem with the data combo box, it keeps on selecting the first item even if i try to select another, it works fine on design time but after i compiled the program it goes nuts...
i placed this code to refresh the list values everytime i click it, maybe this is causing it
Code:
' remember the last selected text
tmp = mydatacombo.text
with adodc1
.refresh
end with
' reselect the last selected text
mydatacobo.text = tmp
anyone, i cant seem to find the problem, its hard to debug when its actually happening on runtime (compiled)
Updating Fields Upon Selecting An Item In A Data Combo Box
I am currently working on a sports equipment shop system project. I have 3 tables in my MS Access DB:
1. Customers
2. Items
3. Sales
The Customers table hold details of customers, such as Name and Address.
In the Sales form, I have some fields from the Items and the Customers table. I currently have a combo box for the CustomerID and text boxes such as Name and Address. What I want to do is to update the information in the fields Name and Address automatically when the user selects a customerID from the Combo Box. I don't know what function to use, either Click or Change. And also what is the real code to use for the fields to change. I am currently using the following:
Code:
Private sub cboID_Change()
txtName.Refresh
txtAddress.Refresh
End Sub
Get The Item Index
I have a UserControl that uses two classes the individual class and a collection class, how I can implement into the Individual class to get te Index number into the collection class ???
like ListItem and ListItems
Example:
Dim LstItem as ListItem
Set LstItem = ListView1.ListItems(1)
'I want this
Msgbox LstItem.Index
'This prints 1
Thanks !!
Tab Index To Get To Next Item
I have set up the tabindex on my form to go to the correct place when the tab button is pressed. I need it to select the text in the text box when the tab button is pressed. Right now it goes to the begining of the text box but does not select the information in the text box. Any ideas would be appreciated.
Recieving Item By Index
hi,
with this piece of code im trying to receive a certain record by stating the ID in the table.
i have a variable which stores the ID, intStaffID. but im not sure where to place it in the following code.
this is on the click event of an mshflexgrid. it stored the ID, then i want it to select the staff record with that ID...
Code:
If Not IsNull(myRecSet.Fields("shiftstartMon").Value) Then 'Validation for null value
strGetMonStart = myRecSet.Fields.Item("ShiftStartMon").Value 'Get data from field
txtShiftStartMon.Text = strGetMonStart 'Insert data to textbox
Else
txtShiftStartMon.Text = "No Shift" 'Insert "No Shift" If value = Null
End If
thanks,
sam
Index Of Selected Item
Anybody out there know a quick way for me to find out the index of a selected item within a listview?
I know I could loop through it easy enough to find the index but is there another way of doing it?
Api To Get The Index Of An Item In A ComboBox
Hi,
Is there any APi that give us the index of comboBox item? For instance, I would say the item as a tring and then the APi would tell me is index in the combo?
PS: I need this to get the index of a itemdata.
Thank you
Sergio Oliveira
How To Get The Item Index In Wmp.dll Control
hi, please if somebody can tell me how can i get the item index of a media item in a playlist in this control (wmpsdk 10 or 9)
i want to know the item index of the current media playing (maybe the same media is twice or more in a playlist in diferent position (index), so i can use isidentical)
thank you
Please Help - Error 457 - Index Already Associated With This Item.
Simple form used to input 2 strings (key & value), to be stored in Dictionary (dictLocations)which is instantiated in Module1. Works fine until user clicks yes in message box, then get Error 457 (duplicate key)???
Thanks for anyone's help!
private Sub cmdOK_Click()
Dim key as string, val as string
dictLocations.Add tbLocNo, tbLocDesc
If MsgBox("Add Another Location?", vbYesNo) = vbYes then
me.Hide
tbLocNo = ""
tbLocDesc = ""
me.Show
else
me.Hide
End If
Unload.me
End Sub
Getting The Index Of A Collection Item.
Is it possible to get the Index of a collection item if you know the key it was added under?
example:
dim Mycol as new collection
Mycol.Add "keyboard","bob"
Mycol.Add "monitor","peter"
Mycol.Add "desk","joe"
I want to know that "monitor" is the second item in the list by using the key "peter" can this be done?
Jean-Guy
Making The First Combo Box Item Always The Selected Item
Hi.
I have a combo box with a Dropdown list Style and which is invoked several times in different parts of my form. How can I make the first item in this combo box the selected item or the default item everytime I select it? Currently, what's happening is that the last item that I selected becomes the selected item the next time the combo box is invoked. Thanks for any suggestions in advance!
>> How To Determinate The Index Of An Item In Array
Hi! I have 2 arrays called "id()" and "name()" and when I assign a string value to the name array, I assign also an id.
so... i want to get the index by specifing the item in the "name" array like this:
1st item= "a" index = 0
2nd item = "b" index = 1
and if i want a function that determinate the index of an item by specifing the text in this case
thanks
simons
Remove Item Index Number 1
Hello, I am making a list of people that connect to the chat room of there IP in a list called listPeople. But i want to remove the ip when they disconnect. I know the code is something like this, but can you help me get it right?
listPeople.removeitem(UserIP, [1])
UserIP being a String of thier remoteIP
and
1 being the index
also will the same code work with listpeople.additem?
Thanks in advance/.
Using The Index Number Of An Item In An Array
Another easy one (sorry!) :-)
I am trying to use the number of the items in my array so that, say:
If ArrayOne (Item number is 1 or 2 of array) Then
Do this
If ArrayOne (Item number is 3 or 4 of array) Then
Do this
Etc...
Is it possible?
Thanks for reading, Chloe x
Retrive Index Of Item In Listview?
How the hell do i retrive the index of an Item in a listview control?!
Sometimes I just hate this cnotrol...its too complicated...
Anyone?
Calling An Item By Its Index In A Type
Let's say I have a Type like this:
VB Code:
Public Type userinfo()Name As StringPassword As StringEnd Type
Now, if I want to access the item "Name", I need to say
VB Code:
Dim i As userinfoMsgbox i.Name
Can't I access an item by its position or index like this:
VB Code:
Dim i As userinfoMsgbox i.Index(0)'The above code is not right but it gives you the idea.
?
Index Of Selected List Item
I have a combo box, style 1, where users can enter items into the list by typing it then hitting enter. I want the user to be able to select one of the list items already entered and be able to delete it by pressing the delete key.
How can I delete the selected record?
Selecting An Item From A DataCombo Using The Index ID
Good morning all. I have a DataCombo control (not to be confused with ComboBox) which is populated with data. I am wondering how I can display the Description (ListField) text by referencing the Index ID (BoundColumn) i.e.
I have three entries in the DataCombo
0. Red
1. Green
2. Blue
I want to reference which is to be shown by the number, but I want the string to be displayed.
How I Could Get The Index Adding An Item To A List?
The solution could be this :
List1.AddItem ("" , Index)
but, it does not work!!!
First i have a compiler error (expected = )...
Num = List1.AddItem ("" , Index) Solves the problem, but if index is diferent than 0 this doesnot work.
I want to create a dinamic list of errors and capture his identification.
How i could do this?
Setting Listview Item To An Index Number
Ive been using the following to set the selected item in my listview:
VB Code:
MatchFiles.SelectedItem = MatchFiles.ListItems(OldName)
which sets the current item equal to that contained in 'OldName'.
Is there a command similar to set the selected item to an index number? So i could set row 7 to selected? Thanks
Finding The Index Of A Control Array Item
Hey im really new with VB,
I have a control array in my project and i need to find out which element in the array the user clicked on.
Just to clarify, say theres 5 elements in the array
option(1), option(2), option(3), option(4), option (5)
when the user clicks on any of these i need to assign the number in the index, (1,2,3,4 or 5) to a variable. Thanks a lot!
List Box Q, Remove An Item, By Value Not Index? *solved*
Is there an easy method to remove an item from a list box, if there is more then say, one item in the list for a particular Value etc?
Say i have a list:
Wayne
Joe
Fred
Bob
Fred
And my server sends the message to the client "Remove Fred", (I have this bit working ),
How can i remove both "Fred"'s without knowing their ListIndex's?
Tnx
Get Handle On File Via Numeric (item) Index
Hi there,
First time poster...
I'm using VBA in Office 2003 Excel and am trying to get a handle on a file via a numeric index. Basically i have a folder containing some 527 files and need to loop thru them all and process them.
so I am trying to do something like this but it's not working - anyone know what i'm doing wrong?
Set fs = CreateObject("Scripting.FileSystemObject")
Set f4 = fs.getfolder(Path_str).files.Item(1) <== fails
I have previously tried a for...each loop without success - the loop exits unexpectedly after processing the 132nd item. Have attempted processing the item in question using a smaller set of data (ie when the folder only contained 5 items, the item in question was in the middle of the 5 files) and the macro was able to process and continue to the next item successfully. So believe that it's not related to the content of the file itself.
Is there some kind of limit to the number of items a variable can hold in VBA? When I step thru the code, the loop dies as soon as I try to step thru the "Next f3" statement.
Here's my code, if anyone can spot what might be causing the issue then please let me know:
Dim fs, f, f1, f2, f3, fc, fd, fe As Object
[...snip...]
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.getfolder(QARunEnvPath_str)
Set fc = f.subfolders
[...snip...]
'
' Get a handle on Business Function subfolders and start loop
'
For Each f1 In fc
'
' Create a copy of the Test Data Folder using the DIR suffix string
'
NewFldr_str = f1.Path & cDIR_SUFFIX
fs.Copyfolder f1.Path, NewFldr_str
'
' Get handle on files within new folder, then start looping thru those
'
Set f4 = fs.getfolder(NewFldr_str)
Set fe = f4.Files
For Each f3 In fe
[Do stuff....]
Next f3 ' Next File
Thanks in advance
Selecting An Item In Treeview Control, Without Knowing Its Index.
How would you accomplish this?
I have a treeview control and a listview control.. I render files and folders from the harddrive, the problem is when I put the folders/subfolders in the listview control, and the user doubleclicks on it, I want the treeview control to automaticly select the folder/subfolder.
The best would be if you could set the selecteditem of the treeview control to a certain key value, instead of the index value.
A way to accomplish what I want would be to use a FOR-loop:
For i = 1 to treeview.nodes.count
if treeview.nodes.item(i).key = sKey then
set treeview.selecteditem = treeview.nodes.items(i)
next i
but wouldn´t this be very slow when there are maybee 5000 items in the treeview control?
Any suggestions?
Thanks.
Problem Transfering Listview Item To Textbox With Index
Hi all i got a listbox called listbox2 and it has some url on it. I want to transfer listbox item to a textbox once i click on listbox item .But when i try the follwoing with a textbox that it index property set to 0 i get error :
VB Code:
compile error: Invalid use of property
code:
VB Code:
Private Sub Command1_Click() txtURL2 = List2.Text ' put the value of listbox to textbox txturl End Sub
I tried the same method with textbox that its index property is empty and it worked fine but it does not work with textbox that its index property set to 0. I be happy if some one help me here.Thanks
String Index/listbox Item Search [fixed]
hey...
I have a listbox with some items in it, where i have added (O) infront on some items.... what i want is, to remove (O) again from the item, i tryed coping it into a string, but then i forgot how i check the first 3 letters of the string...
can someone help plz ?
Take care and have fun
Garn
Index Of Newly Added Item In Sorted Listview
I need to find the index number of the item last added to a listview.
I can use listcount, except if the user clicks on the column header
and sorts the list, then the next item added could be listed in the
middle of the items already in the list. So .ListCount would not work
in that situation. So if I have a listview with items #1,#2,#3, and
I add an item which is placed in between #1 and #2, how can I find out it's spot in the list????
Any ideas or direction would be very helpful.
Get DragDrop Items.Index Or Item(Name) On ListView With Scrollbar?
Hiya's folks
Here's my bug
Code:
Private Sub lstView1_OLEDragDrop(Data As MSComctlLib.DataObject, Effect As Long, _
Button As Integer, Shift As Integer, X As Single, Y As Single)
myIndexItem = lstView1.ListItems.Item(Int(Y / 17) + 1)
End Sub
I'm using this statement to get the item name, but when the V-scrollbar is scrolled down...
I can't get the good item since I'm using the Y parameter
Any idea how to get the index of the first item displayed in listview when
the scrollbar is scrolled?
Or is there a way to get the "visual" name of the item I drag on?
Thx!!
Right Click To Return Index And Select ListBox Item.
How can I make a right mouse click return the ListIndex and select a ListBox item?
Below code doesn't won't return the ListIndex.
Code:If Button = vbRightButton Then
MsgBox "Item Index " & List1(Index).ListIndex & " " & "List Index " & Index
End If
Thanks!
ddutke
How To Set Index For The Combo Box?
I have combo box. I would like to know, how I can set index for the combo box?
Code:
Private Sub ResetListBox1() 'populate record only for point feature
Combo1.Clear
Dim Layer As Object
Dim i As Integer ' plot
i = 0
For Each Layer In Map1.Layers
If Layer.LayerType = 0 Then
If Layer.shapeType = moShapeTypePoint Then ' populate untuk point sahaja
Combo1.AddItem Layer.Name, i
i = i + 1
End If
End If
Next Layer
If i > 0 Then Combo1.ListIndex = 0
End Sub
Combo Box Index
i am using the following proceedure to fill a combo box on my form.
Public Sub FillCombo(objComboBox As ComboBox, strSQL As String, strFieldToShow As String, Optional strFieldForItemData As String)
Dim rs As New ADODB.Recordset 'Load the data
Set rs = GetRecordset(strSQL)
With objComboBox 'Fill the combo box
.Clear
If strFieldForItemData = "" Then
Do While Not rs.EOF '(without ItemData)
.AddItem rs.Fields(strFieldToShow).Value
rs.MoveNext
Loop
Else
Do While Not rs.EOF '(with ItemData)
.AddItem rs.Fields(strFieldToShow).Value
.ItemData(.NewIndex) = rs.Fields(strFieldForItemData).Value
rs.MoveNext
Loop
End If
End With
rs.Close 'Tidy up
Set rs = Nothing
End Sub
I call it like this
Call FillCombo(cboCountry, "Select CountryID , Country from T_Country", "Country", "countryID")
the table I am calling has 4 entrys per country
county1d, countryname
1 england
2 ireland
3 scotland
4 wales
I would expect the countryId to be the same as the index in the subform, but for some reason the indexing is starting at 0, can anyone help
|
TRACKER
