vb.net设置子窗口 vb如何设计一个好看的窗口

vb.net设置mdi子窗口随父窗口的大小而变化

简单一点的方式是，在MDI主窗体内添加一个picturebox控件，然后在这个picturebox中添加一个image控件。

Picture1的属性：

1.Align=top

2.Appearance=flat

3.BordeStyle=None

4.TabStop=false

Image1的属性：

1.Stretch=true

在MDI窗体的resize事件中添加如下代码：

Private Sub MDIForm_Resize()

Me.Picture1.Height = Me.Height

End Sub

在Picture1控件的resize事件中添加如下代码：

Private Sub Picture1_Resize()

Me.Image1.Move 0, 0, Me.Picture1.Width, Me.Picture1.Height

End Sub

相关问答

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

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

子窗口.MdiParent = 主窗口

然后再Show就行vb.net设置子窗口了.

示例:

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

Q2: vb.net mdiform的父窗口调用子窗口的函数

既然子窗体都有同名函数，就应该对子窗体进行一层封装，子类实现不同方法

Public MustInherit Class AbstractChild

    Public MustOverride Sub Method1()

End Class

Public Class ChildClass1

    Inherits AbstractChild

    Public Overrides Sub Method1()

        MessageBox.Show("class1")

    End Sub

End Class

Public Class ChildClass2

    Inherits AbstractChild

    Public Overrides Sub Method1()

        MessageBox.Show("class2")

    End Sub

End Class

Public Class ChildClass3

    Inherits AbstractChild

    Public Overrides Sub Method1()

        MessageBox.Show("class3")

    End Sub

End Class

        Dim child1 As New ChildClass1()

        Dim child2 As New ChildClass2()

        Dim child3 As New ChildClass3()

        child1.Method1()

        child2.Method1()

        child3.Method1()

Q3: 如何给VB.NET窗体添加子窗体？

直接添加一个MID父窗体或在已有窗体vb.net设置子窗口的属性中找到IsMDIContainer属性vb.net设置子窗口，然后设置为Truevb.net设置子窗口，然后创建第二个窗体 vb.net设置子窗口，需要加载子窗体vb.net设置子窗口的时候：

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

Q4: vb.net 怎样正确建立父子窗体？（容器问题）

要确立父子窗体vb.net设置子窗口，那子窗体必须继承父窗体。实例化子窗体对象调用Show()方法。

希望采纳

Q5: 在VB.NET中如何设置子窗体在父窗体中显示的位置，用代码如何表示，我的下面设置怎么无效

form之间不存在父窗体子窗体的关系的

你可以使用panel 代码可以写：panel1.parent=form1 panel1.top=30

vb.net设置子窗口的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于vb如何设计一个好看的窗口、vb.net设置子窗口的信息别忘了在本站进行查找喔。