<< Clique para Mostrar o Sumário >>
SrcLoValue |
Esta propriedade especifica o valor mínimo atingido na fonte. Exemplo:
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 não tem associado."
Else
MsgBox "ScrollBar1 está associado a '" & Bind.Source & "'"
MsgBox "Mudando SrcLoValue de " &_
Bind.SrcLoValue & " para " & Value
Bind.SrcLoValue = Value
End If
End Sub
NOTA |
Caso os valores especificados para as propriedades SrcHiValue e SrcLoValue sejam iguais, não é possível executar a escala, e a Associação funciona como se fosse uma Associação Simples. |