............................................................................. ............................................................................. ............................................................................. ............................................................................. ............................................................................. ............................................................................. ............................................................................. ............................................................................. ............................................................................. ............................................................................. ............................................................................. ............................................................................. .............................................................................
Поиск
Маршруты
Друзья
Гид
Жильё
Проехать

Глобус 

​Сеть магазинов книг и канцелярских товаров
3.7
28 оценок
Учебные пособия, канцтовары с доставкой
​Реклама​ИП Агаев С. Х., ОГРНИП 304301632700011.

Контакты

Инфо

Отзывы8

Цены

Фото28

3.7
28 оценок
ВВ
​Виктор Ворсин​4 отзыва
Время 8:20 они до сих пор закрыты
​Артём Макаров​10 отзывов
Открываются когда хотят,печатают все съезжает 👍🏻
​Батыршин Алханов​3 отзыва
Public Class Form1 Private Sub Form1_Paint(sender As Object, e As PaintEventArgs) Handles MyBase.Paint Dim G As Graphics = e.Graphics G.SmoothingMode = Drawing2D.SmoothingMode.AntiAlias Dim CRUK1 As New SolidBrush(Color.Green) Dim CRUK2 As New SolidBrush(Color.Green) Dim CRUK3 As New SolidBrush(Color.Green) Dim CRUK4 As New SolidBrush(Color.Green) Dim CRUK5 As New SolidBrush(Color.Green) Dim CRUK6 As New SolidBrush(Color.Green) Dim STEBL As New SolidBrush(Color.Green) Dim brushLeaf As New SolidBrush(Color.Yellow) G.FillEllipse(CRUK1, 500, 100, 50, 50) G.FillEllipse(CRUK2, 500, 200, 50, 50) G.FillEllipse(CRUK3, 500, 300, 50, 50) G.FillEllipse(CRUK4, 500, 400, 50, 50) G.FillEllipse(CRUK5, 500, 500, 50, 50) G.FillEllipse(CRUK6, 500, 600, 50, 50) G.FillRectangle(STEBL, 500, 700, 100, 50) Dim leftLeaf() As Point = { New Point(230, 300), New Point(230, 350), New Point(180, 350) } Dim rightLeaf() As Point = { New Point(270, 300), New Point(270, 350), New Point(320, 350) } G.FillPolygon(brushLeaf, leftLeaf) G.FillPolygon(brushLeaf, rightLeaf) End Sub End Class
Читать целиком
ММ
​Мила Магомедова​25 отзывов
Советую!!!
​Святослав Денисов​2 отзыва
Рекомендую!
Лицензионное соглашение, политика конфиденциальности
Интенсивность снегопада
🍪
Мы используем cookies подробнее