Сообщение BM_SETSTATE

Пошлите сообщение BM_SETSTATE для изменения состояния кнопки(нажата или ненажата)

Возвращаемое значение

Параметры

wParam

Если имеет ненулевое значение, вид кнопки измененяется на вид нажатой кнопки. Если значение равно 0, кнопка выглядит ненажатой

lParam

Не используется - установите равным 0

Пример

' Меняем вид кнопки Command1
' на вид нажатой кнопки. Добавьте две кнопки
' Command1 и Command2 на форму
Private Sub Command2_Click()
Dim retval As Long ' возвращаемое значение

' Вид нажатой кнопки
retval = SendMessage(Command1.hWnd, BM_SETSTATE, ByVal CLng(1), ByVal CLng(0))
End Sub

Смотри также

Категория