Report. PictureData-Eigenschaft (Access)Report.PictureData property (Access)

Sie können die PictureData -Eigenschaft verwenden, um das Bild in ein anderes Objekt zu kopieren, das die Picture -Eigenschaft unterstützt.You can use the PictureData property to copy the picture to another object that supports the Picture property. Variant mit Lese-/Schreibzugriff.Read/write Variant.

SyntaxSyntax

Ausdruck. PictureDataexpression.PictureData

Ausdruck Eine Variable, die ein Report -Objekt darstellt.expression A variable that represents a Report object.

BemerkungenRemarks

Die Einstellung der PictureData-Eigenschaft ist die PictureData-Eigenschaft eines anderen Steuerelements, Formulars oder Berichts.The PictureData property setting is the PictureData property of another control, form, or report.

Sie können diese Eigenschaft zum Anzeigen eines Formulars verwenden, das abhängig von Benutzeraktionen verschiedene Hintergrundbilder verwendet.You can use this property to display different background pictures in a form, depending on actions taken by the user. Sie können beispielsweise ein Kunden Formular mit einem anderen Hintergrundbild öffnen, je nachdem, ob das Formular für die Dateneingabe oder zum Browsen geöffnet wird.For example, you might open a Customers form by using a different background picture, depending on whether the form is opened for data entry or for browsing.

Sie können auch die PictureData -Eigenschaft zusammen mit dem Timer -Ereignis und der TimerInterval -Eigenschaft verwenden, um einfache Animationen in einem Formular auszuführen.You can also use the PictureData property together with the Timer event and the TimerInterval property to perform simple animation on a form.

BeispielExample

Im folgenden Beispiel werden drei Bildsteuerelemente verwendet, um ein Schmetterlingsbild in einem Formular zu animieren.The following example uses three image controls to animate a butterfly image across a form. Das Hidden1-Bildsteuerelement enthält ein Bild eines Schmetterlings mit seinen Flügeln nach oben, und das Hidden2-Bildsteuerelement enthält ein Bild des gleichen Schmetterlings mit seinen Flügeln nach unten.The Hidden1 image control contains a picture of a butterfly with its wings up, and the Hidden2 image control contains a picture of the same butterfly with its wings down. Beide Bildsteuerelemente haben Ihre Visible -Eigenschaft auf falsefestgelegt.Both image controls have their Visible property set to False.

Die TimerInterval -Eigenschaft ist auf 200 festgelegt.The TimerInterval property is set to 200. Jedes Mal, wenn das Timer -Ereignis eintritt, wird das Bild im Bildsteuerelement Visible1 mithilfe der PictureData -Eigenschaft der ausgeblendeten Bildsteuerelemente geändert, und das sichtbare bildsteuerelement wird 200 Twips nach rechts verschoben.Each time the Timer event occurs, the picture in the image control Visible1 is changed by using the PictureData property of the hidden image controls, and the visible image control is moved 200 twips to the right. Das sichtbare Bild-Steuerelement wird zurück auf die linke Seite des Formulars verschoben, wenn der Wert der left -Eigenschaft größer als die Breite des in der öffentlichen gfrmWidthVariablen gespeicherten Formulars ist.The visible image control is moved back to the left side of the form when its Left property value is greater than the width of the form stored in the public variable gfrmWidth. Der Wert von gfrmWidth ist auf Me.Width im Open-Ereignis des Formulars festgelegt.The value of gfrmWidth is set to Me.Width in the form's open event.

Private Sub Form_Timer() 
 
 Static intPic As Integer 
 
 Select Case intPic 
 Case Is = 1 
 Me!Visible1.PictureData = Me!Hidden1.PictureData 
 Case Is = 2 
 Me!Visible1.PictureData = Me!Hidden2.PictureData 
 Case Else 
 End Select 
 
 If intPic = 2 Then intPic = 0 
 intPic = intPic + 1 
 If (Me!Visible1.Left > gfrmWidth) Then Me!Visible1.Left = 0 
 Me!Visible1.Left = Me!Visible1.Left + 200 
 
End Sub

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.