要看动态属性的例子,首先在Visual Basic中创建一个Windows应用程序。添加一个TextBox到默认窗体中;确认TextBox是被选中的,然后在属性窗口中定位Dynamic属性。
点镇首击Advanced标签旁边的省略号按钮,打开一个对话框,该对话框中列出了TextBox所有的属性隐卖,选择Text属性,键映射框将会被激活。键映射决定了键储存在配置文件中的值。点击确定关闭对话框。
哦,按添加顺序来说是可以的,但是是很不科学的,感觉太变态,包括你以后空间上有些改动空竖的话,就会有问题;建议的方法是戚亏陆使用控件数组来做;VB.NET不是没有了VB6的控件数组而是有了更好的支持;可以直接在选择项中找到TextboxArray控件,然后添加到工具栏中,再拖入到窗体中就可以了,或者
Dim txtBox As New List(Of TextBox)
Sub addcontrols()
For i = 0 To 10
Dim txt As New TextBox
txt.Name = "txt" &i
txtBox.Add(txt)
Next
End Sub
这样来建立控件数组;
如果不喜欢用控件数组的话,可以用最直高顷接的方法来
你在添加textbox控件的适合指定他们的name属性分别为txt0、txt1……、txt9
然后直接:
Sub changeText()
For i = 0 To 10
CType(GroupBox1.Controls("txt" &i), TextBox).Text = Ste(i)
Next
End Sub
这样也行的;
自己在窗体上加一个按钮,以下是详细源型代码(整个类)Public Class Form1
Private N As Integer '用来笑知记添加要加入textbox的个数
Private PL As Integer = 10 'textbox相对于窗体的Left
Private PT As Integer = 10 'textbox相对于窗体的Top
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Me.AutoScroll = True '窗体自动显示滚动条
N = 10 '初始化N为10
For i = 1 To N
Dim newtextbox As New TextBox
newtextbox.Left = PL
newtextbox.Top = PT
Me.Controls.Add(newtextbox)
PT += newtextbox.Height + 10 '各 newtextbox上下间隔10-------PL不变是碰裂消希望左对齐
Next
End Sub
End Class
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)