+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم مقالات VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=184)
+--- الموضوع : [مثال] انشاء ترميز باركود من نوع QR عن طريق موقع جوجل (/showthread.php?tid=13109)
انشاء ترميز باركود من نوع QR عن طريق موقع جوجل - الطالب - 02-09-15
سلام
انشاء ترميز باركود من نوع QR عن طريق موقع جوجل
تحتاج زر ومربع نص ومربع صوره
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
PictureBox1.Image = QRCodeGeneratorOnline(TextBox1.Text)
End Sub
Private Function QRCodeGeneratorOnline(ByVal txt As String) As Image
On Error Resume Next
Dim data As Array = New System.Net.WebClient().DownloadData("http://chart.apis.google.com/chart?cht=qr&chs=200x200&chl=" & txt)
Return Image.FromStream(New IO.MemoryStream(TryCast(data, Array)))
End Function
موفقين
RE: انشاء ترميز باركود من نوع QR عن طريق موقع جوجل - مبرمج بلا حدود - 02-09-15
وعليكم السلام ورحمة الله وبركاته
ما شاءالله لا قوة الا باالله
ابداع متواصل حفظكـ الله استاذ وجعله في ميزان حسناتكـ وفقكـ الله
لكن لدي استفسار
هل يمكن تحميل قاعدة بيانات هذا الباركود وجعلها تعمل بدوت انترنت
جزاكـ الله خير