实例代码:
1 Dim k As ToolTip 2 3 k = New ToolTip() 4 k.AutoPopDelay = 3000 '显示出气泡后的延时时间(毫秒) 5 k.InitialDelay = 50 '出现前的延时(毫秒) 6 k.ToolTipTitle = "提示" '提示信息标题 7 k.SetToolTip([控件名], "按D键删除选定项") '提示信息内容
Powered by: 博客园 Copyright © 2024 天下一家·MJ Powered by .NET 9.0 on Kubernetes