關於部落格
人生戲。戲人生。夢想在那裡。就飛多遠吧
  • 57363

    累積人氣

  • 0

    今日人氣

    2

    追蹤人氣

【VB】讓視窗永遠在最上面

Private 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
   
  Const SWP_NOMOVE = &H2         '不更動目前視窗位置
  Const SWP_NOSIZE = &H1         '不更動目前視窗大小
  Const HWND_TOPMOST = -1         '設定為最上層
  Const HWND_NOTOPMOST = -2         '取消最上層設定
  Const FLAGS = SWP_NOMOVE Or SWP_NOSIZE
   
  '將   APP   視窗設定成永遠保持在最上層
  'SetWindowPos Me.hwnd, HWND_TOPMOST, 0, 0, 0, 0, FLAGS
   
  '取消最上層設定
  'SetWindowPos Me.hwnd, HWND_NOTOPMOST, 0, 0, 0, 0, FLAGS


相簿設定
標籤設定
相簿狀態