Как из формы убрать кнопку CloseButton (крестик) в верхнем правом углу? - VB
Формулировка задачи:
Хочу сделать subj.
Вопрос: как из формы убрать кнопку CloseButton (крестик) в верхнем правом углу? MinButton и MaxButton убираются в свойствах формы, а эта - нигде.
Решение задачи: «Как из формы убрать кнопку CloseButton (крестик) в верхнем правом углу?»
textual
Листинг программы
Public Sub DisableXbutton(ByVal frmHwnd As Long) Dim hmenu As Long hmenu = GetSystemMenu(frmHwnd, 0&) If hmenu Then Call DeleteMenu(hmenu, SC_CLOSE, MF_BYCOMMAND) DrawMenuBar (frmHwnd) End If End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д