VB sweep