descrizione gestione colore con VBA
esci con
vbasintassi.htm


xframepage.ppt

descrizione della gestione delle barre con scroll su frame e multipage

ScrollBars
KeepScrollBarsVisible
0 1 2 3 (non visualizza barre 0 ; visualizza barre anche se non necessarie 1 2 3)
fmScrollBarsNone o
fmScrollBarsHorizontal 1
fmScrollBarsVertical
2
fmScrollBarsBoth 3


Private Sub UserForm_Click()
Private Sub UserForm_Initialize()

rem (alternanza di codificazione testo e numerica equivalenti)

Frame1.ScrollBars = fmScrollBarsBoth
Frame1.KeepScrollBarsVisible = fmScrollBarsNone
MultiPage1.Pages(0).ScrollBars = 3
MultiPage1.Pages(0).KeepScrollBarsVisible = 0
End Sub

Private Sub CommandButton1_Click()
Frame1.KeepScrollBarsVisible = fmScrollBarsNone
MultiPage1.Pages(0).KeepScrollBarsVisible = 0
End Sub

Private Sub CommandButton2_Click()
Frame1.KeepScrollBarsVisible = fmScrollBarsHorizontal
MultiPage1.Pages(0).KeepScrollBarsVisible = 1
End Sub

Private Sub CommandButton3_Click()
Frame1.KeepScrollBarsVisible = fmScrollBarsVertical
MultiPage1.Pages(0).KeepScrollBarsVisible = 2
End Sub

Private Sub CommandButton4_Click()
Frame1.KeepScrollBarsVisible = fmScrollBarsBoth
MultiPage1.Pages(0).KeepScrollBarsVisible = 3
End Sub