Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As Integer)
On Error Resume Next
If Me![Bild_x] <> "" Then
Me!Bild_x.Picture = Me!Pfad
Else
Me!Bild_x.Picture = "D:\kein_bild.jpg"
End If
End Sub
Private Sub Detailbereich_Format(Cancel As Integer, FormatCount As Integer)
Me!Bild_x.Picture = Me!Pfad
End Sub
VBA: Eine Variable in einem String
Oli00 23.03.2007 - 92 Hits - 2 Antworten
verknüpfte dokument in der ansicht nicht gefunden
bhalli 06.07.2007 - 16 Hits -
Animierte Bilder
FlyDie 31.12.2007 - 157 Hits -
Bilder Anzeigen geht nicht!
IceBlue2 06.03.2008 - 217 Hits - 7 Antworten
Eigene Bilder
wiese 05.05.2008 - 89 Hits - 3 Antworten