vb.net控件遍历 c# 遍历控件

用vb.net如何 编程遍历页面上所有TextBox控件并给它赋值为string.Empty?

For Each ctl As Control In Me.Controls If TryCast(ctl, TextBox) Nothing Then Dim txt As TextBox = TryCast(ctl, TextBox) txt.Text = "" End If

创新互联专注于企业成都全网营销推广、网站重做改版、库伦网站定制设计、自适应品牌网站建设、H5场景定制商城系统网站开发、集团公司官网建设、成都外贸网站制作、高端网站制作、响应式网页设计等建站业务,价格优惠性价比高,为库伦等各大城市提供网站开发制作服务。

vb.net怎么遍历所有控件,使Click都执行相同的过程

c# 用程序转的,也不知道对不对。你看看有没有帮助 ,这是遍历所有控件,还有一个办法就是重载form的消息处理函数应该也是可以的。

STAThread _

Public Shared Sub Main(args As String())

Dim button = New Button()

button.Text = "我是按钮"

button.Dock = DockStyle.Fill

Dim form = New Form()

form.Controls.Add(button)

CapturehMouseClickEvent(form)

form.ShowDialog()

End Sub

Private Shared Sub CapturehMouseClickEvent(control As Control)

AddHandler control.Click, AddressOf ControlOnClick

For Each subControl As Control In control.Controls

CapturehMouseClickEvent(subControl)

Next

End Sub

Private Shared Sub ControlOnClick(sender As Object, eventArgs As EventArgs)

Debug.WriteLine("控制被单击")

End Sub

关于遍历VB.net窗体里面控件的问题

可以的,需要判断控件类型并做一下类型转换。

For Each c As Control In Me.Controls

If TypeOf(c) Is TextBox Then

Dim t As TextBox = CType(c ,TextBox)

'调用t的方法即可

End If

Next

vb.net panel里的控件如何遍历

Public Sub ReSetText(Control ctrl)        

Dim ct As Control

For Each ct In ctrl.Controls

Try

For Each ct2 As Control In ct.Controls

ReSetText(ct2)

Next

Catch

End Try

If (TypeOf ct Is TextBox) Then

ct.Text = ""

ElseIf (TypeOf ct Is ComboBox) Then

Dim cb As System.Windows.Forms.ComboBox = DirectCast(ct, System.Windows.Forms.ComboBox)

cb.SelectedIndex = -1

End If

Next

End Sub

因为textbox在窗体里的panel里,你只遍历窗体的控件是不够的。

vb.net中如何遍历程序窗体中的控件?并读写控件的数据。

Public Sub GetAllControls(ByVal InContainer As Control, ByRef RecieveList As ListBox)

For i As Integer = 0 To InContainer.Controls.Count - 1

If InContainer.Controls.Item(i).Text  "" Then

GetList.Items.Add(InContainer.Controls.Item(i).Text  vbCrLf)

End If

If InContainer.Controls.Item(i).Controls.Count  0 Then

GetAllControls(InContainer.Controls.Item(i), GetList)

End If

Next

End Sub

这段代码可行,但不能遍历菜单和工具栏,要按需要修改


文章名称:vb.net控件遍历 c# 遍历控件
文章分享:http://bzwzjz.com/article/dochgco.html

其他资讯

Copyright © 2007-2020 广东宝晨空调科技有限公司 All Rights Reserved 粤ICP备2022107769号
友情链接: 手机网站制作 营销网站建设 高端网站建设 四川成都网站建设 网站建设方案 泸州网站建设 成都网站设计公司 成都营销网站建设 移动手机网站制作 网站设计制作 成都网站制作 成都企业网站建设 成都网站建设 成都网站建设公司 阿坝网站设计 重庆企业网站建设 营销型网站建设 高端品牌网站建设 网站制作 高端定制网站设计 自适应网站建设 成都网站设计