This property specifies the lowest value reached by the source. Example:
Sub SrcLoValue_ValueChange()
On Error Resume Next
Dim Bind
Set Bind = Screen.Item("ScrollBar1").Links.Item("Value")
Screen.Item("ScrollBar2").Min = Value
If Bind Is Nothing Then
MsgBox "ScrollBar1 has no link."
Else
MsgBox "ScrollBar1 is linked to " & Bind.Source & "'"
MsgBox "Changing SrcLoValue from " &_
Bind.SrcLoValue & " to " & Value
Bind.SrcLoValue = Value
End If
End Sub
NOTE |
In case the values specified for SrcHiValue and SrcLoValue properties are the same, there is no scale, then this Link works as a Simple Link. |