启动窗体要在所有窗体的最前面(是相对于其他程序,要在其他程序窗口的前面),该怎么设置呢?谢谢!
解决方案 »
- 网页关闭自动输入autocomplete="off"如何控制输入框
- 如何创建,读取,修改,快捷方式?
- 难道没有人知道怎样解决??
- 急急急急急急急急急急急急急急,VB字符串查找菜鸟一问,急急急急急急急急急急急急急急
- 您好.我想问个数组排序问题[处男贴~]
- 关于Hook
- 高分征:用过用友华表的cell组件的xdjm们过来谈谈感受
- 高手指教:如何在VB中用代码打开IE对象,让IE 打开一个指定的网址?在线等,程序要打包了!谢谢
- 继续探讨VB连接因特网数据库的方法(Access,SQL Server)
- 还是问问VB的兄弟们,ADSL到底有多快?(和ISDN比较)
- 什么函数可以得到当月的上一个月,例如,1月的上一个月是12
- 知道任意两点经纬度,如何求出两点的距离?
Const HWND_NOTOPMOST = -2
Const SWP_NOSIZE = &H1
Const SWP_NOMOVE = &H2
Const SWP_NOACTIVATE = &H10
Const SWP_SHOWWINDOW = &H40
Private Declare Sub 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)Private Sub Form_Activate()
'KPD-Team 1998
'URL: http://www.allapi.net/
'E-Mail: [email protected]
'Set the window position to topmost
SetWindowPos Me.hWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE Or SWP_SHOWWINDOW Or SWP_NOMOVE Or SWP_NOSIZE
End Sub