|
分類:[VB.NET]
質問の仕方が悪く、すみませんでした。
本来タスクバーがあるところまでフォームを最大表示したいのです。
> Call ShowWindow(FindWindow("Shell_TrayWnd", vbNullString), SW_HIDE) > Call ShowWindow(FindWindow("Shell_TrayWnd", vbNullString), SW_SHOW)
試してみたのですが、タスクバーのあるところにWindowsのデスクトップが 出てきてしまっていて、フォームが途中で切れてしまうのです。
それで、GetWindowPlacement・SetWindowPlacement関数を使用して タスクバーの高さを0にするようにしたのですが、VB6では正常に実行されるのですが VB.NETではどちらの関数も戻り値「-4294967296」が返ってきて何も起こりませんでした。
AppBar_HWnd = FindWindow("Shell_TrayWnd", vbNullString) Default_WindowPlacement.Length = Len(Default_WindowPlacement) Default_WindowPlacement.flags = 0 Default_WindowPlacement.ptMinPosition.X = 0 Default_WindowPlacement.ptMaxPosition.Y = 0 Default_WindowPlacement.ptMaxPosition.X = 0 Default_WindowPlacement.ptMaxPosition.Y = 0 Default_WindowPlacement.rcNormalPosition.Bottom = 0 Default_WindowPlacement.rcNormalPosition.left = 0 Default_WindowPlacement.rcNormalPosition.Right = 0 Default_WindowPlacement.rcNormalPosition.Top = 0 Default_WindowPlacement.showCmd = 0 ret = GetWindowPlacement(AppBar_HWnd, Default_WindowPlacement) New_WindowPlacement = Default_WindowPlacement ret = SetWindowPlacement(AppBar_HWnd, New_WindowPlacement)
宣言の部分で違う点は構造体のTypeをStructureに変換したところだけです。 この部分が悪いのでしょうか? 初歩的な質問ですみません。 よろしくお願いします。
|