首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > VB Dotnet >

vb.net中控件的有关问题

2012-02-21 
vb.net中控件的问题PrivateConststAsStringtext PrivateoStAsTextBoxPrivateSubButton1_Click(ByValsen

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

热点排行