With Grille .Appearance = flexFlat .Left 0: .Top 0 End With With Me .ScaleMode = vbTwips .Height = Grille.Height + (.Height - .ScaleHeight) - 30 .Width = Grille.Width + (.Width - .ScaleWidth) End With
With Me .Top 0: .Left 0 .Height = Grille.Height * Screen.TwipsPerPixelY .Width = Grille.Width * Screen.TwipsPerPixelX End With
With Grille: .Top 0: .Left 0: End With With Me .ScaleMode = vbTwips .Height = Grille.Height .Width = Grille.Width End With
With Grille: .Top 0: .Left 0: End With With Me .ScaleMode = vbPixels .Height = Grille.Height * Screen.TwipsPerPixelY .Width = Grille.Width * Screen.TwipsPerPixelX End With
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question