加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 大数据 > 正文

[VB.NET]vb.net中控件的问题

发布时间:2020-12-16 23:44:39 所属栏目:大数据 来源:网络整理
导读:vb.net中控件的问题 Private Const st As String = "text " Private oSt As TextBox Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button1.Click Dim i As Short For i = 0 To 1 oSt = CType(st i + 1,Te
vb.net中控件的问题 Private Const st As String = "text " Private oSt As TextBox Private Sub Button1_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles Button1.Click Dim i As Short For i = 0 To 1 oSt = CType(st & i + 1,TextBox) oSt.Text = "1 " Next End Sub 有没有办法实现这样的功能。请高手指教 __________________________________________________________________________ For Each ctrl As Control In Me.Controls If ctrl.GetType.Name = "TextBox " Then CType(ctrl,TextBox).Text = "Teee " End If Next __________________________________________________________________________ 我觉得最好是用控件数组来做: Public Class Form1 Private Sub Form1_Load(ByVal sender As Object,ByVal e As System.EventArgs) Handles Me.Load Dim oSt(80) As TextBox For i As Integer = 0 To 1 oSt(i) = New TextBox oSt(i).Text = "1 " oSt(i).Left = 12 + (oSt(i).Width + 6) * i oSt(i).Top = 12 Me.Controls.Add(oSt(i)) Next End Sub End Class __________________________________________________________________________ 楼上的说得对,用控件数组 __________________________________________________________________________ 哦,用textboxArray么,初始化的时候,固定位置么。用控件数组在form上画不上去。 __________________________________________________________________________

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读