扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
下划线消失估计跟你用的windows桌面主题有关，通常情况下不会的。或许你的是win7？
创新互联建站是一家专业从事成都网站设计、网站制作、外贸营销网站建设、网页设计的品牌网络公司。如今是成都地区具影响力的网站设计公司,作为专业的成都网站建设公司,创新互联建站依托强大的技术实力、以及多年的网站运营经验,为您提供专业的成都网站建设、营销型网站建设及网站设计开发服务！
“保存D”中的D跟快捷键是无关的，你在二级菜单中试试就知道了，你在菜单中设了字母后，你还可以另外设一个快捷键，两者根本就是不同的。说白了，一个菜单可以设两个快捷键（顶层菜单则只有一个），一个是Alt+字母，另一个就是自设的快捷键比如Ctrl+A，区别在于前者只能在菜单显示出来时使用，后者可以在菜单未显示出的时候使用。
可以用样式控制
this.style.textDecoration='underline'
显示下划线
this.style.textDecoration=''隐藏下划线
具体你用在哪就可以了
将Label1 改成相应的 label 控件名称。
'鼠标经过时，显示下划线
Private Sub Label1_MouseEnter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Label1.MouseEnter
Dim LabelFont As Font = New Font(Label1.Font.Name, Label1.Font.Size, FontStyle.Underline)
Label1.Font.Dispose()
Label1.Font = LabelFont
End Sub
'鼠标离开时，去除下划线
Private Sub Label1_MouseLeave(ByVal sender As Object, ByVal e As System.EventArgs) Handles Label1.MouseLeave
Dim LabelFont As Font = New Font(Label1.Font.Name, Label1.Font.Size, FontStyle.Regular)
Label1.Font.Dispose()
Label1.Font = LabelFont
End Sub
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网