[VB 6]Menu Finestra/Affianca

[xonica]

Ho un bel quesito..... una chicca!!!

Come si fa a fare il menu:
1. Finestra/Affianca Orizzontalemente
2. Finestra/Affianca Verticalmente
3. Finestra/Sovrapponi

basta anche un esempio solo.... non necessariamente tutti e tre!!!

è una cosa che potrebbe servire a molti!!!



CIAU CIAU a tutti e buon lavoro

[b.lory]

Private Sub mnu_finestra_Click(Index As Integer)
  Select Case Index
    Case 1: Me.Arrange vbCascade
    Case 2: Me.Arrange vbTileHorizontal
    Case 3: Me.Arrange vbTileVertical
  End Select

End Sub

ciao