Dimensionare il Form o un'altra finestra considerando la presenza della barra delle applicazioni sulla Scrivania

Per dimensionare ilForm o un'altra qualsiasi finestra (Window), avendo cura di non far capitare parte al di sotto della eventale barra degli strumenti, presente sulla Scrivania, bisognerà utilizzare la Proprietà "Screen.AvailableWidth", qualora la barra degli strumenti sia posta presso uno dei due lati di destra e di sinistra della Scrivania, oppure la Proprietà "Screen.AvailableHeight", qualora la barra degli strumenti sia posta presso il lato superiore o presso il lato inferiore della Scrivania.

Mostriamo un semplicissimo esempio, nel quale si dimensionerà il Form considerando l'esistenza della barra degli strumenti sul lato inferiore della Scrivania. Si confermerà, quanto affermato precedentemente, posizionando il Button - dopo aver cliccato su di esso - esattamente con il suo lato inferiore coincidente con il lato inferiore del Form.

Public Sub Form_Open()

 With Me
   .W = Screen.AvailableWidth
   .H = Screen.AvailableHeight
 End With

End


Public Sub Button1_Click()

 Button1.Y = Me.H - Button1.H

End