Declare Function ChooseColor Lib "comdlg32" Alias "ChooseColorA" (pChoosecolor As CHOOSECOLOR) As Long
ChooseColor открывает стандартное окно Общего диалога для выбора цвета. Вся необходимая информация для создания диалогового окна, хранится в структуре pChoosecolor.
В случае возникновения ошибки или при нажатии пользователем кнопки Отмена, функция возвращает 0 (пользуйтесь CommDlgExtendedError для получения кода ошибки). В успешном случае функция возвращает ненулевое значение.
' смотри пример comdlg.zip
' (Показываем общее диалоговое окно
' для выбора цвета. Задний фон Form1
' будет установлен в соответствии с выбранным цветом)