| PictureBox, ComboBox, Select Case |
| |
| |
| Private Sub Form_Load() | |
| Picture1.Tag = "Ein schöner Tag !" | Zuweisen der Bildunterschriften |
| Picture2.Tag = "Ein verregneter Tag !" | |
| End Sub | |
| |
| Private Sub Picture3_DragDrop(Source As Control, X!, Y!) | |
| Picture3.Picture = Source.Picture | Die dritte PictureBox erhält das Bild der ersten oder |
 | Label1.Caption = Source.Tag | | zweiten Quelle. |
| End Sub | |
| |
| |
| |
| |
| |
| |
| |
| |
| . |
| |
| |
| |
| |
| |
| |
| |
| |
| |
zurück