vb.net窗口集合 vb数据集控件

vb.net如何查找打开的窗口

将NewForm设置为全局变量就可以了,如果新建窗口比较多,就设置为数组,例如:

创新互联公司服务项目包括章贡网站建设、章贡网站制作、章贡网页制作以及章贡网络营销策划等。多年来,我们专注于互联网行业,利用自身积累的技术优势、行业经验、深度合作伙伴关系等,向广大中小型企业、政府机构等提供互联网行业的解决方案,章贡网站推广取得了明显的社会效益与经济效益。目前,我们服务的客户以成都为中心已经辐射到章贡省份的部分城市,未来相信会继续扩大服务区域并继续获得客户的支持与信任!

Public Class Form1

Dim NewForm(10) As Form

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click

NewForm(0) = New Form

NewForm(0).Show()

End Sub

End Class

VB.net 界面所有控件的集合是什么?为什么Me.Controls只包含了最底层的Plane??

对于窗体中的容器控件,比如 GroupBox,Panel 等,它仅仅访问了这些控件本身,而不会去访问它们的子控件。为了实现你所要求的功能,需要将上述代码修改:

Public Sub IterateThroughControls(ByVal parent As Control)

For Each c As Control In parent.Controls

MessageBox.Show(c.ToString())

If c.HasChildern Then

'利用递归实现容器子控件的访问,重复循环遍历控件,调用自身函数

IterateThroughControls(c)

End If

Next

End Sub

调用方法:

IterateThroughControls(TabControl1) 'tabcontrol1为控件名,也可用groupbox1等

此外,判断遍历的控件是不是相应的文本控件,或者combobox控件,可用此代码判断

For Each t As Control In Me.Controls

If TypeOf t Is TextBox Then

MsgBox(t)

End If

Next

vb.net 怎样判断某个窗体是否打开

Dim F1 As New Datasystem.Form2 '实例化窗体

For Each na As Form In Application.OpenForms '打开窗体的集合

If na.ProductName = F1.ProductName AndAlso na.Name = F1.Name 0 Then '判断程序集的产品名称和窗体名称是否已存在打开的窗体中

If na.WindowState = FormWindowState.Minimized Then '判断窗体是否最小化

na.WindowState = FormWindowState.Normal '还原窗体

End If

na.Activate() '激活窗体

Return '返回

End If

Next

F1.Show() '如果没有打开的窗体中未找到,重新打开窗体


分享文章:vb.net窗口集合 vb数据集控件
分享链接:http://azwzsj.com/article/hiohcc.html