扫二维码与项目经理沟通
我们在微信上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小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网