ГРАДИЕНТНАЯ ЗАЛИВКА

Dim r As New Rectangle(10, 10, 150, 100)

Dim br As New System.Drawing.Drawing2D.LinearGradientBru sh(r, Color.Brown, Color.Gold, 90)

e.Graphics.FillRectangle(br, r)

ВЫВОД ТЕКСТА

Private Sub PictureBox1_Paint() Dim g As Graphics = e.Graphics

Dim f As New Font("Times New Roman", 12,_ FontStyle.Regular)

Dim B As New SolidBrush(Color.Magenta) g.DrawString("Выводимая строка", f, B, 100,60)

МНОГООКОННЫЙ ИНТЕРФЕЙС

MDI

Создайте форму и свойству IsMDIContainer= true.

Добавьте элемент MenuStrip в форму.

Добавьте два пункта меню верхнего уровня &File и &Window.

Добавьте пункты подменю в пункт меню &File со значением &Open.

Установка MenuStrip.MdiWindowListItem = название ППменю

Добавьте в проект форму, а в форму — требуемые элементы управления.

Создайте обработчик событий для события Click по пункту меню.

В обработчик событий вставьте код для создания и отображения новых экземпляров формы Form2 как дочерних MDI­форм формы Form1.

ПРИМЕР

Dim NewDoc As New Form2

NewDoc.MdiParent = Me

NewDoc.Show

Создание пункта меню Окно с полями: вертикально, горизонтально, каскадом.

На событие Click по каждому пункту меню пишем соответствующие строки:

Me.LayoutMdi(MdiLayout.TileHorizontal)

Me.LayoutMdi(MdiLayout.TileVertical)

Me.LayoutMdi(MdiLayout.Cascade)