OPENGL 双缓存在VB6.0中该怎么使用？

Question

opengl 双缓存在VB6.0中如何使用，SwapBuffers加上来就启用双缓存了吗？ Private Sub Display()
   
          glClearColor 0#, 0#, 1#, 0#
          glClear clrColorBufferBit
          glColor3f 1#, 1#, 1#
             
          glBegin glBeginModeConstants.bmLineStrip
                      glVertex2f -1, -1
                      glVertex2f -1, 1
                      glVertex2f 1, 1
                      glVertex2f 1, -1
          glEnd          glFlush
            
          SwapBuffers Picture1.hDC     
    
  End Sub