Private Sub btnViewLargeIcon_Click(ByVal sender As System.Object, ByVal e As _
     System.EventArgs) _
      Handles btnViewLargeIcon.Click, btnViewDetails.Click, _
      btnViewSmallIcon.Click, _
              btnViewList.Click, btnViewTile.Click
 
      btnViewLargeIcon.Checked = False
      btnViewDetails.Checked = False
      btnViewSmallIcon.Checked = False
      btnViewList.Checked = False
      btnViewTile.Checked = False
 
      Select Case sender.ToString
         Case "LargeIcon" : btnViewLargeIcon.Checked = True
         Case "Details" : btnViewDetails.Checked = True
         Case "SmallIcon" : btnViewSmallIcon.Checked = True
         Case "List" : btnViewList.Checked = True
         Case "Tile" : btnViewTile.Checked = True
      End Select
 
   End Sub

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