[vB.NET]为控件添加鼠标悬浮时的提示气泡

时间:2022-09-09 20:53:44

实例代码:

         Dim k As ToolTip

         k = New ToolTip()
k.AutoPopDelay = '显示出气泡后的延时时间(毫秒)
k.InitialDelay = '出现前的延时(毫秒)
k.ToolTipTitle = "提示" '提示信息标题
k.SetToolTip([控件名], "按D键删除选定项") '提示信息内容