Increment 和 Wrap 属性
当按住向上按钮或向下按钮时,Wrap 属性决定该控件的行为。如果设置为 False,当达到 Max 或 Min 值时,该控件将停止滚动,并停在 Max 或 Min 值。如果设置为 True,该控件会折回到 Min 或 Max 值,并从由 Min 或 Max 确定的值继续递增(或递减)。
Private Sub Form_Load()
'UpDown 控件名为“updToggle”。
'OptionButton 控件名为“optToggle”。
With updToggle
.BuddyControl = optToggle
.Min = -1
.Max = 0
.Increment = 1
.Wrap = True
End With
End Sub
'将 OptionButton 的 Value 改为
'UpDown 控件的 Value 属性。
Private Sub updToggle_Change()
optToggle.Value = updToggle.Value
End Sub