QR Code in VB6

سلام دوستان
من می خوام توی پروژه ام از یه سری اعداد بارکد تولید کنم. اما نه بارکد خطی بلکه بارکد دوبعدی QR
توی چاپ مشکلی ندارم الان تصاویر رو به کریستال ریپورت ارسال می کنم, نمی دونم نحوه تولید بارکد چه طوریه! کسی از دوستان نمونه کدی داره که منو راهنمایی کنه؟