Содержание
Пользовательский компонент — UserControl.
Простейшая столбиковая диаграмма, значения для диаграммы берутся из свойств: цвет, шрифт, значения по осям. В коде даны комментарии.
Выдержка из текста
‘Задание свойства цвета фона диаграммы
Public Property Get BackColor() As OLE_COLOR
BackColor = UserControl.BackColor
End Property
Public Property Let BackColor(ByVal New_BackColor As OLE_COLOR)
UserControl.BackColor() = New_BackColor
PropertyChanged «BackColor»
End Property
‘Задание свойства шрифт для диаграммы
Public Property Get Font() As Font
Set Font = UserControl.Font
End Property
Public Property Set Font(ByVal New_Font As Font)
Set UserControl.Font = New_Font
PropertyChanged «Font»
lName.Font = UserControl.Font
lX.Font = UserControl.Font
lY.Font = UserControl.Font
Label2(0).Font = UserControl.Font
End Property
‘Задание размера шрифта для диаграммы
Public Property Get FontSize() As Single
FontSize = UserControl.FontSize
End Property
Public Property Let FontSize(ByVal New_FontSize As Single)
UserControl.FontSize() = New_FontSize
PropertyChanged «FontSize»
lName.FontSize = UserControl.FontSize + 1
lX.FontSize = UserControl.FontSize
lY.Font = UserControl.FontSize
End Property
‘Задание «жирного» шрифта для диаграммы
Public Property Get FontBold() As Boolean
FontBold = UserControl.FontBold
End Property
Public Property Let FontBold(ByVal New_FontBold As Boolean)
UserControl.FontBold() = New_FontBold
PropertyChanged «FontBold»
lName.FontBold = UserControl.FontBold
End Property
‘Обновить
Public Sub Refresh()
flag = 1
Dim size As Long
Dim sizey As Long
size = LineX.X2 — LineX.X1
On Error Resume Next
size = CLng(size / (dc1 + 1))
Dim i As Integer
For i = 0 To dc1
Load Label1(i + 1)
Label1(i + 1).Caption = c1(i)
Label1(i + 1).Top = Label1(0).Top
Label1(i + 1).Left = Label1(i).Left + size
Label1(i + 1).Width = size
Label1(i + 1).WordWrap = True
Label1(i + 1).Alignment = center
Label1(i + 1).Visible = True
Label1(i + 1).BackStyle = Transporen
С этим материалом также изучают
... или резиновый шаблон документа. – Типографика — Описания шрифтов, определение некоторых классов для шрифтов таких как код, цитаты и т. п. – ... литературы по программированию в php, css. Для определений использована Википедия, также использованы интернет ...
... метку, так что фон просто не заметен. Для метки Label цвет и шрифт единственно доступные элементы оформления надписи. Рисунок 1. ... свойством Color, а цвет надписи подсвойством Color свойства Font. Если цвет специально не задавать, то цвет фона ...
... 1. Almond, K. (2013). Fashionably Voluptuous: Repackaging the Fuller-Sized Figure. Fashion Theory: The Journal of Dress, Body & ... 16. Perrier, A. M. (2008). Influence of model body size on consumer attitudes and purchase intention. [Online] Available ...
... Было открыто модельное агентство Plus Size Model Agency. Переломным для plus-size-моделей в России стал 2015 ... агентства, Электронный ресурс: http://www.olegdneprovsky.ru/prodvizhenie-modelnogo-agentstva.html 9. Size plus Fashion Weekend на неделе моды ...
... условные названия: литературная, обыкновенная, плакатная и др. Список использованной литературы Шрифты Шрифт – это один из основных изобразительных элементов текстового печатного издания. Классификация ...
... Возникли надписи, высеченные на памятниках, книжный шрифт, бытовые и рукописные шрифты. Все они были только прописными. Писали ... Возникли надписи, высеченные на памятниках, книжный шрифт, бытовые и рукописные шрифты. Все они были только прописными. ...
... предложил компьютерному миру концепцию множественных шрифтов, которые действительно выглядели как шрифты в книгах и журналах. ... компьютерному миру концепцию множественных шрифтов, которые действительно выглядели как шрифты в книгах и журналах. ...
... MODERN указывает на сравнительно недавнюю историю этих шрифтов - они получили распространение с развитием печатающей техники ... и стал родоначальником большого числа поколений шрифтов. Список использованной литературы Обычно к семейству MODERN ...
