У VB-формы установлено ShowInTaskBar=True, но в TaskBar-e ee нет

Узнай цену своей работы

Формулировка задачи:

Найти ответ пока не удается (хотя, вроде бы, вопрос прост). Работаю на VB6.

Решение задачи: «У VB-формы установлено ShowInTaskBar=True, но в TaskBar-e ee нет»

textual
Листинг программы
' Код модуля - проект стартует отсюда:
'
Sub Main()
    Form1.Show vbModal
    MsgBox 'Этот мессадж должен появиться ПОСЛЕ закрытия формы Form1!'
End Sub
'
' Код формы Form1:
'
Private onceActivated As Boolean
'
Private Sub Form_Activate()
    If onceActivated Then Exit Sub
    
    Me.Caption = Me.Caption   ' << обязательно! не спрашивайте, почему :))
    frmInvisible.Show vbModal ' << модально!
    onceActivated = True      ' << чтобы выполнилось только один раз!
    
End Sub
'
' Код формы frmInvisible:
'
Private Sub Form_Load()
    ' Это форма-невидимка, показываемая модально по отношению к Form1.
    ' На ней должен быть размещён таймер Timer1.
    Me.BorderStyle = 0
    Me.Caption = ''
    Me.Width = 0
    Me.Height = 0
    Timer1.Interval = 100
    Timer1.Enabled = True
End Sub
'
Private Sub Timer1_Timer()
    Timer1.Enabled = False ' << выполнится единожды!
    Unload Me ' << форма выгружается, не успев даже появиться!
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 4.2 из 5
Похожие ответы