Bonjour!
Ma question est très simple, j'ai le code suivant rattaché à un bouton:
J'aimerais savoir pourquoi je ne vois pas apparaître le rectangle en question!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16 Dim x1 As Integer Dim x2 As Integer Dim y1 As Integer Dim y2 As Integer x1 = 0 x2 = 100 y1 = 0 y2 = 100 picTest.ScaleLeft = x1 picTest.ScaleWidth = x2 - x1 picTest.ScaleTop = y1 picTest.ScaleHeight = y2 - y1 picTest.Scale (x1, y1)-(x2, y2)
Merci!
Partager