Bitmaps

Imports System
Imports System.Windows.Forms
Imports System.Drawing
Public Module modmain
   Sub Main()
      'The KPD-Team 2001
      'URL: http://www.allapi.net/dotnet/
      'E-Mail: KPDTeam@Allapi.net
      Dim theForm as MainForm = new MainForm()
      theForm.ShowDialog()
   End Sub
End Module
Public Class MainForm
Inherits Form
   Dim BackGround as new Bitmap("C:\Windows\Bubbles.bmp")
   Protected Overrides Sub OnPaint(e as PaintEventArgs)
      e.Graphics.DrawImage(BackGround, new Point(0, 0))
   End Sub
End Class

Close this window