Как изменить иконку формы? - VB

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

Кстати, иконка отбражается в панели заголовка (если программно) 16-ти цветная.( Хотя сама она грузится нормально, и если ее (Form1.Icon) теперь перебросить на пикчерс или вообще в трей - то отображается как надо. Судя по форумам, которые я просмотрел по теме, проблема не решена.

Решение задачи: «Как изменить иконку формы?»

textual
                            Листинг программы 
                        

                            Private Sub Command1_Click()
 Form1.Icon = LoadPicture('c:1.ico')
 Form1.Refresh
End Sub
                        