How to bind togglebutton and boolean together in WPF VB.NET ?

Public Class BooleanWrapper
    Implements ComponentModel.INotifyPropertyChanged
    Public Event PropertyChanged As ComponentModel.PropertyChangedEventHandler Implements ComponentModel.INotifyPropertyChanged.PropertyChanged

    Private _IsScrollList As Boolean

    Public Property IsScrollList As Boolean
        Get
            Return _IsScrollList
        End Get
        Set(value As Boolean)

            If _IsScrollList <> value Then
                _IsScrollList = value
            End If
            RaiseEvent PropertyChanged(Me, New PropertyChangedEventArgs("IsScrollList"))
            MsgBox(IsScrollList)

        End Set
    End Property

End Class

<ToggleButton x:Name="TglBtn"
              DataContext="BooleanWrapper"
              IsChecked="{Binding IsScrollList}"/>