Link hvor dan?

Form2.show = True
Unload Me

Ved ikke om denne virker:
Form1.Show = False
Form2.Show = True

Hvor skal det ind henne

Det er lidt forvirende det du skriver:

'Dialog1
        '
        Me.Dialog1.AccessibleDescription = ""
        Me.Dialog1.AccessibleName = ""
        Me.Dialog1.DataBindings.Add(New System.Windows.Forms.Binding("Name", C4.Settings.Default, "t", True, System.Windows.Forms.DataSourceUpdateMode.OnPropertyChanged))
        Me.Dialog1.Location = New System.Drawing.Point(39, 365)
        Me.Dialog1.Name = "Dialog1"
        Me.Dialog1.RightToLeft = System.Windows.Forms.RightToLeft.No
        Me.Dialog1.Size = New System.Drawing.Size(125, 23)
        Me.Dialog1.TabIndex = 0
        Me.Dialog1.Text = "Koden til clan server"
        Form2.show = True
        Unload Me

dette virker ikke

        '
        Me.Button1.Location = New System.Drawing.Point(63, 180)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(90, 19)
        Me.Button1.TabIndex = 1
        Me.Form1.Show = False
        Me.Form2.Show = True
        '

hvad er Me ?

Du skriver Me. mange steder......
Er Me Form1 ?

Ander det ikke det er ikke noget jeg har lavet. det gør den selv

Vi prøver lige igen (Er startet forfra)

        'Button1
        '
        Me.Button1.Location = New System.Drawing.Point(42, 283)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(151, 24)
        Me.Button1.TabIndex = 1
        Me.Button1.Text = "Koden til clan serverren"
        '

så skal du ha en sub, det er hvad knappen er for en og hvor henne

noget med
Private Sub Button1_Click()
Form2.Show
Unload Me
End Sub

virker det ikke så prøv lige at smide al koden her inde

Hved ikke helt hvad du mener. Hvor skal jeg sætte
Private Sub Button1_Click()
Form2.Show
Unload Me
End Sub
ind henne?

Her er hele koden

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public Class Form1
    Inherits System.Windows.Forms.Form

    'Form overrides dispose to clean up the component list.
    <System.Diagnostics.DebuggerNonUserCode()> _
    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        If disposing AndAlso components IsNot Nothing Then
            components.Dispose()
        End If
        MyBase.Dispose(disposing)
    End Sub

    'Required by the Windows Form Designer
    Private components As System.ComponentModel.IContainer

    'NOTE: The following procedure is required by the Windows Form Designer
    'It can be modified using the Windows Form Designer. 
    'Do not modify it using the code editor.
    <System.Diagnostics.DebuggerStepThrough()> _
    Private Sub InitializeComponent()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Form1))
        Me.Label1 = New System.Windows.Forms.Label
        Me.Button1 = New System.Windows.Forms.Button
        Me.SuspendLayout()
        '
        'Label1
        '
        Me.Label1.AutoSize = True
        Me.Label1.Font = New System.Drawing.Font("Verdana", 9.75!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
        Me.Label1.Location = New System.Drawing.Point(244, 9)
        Me.Label1.Name = "Label1"
        Me.Label1.Size = New System.Drawing.Size(120, 16)
        Me.Label1.TabIndex = 0
        Me.Label1.Text = "C4 Clan progran"
        '
        'Button1
        '
        Me.Button1.Location = New System.Drawing.Point(42, 283)
        Me.Button1.Name = "Button1"
        Me.Button1.Size = New System.Drawing.Size(151, 24)
        Me.Button1.TabIndex = 1
        Me.Button1.Text = "Koden til clan serverren"

        '
        'Form1
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
        Me.BackColor = System.Drawing.SystemColors.GradientInactiveCaption
        Me.ClientSize = New System.Drawing.Size(614, 482)
        Me.Controls.Add(Me.Button1)
        Me.Controls.Add(Me.Label1)
        Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
        Me.Name = "Form1"
        Me.Text = "C4-Clan"
        Me.ResumeLayout(False)
        Me.PerformLayout()

    End Sub
    Friend WithEvents Label1 As System.Windows.Forms.Label
    Friend WithEvents Button1 As System.Windows.Forms.Button

End Class

Så vidt jeg kan se skal det ikke ind der nogen steder....
Hvad er det for en type fil du har åben ?
Og hvad er det du laver det i ?

lavet i: Visual Basic 2005 Express Edition Beta 2
navn: Form1.vb

Oh så er jeg ikke så sikker på jeg kan hjælpe.......
Ved ikke engang om der er tråd til VB2005 endnu, men prøv i .net tråden.....

Hvor dan laver jeg denne kode i det gamle vb

skal jeg så ha fat i Visual Basic 2004

Tror ikke der er noget der hedder VB 2004, .Net er 2003.....

Jeg arbejder kun i VB6.0 som hører til i den her tråd.

Du sidder med en Beta af 2005, og som jeg ser det der så ligner det vist VB.Net så prøv i den del af forum.....

ok

Fandt lige denne kode istedet tror du det er den eller skal det over i Vb.net

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    End Sub

Hvor dan ville du lave den vis det var i vb 6.0 der er nemlig en ting i den nye så man kan lave koden om til en ny