Bild scrollen
Beni
Mit nachfolgenden Code werden A4 Bilder in die Imagebox gelesen.
In der Breite geht es bei den heutigen Bildschirmen ohne Problem. Wie aber kann ich in der Höhe das Bild scrollen?
Trotz suche im Archiv habe ich nichts gefunden. Auch wüsste ich nicht was für ein Code zu einem Spinn Button gehört.
Dim strPfad As String
Select Case Test.Value
Case "UK 1205"
strPfad = "C:\1.gif"
Image1.AutoSize = True
End Select
Me.Image1.Picture = LoadPicture(strPfad)
Danke für eure Hilfe