vb如何设置父窗体与子窗体——MDI窗体_vb 双层mdi_夏诗曼CharmaineXia的博客-程序员秘密

目前我理解的父窗体与子窗体的关系是：父窗体包含子窗体。
在这里插入图片描述
想要达到这样的效果，首先要新建一个父窗体（MDI窗体）。
MDI窗体上又不允许放置PictureBox以外的控件，但是Picture上面就能放置控件，所有只要先在窗体上铺上一张图片，在把控件放置在图片上就可以。
运行时会发现提示“只允许存在一个MDI窗体”，这种错误我翻阅了前辈的博客，发现是sub Main里的一句代码导致的。

Sub Main()
    Dim flogin As New frmlogin
    flogin.Show vbModal          'flogin显示模式窗口'
    
    If Not flogin.ok Then
        End
    End If
    flogin.Hide
    '将下面这两句屏蔽即可，然后再添加一句MDIFrmmain.Show'   
    Set fmain = New MDIFrmmain
    fmain.Show                  '显示主窗体'
End Sub

运行程序后又会发现子窗体都隐藏在了图片下面，此时可以用API函数来解决这个问题：

第一步：

外接程序——外接程序管理器

第二步：

找到API函数，选择“在启动中加载”与“加载/卸载”

第三步：

选中系统的模块Module1——外接程序——API浏览器——加载文本文件——WIN32API.TXT——打开

第四步：

搜索SetParent——添加——插入

第五步：

可以看到Module1中出现了这句代码：Public Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long

这句代码要放在模块里

第六步：

此时在MDI窗体里在对应的子窗体中写如下代码：运行一下，就会惊喜的发现成功了！

Private Sub Return_card_Click()
    SetParent frmReturn_card.hwnd, MDIFrmmain.hwnd
    frmReturn_card.Show
End Sub

'或者'

Private Sub Check_balance_Click()
    Call SetParent(frmCheck_balance.hwnd, MDIFrmmain.hwnd)
    frmCheck_balance.Show
End Sub

本文链接：https://blog.csdn.net/CharmaineXia/article/details/106491431

原作者删帖不实内容删帖广告或垃圾文章投诉

智能推荐

js 将二维数组打印成table | json数据格式化_js二维数组格式化_tsuyokuninaru的博客-程序员秘密

将二维数组打印成table//根据键名配置表头显示arr={'id':'id', 'name':'姓名', 'phone':'手机号'};var obj = '#lend_area';$(obj).append('&lt;table class="moretable"&gt;&lt;thead&gt;&lt;/thead&gt;&lt;tbody&gt;&lt;/tb...

捷联惯导速度更新_划桨效应补偿算法推导（双子样）_清风微升至的博客-程序员秘密

最近在看savage的《strapdown analytics》发现其中划桨效应补偿的双子样算法和秦永元《惯性导航》中的思路不同，可以利用前一个采用周期的数据，看起来挺方便的，就把其中推导过程整理了一下。主要是证明了《strapdown analytics》P7-49中的7.2.2.2.2-11但符号还是基本利用的《惯性导航》。...

Matplotlib通过subplot()函数创建单个子图_KJ.JK的博客-程序员秘密

        很多时候，我们希望在同一个画布上绘制多个图形，而不是在多个画布中绘制多个图形。Figure对象允许划分多个绘图区域，每个绘图区域都是一个Axes对象，它拥有属于自己的坐标系统，被称为子图。要想在画布上创建一个子图，可以通过subplot()函数实现。subplot()函数的语法格式如下：   subplot(nrows，ncols，index，**kwargs)上述的部分参数含义

处理CFormView类 -- 保护类型的构造函数和Create函数(讨厌的东西!!!)_pudongdong的博客-程序员秘密

我们创建一个对话框资源后，然后创建一个类（假设为CMyClass）来管理它。如果这个类（CMyClass）是从CFormView派生出来的，并且要在其他类中使用CMyClass的对象，则应如下处理。因为CFormView的构造函数和析构函数都是保护类型的，所以在其他类中是无法访问的，因此无法直接在其他类中声明CMyClass的对象。那么要使用CMyClass，该如何做呢？有两种方法：

如何从抖音引流至微信小程序？-程序员秘密

如何快速实现在抖音中，通过点击就能跳转到自己的微信小程序中。

tar /gz/bz/gz2/bz2...压缩与解压缩_chicaohun7473的博客-程序员秘密

For example: gunzip2 *.tar.gz2,解出一个*.tar文件，然后tar -vxf *.tar即可 .rar格式解压：[＊＊＊＊＊＊＊]$ rar a FileName.rar 压缩：[＊＊＊＊＊＊＊]$ rar e FileNam...