是否有可能将表格等保存为查找/替换表单,最重要的是它是无模式的?
答案 0 :(得分:3)
SetWindowsPos
api电话的文档位于:https://msdn.microsoft.com/en-us/library/windows/desktop/ms633545(v=vs.85).aspx
要包含在表单中的示例代码:
Declare Function SetWindowPos Lib "user32.dll" (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
Const SWP_NOMOVE = 2
Const SWP_NOSIZE = 1
Const flags = SWP_NOMOVE Or SWP_NOSIZE
Const HWND_TOP = 0
Const HWND_TOPMOST = -1
Const HWND_NOTOPMOST = -2
Private Sub Form_Load()
Dim lResult As Long
lResult = SetWindowPos(Me.hWnd, HWND_TOP, 0, 0, 0, 0, flags)
End Sub