VB生成二维码源码，支持低中高容错