Private Sub lbTabs_DoubleClick(ByVal sender As Object, ByVal e As _
  System.EventArgs) Handles lbTabs.DoubleClick
 
code ...
 
End Sub

---------------------------------------------------------------------------------------------------------------
Wissen ist Macht, aber nichts wissen macht nichts!