Как правельно отобразить на кнопке картинку во VB6?

[С.М.С]

Пишу так:

Private Sub Command1_Click()
Command1.Picture = Image1.Picture 'Не работает!
Command1.Caption = "текст"

' цвет кнопки
Command1.BackColor = vbGreen 'Не работает!
Command1.BackColor = &HFF00& 'тоже Не работает!
End Sub

картинка image1 присвоенна.

[С.М.С]

и как скрыть, а точнее не отображать логотип формы на панели быстрого запуска не используя MDI форму?

[EducatedFool]

Установи свойство Style кнопки в 1
(устанавливается вручную, в окне параметров)

И попробуй так:

Private Sub Command1_Click()
    Command1.Picture = Image1.Picture
    Command1.Caption = "текст"
End Sub

Или так:

Private Sub Command1_Click()
    Command1.BackColor = vbGreen
    Command1.Caption = "текст"
End Sub

А лучше добавь на панель инструментов компоненты из библиотеки Microsoft Forms 2.0 Object Library:



и используй нормальные элементы управления:
(с виду они такие же, но работать с ними проще)

Private Sub CommandButton1_Click()
    Me.CommandButton1.BackColor = vbRed
End Sub

У них нет свойства Style, зато етсь другие полезные свойства.
(эти элементы управления используются в VBA)

[С.М.С]

Спасибо большое!!! Теперь работает!