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.Size = new Size(500, 350) theForm.Text = "Visual Basic.NET" theForm.ShowDialog() End Sub End Module Public Class MainForm Inherits Form Protected Overrides Sub OnPaint(e as PaintEventArgs) e.Graphics.DrawEllipse(new Pen(Color.Green), 0, 0, 200, 100) End Sub End Class |