How would i get it?
I am trying to to make it easier for my program users to edit the list items. I want it to work like this:
Private sub list1_dblclick()
text1.visible = true
text1.text = list1.list(list1.listindex)
'here is where i cannot figure out what to do(i know the below code wont work. i've tested it.)
text1.top = list1.listindex.top
how could i get it that every time the user double clicks on a list item, that a textbox apears there all they have to do is edit the text and press enter.
i mostly just need to get the "top" position of a selected list item.
Last edited by HanneSThEGreaT; July 7th, 2010 at 08:45 AM.
If it can show all 6 rows, it scrolls. Otherwise, it goes to the TOP
Private Sub Command1_Click()
Dim s%, x As Integer
s = List1.TopIndex
If s < List1.ListCount - 6 Then
List1.TopIndex = List1.TopIndex + 5
List1.TopIndex = 0
For x = 0 To List1.ListCount - 1
If List1.Selected(x) = True Then
List1.Selected(x) = False
Private Sub Form_Load()
For x = 0 To 15
List1.AddItem x + 1
OK, your comment about the Americans were really not necessary. This is a public forum, and one thing about public forums is that you have to behave yourself. Next time try to be more tactful before dishing someone's response. You won't like it if you were insulted like that.
I still think that trying to add a textbox onto the listbox ( although a nice idea ) is not really the correct way to go - it adds more overhead, more complications with the design, and is more error prone. It is just my opinion - so I may be wrong