Private Sub Button7Click(sender As System.Object, e As System.EventArgs)
  Dim casm As System.Reflection.Assembly = _
    System.Reflection.Assembly.GetExecutingAssembly()
  Dim str As System.IO.Stream = casm.GetManifestResourceStream("Feder.bmp") '// 
  ' Name des Bildes bzw. Resource
  Dim img As Image = Image.FromStream(str)
  Me.BackgroundImage = img
End Sub