Solved

Help with displaing field definition when placing cursor on a row of a listbox using VB.NET

Posted on 2016-09-24
7
29 Views
Last Modified: 2016-09-25
Hi,

When I place the cursor on a row of my listbox I need to display the defnition of the field, for example If I place my cursor on a row containing TV, would like too see a tooltip with the word television.

Thanks,

Victor
0
Comment
Question by:vcharles
  • 4
  • 3
7 Comments
 
LVL 62

Expert Comment

by:Fernando Soto
ID: 41814195
Hi Victor;

So where are you getting the "definition" to display in the tooltip?
0
 

Author Comment

by:vcharles
ID: 41814202
Hi Fernando,

I would like the hardcode the definition.

Thanks,

Victor
0
 
LVL 62

Accepted Solution

by:
Fernando Soto earned 500 total points
ID: 41814239
Hi Victor;

Something like the following should work.
Public Class Form1

    Dim ttc1 As New ToolTip()

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        '' Items to be added to the ListBox
        Dim items As New List(Of MyListBoxItem)() From {New MyListBoxItem With {.Item = "NSN", .ToolTipValue = "NSN Value Here"},
            New MyListBoxItem With {.Item = "NSC", .ToolTipValue = "NSC Value Here"},
            New MyListBoxItem With {.Item = "FIF", .ToolTipValue = "FIF Value Here"}
        }

        ListBox1.DataSource = items
        ListBox1.DisplayMember = "Item"
        ListBox1.ValueMember = "ToolTipValue"

    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ttc1.SetToolTip(ListBox1, "Select an Item to see Description")
        ttc1.ShowAlways = True
    End Sub

    Private Sub ListBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ListBox1.SelectedIndexChanged
        ttc1.SetToolTip(ListBox1, ListBox1.SelectedValue.ToString)
    End Sub

End Class

Public Class MyListBoxItem
    Public Property Item As String
    Public Property ToolTipValue As String

    Public Overrides Function ToString() As String
        Return Item
    End Function
End Class

Open in new window

0
DevOps Toolchain Recommendations

Read this Gartner Research Note and discover how your IT organization can automate and optimize DevOps processes using a toolchain architecture.

 

Author Comment

by:vcharles
ID: 41814256
Hi Fernando,

Thanks for the code. How do you modify it to work when I place the mouse on the row? not select the row.

Thanks,

Victor
0
 
LVL 62

Expert Comment

by:Fernando Soto
ID: 41814270
You can't because the ToolTip control is attached to a control and not to a collection.
0
 

Author Comment

by:vcharles
ID: 41814286
Ok. Thanks.
0
 
LVL 62

Expert Comment

by:Fernando Soto
ID: 41814621
Not a problem Victor, glad to help.
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

It’s quite interesting for me as I worked with Excel using vb.net for some time. Here are some topics which I know want to share with others whom this might help. First of all if you are working with Excel then you need to Download the Following …
The ECB site provides FX rates for major currencies since its inception in 1999 in the form of an XML feed. The files have the following format (reducted for brevity) (CODE) There are three files available HERE (http://www.ecb.europa.eu/stats/exch…
This Micro Tutorial demonstrates using Microsoft Excel pivot tables, how to reverse engineer competitors' marketing strategies through backlinks.
Edureka is one of the fastest growing and most effective online learning sites.  We are here to help you succeed.

911 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

16 Experts available now in Live!

Get 1:1 Help Now