Как сделать свойтвом контрола шрифт - VB
Формулировка задачи:
Приветствую, сограждане! Пишу контрол. Одно из свойств его должно быть шрифтом. Пишу так:
и соответственно
При использовании данного свойства открывается окошко с установками шрифтов. Однако при попытке применить выбранный шрифт выскакивает сообщение "Invalid property value". И вот не пойму, что не так. Или кто подскажет как сделать корректнее?
Решение задачи: «Как сделать свойтвом контрола шрифт»
textual
Листинг программы
Dim Fnt As New StdFont Public Property Get Font() As Font Set Font = Fnt End Property Public Property Set Font(ByVal New_Font As Font) Set Fnt = New_Font End Property
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д