sintax5

Private Sub CommandButton1_Click()
Frame1.VerticalScrollBarSide = 1
End Sub

Private Sub CommandButton2_Click()
Frame1.VerticalScrollBarSide = 0
End Sub

Private Sub CommandButton3_Click()
ComboBox1.AutoTab = True
TextBox1.AutoTab = True
End Sub

Private Sub CommandButton4_Click()
ComboBox1.AutoTab = False
TextBox1.AutoTab = False
End Sub

Private Sub UserForm_Click()

End Sub

ritorna