Dim rect As New Rectangle(-img.Height / 4, 0, img.Height / 4, img.Width _
          / 4)
        e.Graphics.RotateTransform(-90)
        e.Graphics.DrawImage(img, rect)

________
Alle Angaben ohne Gewähr. Keine Haftung für Vorschläge, Tipps oder sonstige Hilfe, falls es schiefgeht, nur Zeit verschwendet oder man sonst nicht zufrieden ist