Erstes VB-Programm/eure Meinung Oo

[Fetzi]

nunja kurze vorgeschichte brauchte etwas einfaches womit ich meinen server binde usw.

das ganze ist sone art "fake keygen"

aussehn

http://img4.imageshack.us/img4/7076/keygenz.jpg

quellcode

Public Class Form1
    Dim z As Integer
    Dim key(9) As String

    Sub main()
        z = -1
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        z = z + 1
        key(0) = "0"
        key(1) = "1"
        key(2) = "2"
        key(3) = "3"
        key(4) = "4"
        key(5) = "5"
        key(6) = "6"
        key(7) = "7"
        key(8) = "8"
        key(9) = "9"
        TextBox1.Text = key(z)
        If z = 9 Then z = -1


    End Sub
End Class

bin für verbesserungsvorschläge und kritik offen oO
bisher sehr schlicht gehalten
jeder fängt mal klein an ...


//edit
ist sicherlich noch ausbaufähig ^^