VB.NET 怎么获取控件后面的数字
我刚刚学VBNET2012,下面是我要表达的意思,该怎么用VBNET语句来表示呢,或者有没有其他的方法来达到我想要的效果呢PrivateSubLabel1_MouseEn...
我刚刚学VBNET2012,下面是我要表达的意思,该怎么用VBNET语句来表示呢,或者有没有其他的方法来达到我想要的效果呢
Private Sub Label1_MouseEnter(sender As Object, e As EventArgs) Handles Label1.MouseEnter
Dim n As Integer
'将Label的序号(就是后面的1,2这样的数字赋值给n)
Call Menter(n)
End Sub
Private Sub Label2_MouseEnter(sender As Object, e As EventArgs) Handles Label2.MouseEnter
Dim n As Integer
'将Label的序号(就是后面的1,2这样的数字赋值给n)
Call Menter(n)
End Sub
Private Sub Menter(n)
'Label(n)的背景色修改为白色,字体修改为粗体
End Sub 展开
Private Sub Label1_MouseEnter(sender As Object, e As EventArgs) Handles Label1.MouseEnter
Dim n As Integer
'将Label的序号(就是后面的1,2这样的数字赋值给n)
Call Menter(n)
End Sub
Private Sub Label2_MouseEnter(sender As Object, e As EventArgs) Handles Label2.MouseEnter
Dim n As Integer
'将Label的序号(就是后面的1,2这样的数字赋值给n)
Call Menter(n)
End Sub
Private Sub Menter(n)
'Label(n)的背景色修改为白色,字体修改为粗体
End Sub 展开
3个回答
展开全部
如果你能确保你的label空间名称是以label开头,并且后面是数字的话,可以通过Sender.Name的方式来获取控件名称,再用Substring来截取后面的数字。
Private Sub Label1_MouseEnter(sender As Object, e As EventArgs) Handles Label1.MouseEnter, Label2.MouseEnter
'sender.name就是用来获取当前触发事件的控件的名称
Dim n As Integer
n = Int(sender.name.ToString.Substring(5))
Call Menter(n)
End Sub
Private Sub Label1_MouseEnter(sender As Object, e As EventArgs) Handles Label1.MouseEnter, Label2.MouseEnter
'sender.name就是用来获取当前触发事件的控件的名称
Dim n As Integer
n = Int(sender.name.ToString.Substring(5))
Call Menter(n)
End Sub
2014-05-18
展开全部
高端
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2014-05-18
展开全部
。value? 没用过vb
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询