以Saad的代码为基础，我使用yview_moveto对其进行了修改，使其能在每个s.O.(win、linux、mac)上运行，并且我在这里解释了一些修改。在

编辑：我编辑了代码以显示完整的类。在class VerticalScrolledFrame(Frame):

"""A pure Tkinter scrollable frame that actually works!

* Use the 'interior' attribute to place widgets inside the scrollable frame

* Construct and pack/place/grid normally

* This frame only allows vertical scrolling

"""

def __init__(self, parent, bg,*args, **kw):

Frame.__init__(self, parent, *args, **kw)

# create a canvas object and a vertical scrollbar for scrolling it

canvas = Canvas(self, bd=0, highlightthickness=0,bg=bg)

canvas.pack(side=LEFT, fill=BOTH, expand=TRUE)

# reset the view

canvas.xview_moveto(0)

canvas.yview_moveto(0)

self.canvasheight = 2000

# create a frame inside the canvas which will be scrolled with it

self.interior = interior = Frame(canvas,height=self.canvasheight,bg=bg)

interior_id = canvas.create_window(0, 0, window=interior,anchor=NW)

# track changes to the canvas and frame width and sync them,

# also updating the scrollbar

def _configure_interior(event):

# update the scrollbars to match the size of the inner frame

size = (interior.winfo_reqwidth(), interior.winfo_reqheight())

canvas.config(scrollregion="0 0 %s %s" % size)

if interior.winfo_reqwidth() != canvas.winfo_width():

# update the canvas's width to fit the inner frame

canvas.config(width=interior.winfo_reqwidth())

interior.bind('', _configure_interior)

def _configure_canvas(event):

if interior.winfo_reqwidth() != canvas.winfo_width():

# update the inner frame's width to fill the canvas

canvas.itemconfigure(interior_id, width=canvas.winfo_width())

canvas.bind('', _configure_canvas)

self.offset_y = 0

self.prevy = 0

self.scrollposition = 1

def on_press(event):

self.offset_y = event.y_root

if self.scrollposition < 1:

self.scrollposition = 1

elif self.scrollposition > self.canvasheight:

self.scrollposition = self.canvasheight

canvas.yview_moveto(self.scrollposition / self.canvasheight)

def on_touch_scroll(event):

nowy = event.y_root

sectionmoved = 15

if nowy > self.prevy:

event.delta = -sectionmoved

elif nowy < self.prevy:

event.delta = sectionmoved

else:

event.delta = 0

self.prevy= nowy

self.scrollposition += event.delta

canvas.yview_moveto(self.scrollposition/ self.canvasheight)

self.bind("", lambda _: self.bind_all('', on_press), '+')

self.bind("", lambda _: self.unbind_all(''), '+')

self.bind("", lambda _: self.bind_all('', on_touch_scroll), '+')

self.bind("", lambda _: self.unbind_all(''), '+')