电视盒子 dlna:请问在VB中怎样能使窗体置顶？

来源：百度文库编辑：高考问答时间：2024/05/10 23:23:14

请问在VB中怎样能使窗体置顶？让他一直保持在当前所有窗口前面，请详细讲解，谢谢！

用API
Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long

Public Const HWND_TOPMOST = -1
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOSIZE = &H1
Public Const SWP_NOZORDER = &H8

将下面的子程序放到模块中

Public Sub SetFormTopmost(TheForm As Form)

SetWindowPos TheForm.hwnd, HWND_TOPMOST, 0, 0, 0, 0, _
SWP_NOZORDER + SWP_NOMOVE + SWP_NOSIZE

End Sub

最后，通过调用该子程序设置你想要放置的窗体。例如，你想将窗体frmMyForm放在最前面，代码如下：

SetFormTopmost frmMyForm.

SetFormTopmost frmMyForm

顶

请问在VB中怎样能使窗体置顶？ vb里在窗体中嵌入窗体 VB请问在编程过程中测试一个窗体，怎样跳过前面的直接运行这个窗体? 在vb怎样使鼠标限制在当前窗体中移动？ vb中怎样禁止把窗体拖大拖小? 在VB中如何分割窗体? (高分) 在VB.net中怎样将窗体中文本框的数据保存到一个*.htm中？在VB中修改密码的时候,怎么能让密码修改窗体总是浮在主窗体上面如何在vb中实现隐藏窗体但又能看到窗体中的图片框中的图片 VB中拖动窗体