Hi AG,
I did not expect that you want to use Win32 API since for Win32 API
questions it is recommended to post them at our windows SDK communities for
the best support.
Anyway if you decided to use Win32 API, indeed you can have the window
display with NO title bar.
I write the following sample for your reference:
1. Create a module and input the following Win32 APIs
Public Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As
Long) As Long
Public Declare Function apiMoveWindow Lib "user32" Alias "MoveWindow"
(ByVal hWnd As Long, ByVal X As Long, ByVal Y As Long, _
ByVal nWidth As Long, ByVal nHeight As Long, ByVal bRepaint As Long) As
Long
2. In your form_load event, input the following code
===================================
Dim nHeight, nSX, nSY As Long
Dim nRet As Long
Dim hWnd As Long
hWnd = Forms("Form1").hWnd
nHeight = Module4.GetSystemMetrics(31)
nSX = Module4.GetSystemMetrics(0)
nSY = Module4.GetSystemMetrics(1)
nRet = Module4.apiMoveWindow(hWnd, 0, 0 - CInt(1.5 * nHeight), nSX, nSY +
nHeight, True)
======================================
Please feel free to let us know if you have any other questions or
concerns. Have a nice day!
Best regards,
Charles Wang
Microsoft Online Community Support
=========================================================
Delighting our customers is our #1 priority. We welcome your
comments and suggestions about how we can improve the
support we provide to you. Please feel free to let my manager
know what you think of the level of service provided. You can
send feedback directly to my manager at:
[email protected].
=========================================================
This posting is provided "AS IS" with no warranties, and confers no rights.
=========================================================