<< Click to Display Table of Contents >>
DstLoValue |
This property specifies the lowest value reached by the property. Example:
Sub DstLoValue_ValueChange()
On Error Resume Next
Dim Bind
Set Bind = Screen.Item("ScrollBar1").Links.Item("Value")
Screen.Item("ScrollBar1").Min = Value
If Bind Is Nothing Then
MsgBox "ScrollBar1 has no link."
Else
MsgBox "ScrollBar1 is linked to " & Bind.Source & "'"
MsgBox "Changing DstLoValue from " &_
Bind.DstLoValue & " to " & Value
Bind.DstLoValue = Value
End If
End Sub