Private Sub Image2_Click()
    Image2.Picture = LoadPicture("G:\_Software\__SUDOKU\Grafiken\Markiert.BMP")
End Sub

Beste Wünsche,
Bran
---
Du stolperst nicht durch die Steine die Dir in den Weg gelegt werden,
sondern durch die Einfallslosigkeit ihnen aus dem Weg gehen zu können.