У 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д