Download DSAPI.dll first. and referenced in the project.
This feature is included in the DSAPI1.0.1.1 and later version number, dll please find in my resources.
Private Sub button1_click (sender as Object, e as EventArgs) Handles Button1.Click Dim F as New DSAPI. DS hint Bubble (Me) with F . Background color = color.red . Maximum bubble width = + . Icon = bitmap.fromfile ("g:\ icon _icon\png\png-0047.png") . Text color = Color.darkblue . Display direction = DSAPI. DS hints for bubbles. direction. Font = New font ("Microsoft Jas Black") . Font sharpness = Drawing.Text.TextRenderingHint.AntiAliasGridFit . Text = " DS Hint Bubble & vbCrLf & Bubble pop-up does not preempt the original focus " End with AddHandler F. Bubbles are clicked, AddressOf mevent F. Show Bubbles ( Button1.pointtoscreen (new point (0, 0) + new Point (0, Button1.height))) End Sub Public Sub mevent (ID as Integer) MsgBox ("The Bubble with ID" & ID & "was clicked") End Sub
Note: The user request, their own active disappearance function has been provided, when the set ' self-active Vanishing time ' for non-zero, bubbles will be in the designated time after their own initiative disappears.
DSAPI Multifunction Component Programming application-DS hint bubbles