Create a New Project in VB.Net. Drag a tool tip control from tool box and place on form. Now write code on form load event of the form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Me.ToolTip1.ShowAlways = True
Me.ToolTip1.ReshowDelay = 10
Me.ToolTip1.AutomaticDelay = 100
Button1.BackColor = Color.LightGray
Button2.BackColor = Color.LightGray
Button3.BackColor = Color.LightGray
Button4.BackColor = Color.LightGray
Button5.BackColor = Color.LightGray
Button6.BackColor = Color.LightGray
Button1.Text = "CLICK ME TO SET ME TOOL TIP TEXT"
Button2.Text = "CLICK ME TO SET ME TOOL TIP TEXT"
Button3.Text = "CLICK ME TO SET ME TOOL TIP TEXT"
Button4.Text = "CLICK ME TO SET ME TOOL TIP TEXT"
Button5.Text = "CLICK ME TO SET ME TOOL TIP TEXT"
Button6.Text = "CLICK ME TO SET ME TOOL TIP TEXT"
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ToolTip1.SetToolTip(Button1, "Button 1")
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
ToolTip1.SetToolTip(Button2, "Button 2")
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
ToolTip1.SetToolTip(Button3, "Button 4")
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
ToolTip1.SetToolTip(Button4, "Button 3")
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
ToolTip1.SetToolTip(Button6, "Button 5")
Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
ToolTip1.SetToolTip(Button5, "Button 6")
Posted on 1/10/2007 8:14:08 PM by K.A.G.S.
Posted on 1/21/2008 12:48:58 AM by Rajkamal
Posted on 2/22/2008 7:48:34 AM by Abbass Mustafa