Dim n As Integer = 0
For Each i In Text
i = New TextBox '实例化
Me.Controls.Add(i) '添加窗体
Dim Index As Integer = i.TabIndex '没index属性
Str(n) = Index
i.Text = Str(n) 'str数组值赋值给文本框
n ◆= 1
Next
VB中表格控件有很多,如MSFlexGrid,DataGrid,MSHFlexGrid等等
使用的多的是微软的FlexGrid控件.
如果你能确保你的label空间名称是以label开头,并且后面是数字的话,可以通过Sender.Name的方式来获取控件名称,再用Substring来截取后面的数字.
Private
Sub
Label1_MouseEnter(sender
As
Object,
e
EventArgs)
Handles
Label1.MouseEnter,
'sender.name就是用来获取当前触发事件的控件的名称
Dim
n
Integer
=
Call
Menter(n)
End
以上就是土嘎嘎小编为大家整理的vb.net数字控件相关主题介绍,如果您觉得小编更新的文章只要能对粉丝们有用,就是我们最大的鼓励和动力,不要忘记讲本站分享给您身边的朋友哦!!