VB6中怎么将一个已经用load函数创建好的控件移动至另一个控件内？

2019-03-03 08:06:08 367 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

VB.NET 控制滑鼠的移动 Imports System.Collections.Generic Imports System.Drawing Imports System.Runtime.InteropServices '模拟控件鼠标，网络上VB.NET的源码太少，希望有人能用上。'窗体上任意拉出两个标签控件，一个按钮控件 '测试环境 winXP + .NET 2008 '其它环境未测试过 Public 阅读详情

一个已经用load函数创建好的控件移动至另一个控件内？大神求教

...全文

VB6 MsFlexGrid控件实现单元格直接编辑的TextBox覆盖方案在桌面应用开发中，数据表格是展示和编辑结构化信息的核心组件。其原理是通过网格控件将数据以行列形式可视化，用户可直接操作单元格进行数据录入与修改，这极大提升了数据管理效率。从技术价值看，原生控件往往功能有限，开发者需通过控件组合与事件处理来扩展功能，实现更优的用户体验。在VB6等经典开发环境中，MsFlexGrid控件广泛用于数据展示，但缺乏内置编辑功能。通过将TextBox控件动态覆盖在目标单元格上，并同步其位置、内容与焦点事件，即可实现流畅的原地编辑效果。这种方案不仅解决了MsFlexGrid无法直接编辑阅读详情

Xfan0202

控件 1,453 成员 41,351 内容

+ 关注 + 加入社区

切换为时间正序

vansoft 2019-06-12

打赏
举报

Set .Container = Picture2 设置控件的所属对象。

milaoshu1020 2019-03-05

打赏
举报

引用 5 楼 qq_43023041 的回复:

[quote=引用 1 楼 caozhy的回复:]setparent api函数

请问这个api怎么用呀？[/quote]

SetParent Function

--------------------------------------------------------------------------------

The SetParent function changes the parent window of the specified child window.

Syntax

HWND SetParent(
HWND hWndChild,
HWND hWndNewParent
);
Parameters

hWndChild
[in] Handle to the child window.
hWndNewParent
[in] Handle to the new parent window. If this parameter is NULL, the desktop window becomes the new parent window. Windows 2000/XP: If this parameter is HWND_MESSAGE, the child window becomes a message-only window.
Return Value

If the function succeeds, the return value is a handle to the previous parent window.

If the function fails, the return value is NULL. To get extended error information, call GetLastError.

Remarks

An application can use the SetParent function to set the parent window of a pop-up, overlapped, or child window. The new parent window and the child window must belong to the same application.

If the window identified by the hWndChild parameter is visible, the system performs the appropriate redrawing and repainting.

For compatibility reasons, SetParent does not modify the WS_CHILD or WS_POPUP window styles of the window whose parent is being changed. Therefore, if hWndNewParent is NULL, you should also clear the WS_CHILD bit and set the WS_POPUP style after calling SetParent. Conversely, if hWndNewParent is not NULL and the window was previously a child of the desktop, you should clear the WS_POPUP style and set the WS_CHILD style before calling SetParent.

Windows 2000/XP: When you change the parent of a window, you should synchronize the UISTATE of both windows. For more information, see WM_CHANGEUISTATE and WM_UPDATEUISTATE.

Function Information

Minimum DLL Version user32.dll
Header Declared in Winuser.h, include Windows.h
Import library User32.lib
Minimum operating systems Windows 95, Windows NT 3.1
Unicode Implemented as Unicode version.

See Also

Windows Overview, GetParent

--------------------------------------------------------------------------------

脆皮大雪糕 2019-03-05

打赏
举报

引用 5 楼 qq_43023041 的回复:

[quote=引用 1 楼 caozhy的回复:]setparent api函数

请问这个api怎么用呀？[/quote] 4楼已经给出那么简单的办法了，还折腾API干啥

threenewbee 2019-03-04

打赏
举报

setparent api函数

Xfan0202 2019-03-04

打赏
举报

引用 1 楼 caozhy的回复:

setparent api函数

请问这个api怎么用呀？

milaoshu1020 2019-03-04

打赏
举报

移动到另一控件内的代码如下,主要内容是container那一行:

Private Sub Form_Load()

    Load cmdTest(1)

    With cmdTest(1)

        .Caption = "Command2"

        .Visible = True

        Set .Container = Picture2

        '.ZOrder

    End With

End Sub

效果如图:

代码下载:
链接：https://pan.baidu.com/s/1hVmhjMtkPCeXBgWHonqW3w
提取码：4kcs

ZHRXJR 2019-03-04

打赏
举报

除非对于数组动态控件，提前就下标为0的控件放置在VB的容器控件中，这样通过Load 语句可以将下标为1、2、3...的数组控件放置在这个容器控件中。

ZHRXJR 2019-03-04

打赏
举报

Load 语句好像是动态放置控件对象的语句，根据自己的使用情况来看，Load 语句应该是放置在Form窗体最底层的，好像不能放置在其他控件的上方，即就是在设计时将“另一个控件”设置为最底层，Load 语句放置的控件也是在其他控件的最底层，因此好像不能实现你说的效果。因为Load 语句放置的控件永远在其他控件的底层，这样其他控件就可能覆盖了Load 语句放置的控件。

VB6中怎么将一个已经用load函数创建好的控件移动至另一个控件内？

相关推荐