Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles Button1.Click
      Static clicks As Integer = 0
 
      If clicks Mod 2 = 0 Then
         MessageBox.Show("Folge1")
      Else
         MessageBox.Show("Folge2")
      End If
 
      clicks += 1
   End Sub

Gru?
---------------------------------------------------
Snoopy sagt - vb@rchiv find ich gut...
Schon gesehen? OSMMapViewer V2 Control