成都网站建设设计

将想法与焦点和您一起共享

vb.net子窗体内容 VB怎么主窗体链接子窗体

vb.net 怎样使子窗体显示在父窗体的工作区域中

这不就是MDI吗?把主窗口的IsMdiContainer属性设置为True,然后在加载子窗口的时候加上一句:

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

子窗口.MdiParent = 主窗口

然后再Show就行了.

示例:

Private Sub b1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles b1.Click

Dim frm As New Form2

frm.MdiParent = Me

frm.Show()

End Sub

vb.net mdi显示当前活动子窗体文本框的内容

简单的问题

Dim ActiveTextBox As TextBox = Me.ActiveMdiChild.Controls("TextBox1") '里面的字符串填控件的Name属性

MsgBox(ActiveTextBox.Text)

vb.net中子窗体的问题

加载内容本身与是否子窗体没有关系。

请你检查一下你加载的内容是不是存在。

下面代码,不管是否子窗体,都是正常的:

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

ComboBox1.Items.Add("123")

ComboBox1.Items.Add("223")

ComboBox1.SelectedIndex = 0

End Sub

你可以下载附件参考一下!

如何给VB.NET窗体添加子窗体?

直接添加一个MID父窗体或在已有窗体的属性中找到IsMDIContainer属性,然后设置为True,然后创建第二个窗体 ,需要加载子窗体的时候:

Dim NewMDIChild As New Form2

NewMDIChild.MdiParent = Me

NewMDIChild.Show()

Public Shared Sub CheckMDIChildForm(ByVal MDIForm As Windows.Forms.Form, ByVal MDIChildForm As Windows.Forms.Form, ByVal MDIChildFormName As String)

If MDIForm.MdiChildren.Length  1 Then

'如果没有任何一个MDI子窗体,则创该MDI子窗体的窗体实例

Dim MDIChildFrm As Windows.Forms.Form = MDIChildForm ' 定义MDI子窗体

MDIChildFrm.MdiParent = MDIForm '指定父窗体

MDIChildFrm.Show() '打开窗体

Exit Sub

Else

Dim x As Integer

Dim frmyn As Boolean

For x = 0 To (MDIForm.MdiChildren.Length) - 1

Dim tempChild As Windows.Forms.Form = CType(MDIForm.MdiChildren(x), Windows.Forms.Form)

If tempChild.Name = MDIChildFormName Then

'检测到有该MDI子窗体,设为激活 并退出循环

frmyn = True

tempChild.BringToFront()

Exit For

Else

frmyn = False

End If

Next

If Not frmyn Then

'在打开的窗体中没检测到则新建

Dim MDIChildFrm As Windows.Forms.Form = MDIChildForm ' 定义MDI子窗体

MDIChildFrm.MdiParent = MDIForm '指定父窗体

MDIChildFrm.Show() '打开窗体

End If

End If

End Sub

vb.net中如何把所有MDI子窗体的标题栏文字设置为 “子窗体i” (i 表示子窗体序号)?

增加一个模块

module mgrmdi

public mdifather as form=nothing

public mdison as integer=1

public sub OpenNewSon(byref SonForm as form)

___sonform.mdiparent=mdifather

___sonform.text=string.format("子窗体{0}",mdison.tostring)

___sonform.show

___mdison+=1

end module

在mdi父窗体启动时

sub form_load()

mdifather=me

end sub

加载子窗体使用

sub button1_click()

dim newform as new formson

OpenNewSon(newform)

end sub


网站名称:vb.net子窗体内容 VB怎么主窗体链接子窗体
文章链接:http://chengdu.cdxwcx.cn/article/dodioeo.html