diff --git a/include/wx/msw/slider.h b/include/wx/msw/slider.h
index 0668590eb9..57495d1568 100644
--- a/include/wx/msw/slider.h
+++ b/include/wx/msw/slider.h
@@ -122,6 +122,9 @@ protected:
 
     WXHBRUSH DoMSWControlColor(WXHDC pDC, wxColour colBg, WXHWND hWnd) wxOVERRIDE;
 
+    virtual void MSWUpdateFontOnDPIChange(const wxSize& newDPI) wxOVERRIDE;
+
+    void OnDPIChanged(wxDPIChangedEvent& event);
 
     // the labels windows, if any
     wxSubwindows  *m_labels;
diff --git a/src/msw/slider.cpp b/src/msw/slider.cpp
index 659320b96f..49e4bb07cb 100644
--- a/src/msw/slider.cpp
+++ b/src/msw/slider.cpp
@@ -163,13 +163,17 @@ bool wxSlider::Create(wxWindow *parent,
 
             m_labels->Set(n, wnd, lblid);
         }
-        m_labels->SetFont(GetFont());
     }
 
     // now create the main control too
     if ( !MSWCreateControl(TRACKBAR_CLASS, wxEmptyString, pos, size) )
         return false;
 
+    if ( m_labels )
+    {
+        m_labels->SetFont(GetFont());
+    }
+
     // and initialize everything
     SetRange(minValue, maxValue);
     SetValue(value);
@@ -183,6 +187,8 @@ bool wxSlider::Create(wxWindow *parent,
         SetSize(size);
     }
 
+    Bind(wxEVT_DPI_CHANGED, &wxSlider::OnDPIChanged, this);
+
     return true;
 }
 
@@ -541,7 +547,7 @@ void wxSlider::DoMoveWindow(int x, int y, int width, int height)
 wxSize wxSlider::DoGetBestSize() const
 {
     // this value is arbitrary:
-    static const int length = FromDIP(100);
+    const int length = FromDIP(100);
     const int thumbSize = GetThumbLength();
     const int tickSize = FromDIP(TICK);
 
@@ -619,6 +625,27 @@ WXHBRUSH wxSlider::DoMSWControlColor(WXHDC pDC, wxColour colBg, WXHWND hWnd)
     return hBrush;
 }
 
+void wxSlider::MSWUpdateFontOnDPIChange(const wxSize& newDPI)
+{
+    wxSliderBase::MSWUpdateFontOnDPIChange(newDPI);
+
+    if ( m_labels && m_font.IsOk() )
+    {
+        m_labels->SetFont(m_font);
+    }
+}
+
+void wxSlider::OnDPIChanged(wxDPIChangedEvent& event)
+{
+    int thumbLen = GetThumbLength();
+
+    const double scaleFactor = (double)event.GetNewDPI().x / event.GetOldDPI().x;
+    const double thumbLenScaled = thumbLen * scaleFactor;
+    thumbLen = (int)(scaleFactor > 1.0 ? ceil(thumbLenScaled) : floor(thumbLenScaled));
+
+    SetThumbLength(thumbLen);
+}
+
 // ----------------------------------------------------------------------------
 // slider-specific methods
 // ----------------------------------------------------------------------------