Фоновый рисунок можно создать, выведя его в контекст графического устройства
формы, т. е. обработав событие Paint или реализовав метод OnPaintBackground,
который обрабатывает событие, генерируемое при прорисовке фонового рисунка.
Конечно, в этом случае также надо обработать событие Resize, обновляя
изображение при изменении размеров формы пользователем. Ниже изображен код
демонстрирующий подобный подход. Контекст графического устройства формы
(экземпляр класса Graphics) возвращается методом Graphics класса PaintEventArgs
пространства имен System.Windows.Form. Экземпляр этого класса является
параметром метода OnPaintBackground, и он инкапсулирует все данные, связанные с
этим объектом. Свойство ClipRectangle возвращает объект Rectangle –
прямоугольную область, в которую выводится изображение. Метод Refresh класса
Form вызывает перерисовку формы. Для того чтобы избежать ошибки, генерируемой
при попытки загрузить несуществующий файл, в код введена проверка существования
файла статическим свойством Exists класса System.IO.File.
Protected Overrides Sub OnPaintBackground(ByVal_
pevent As System.Windows.Forms.PaintEventArgs)
Dim filename As String = "c:\girl.bmp"
If System.IO.File.Exists(filename) ThenDim img As Image = Image.FromFile(filename)
pevent.Graphics.DrawImage(img, pevent.ClipRectangle)
End If
End Sub
Protected Overrides Sub OnResize(ByVal e As System.EventArgs)
Me.Refresh()
End Sub