+- AccessTr.neT (https://accesstr.net)
+-- Forum: Visual Basic 6 (https://accesstr.net/forum-visual-basic-6.html)
+--- Forum: Visual Basic 6 Soruları ve Cevapları (https://accesstr.net/forum-visual-basic-6-sorulari-ve-cevaplari.html)
+--- Konu Başlığı: Stok takip programında barkod yazma bölümü (/konu-stok-takip-programinda-barkod-yazma-bolumu.html)
Sayfalar:
1
2
Cvp: Stok takip programında barkod yazma bölümü - sherlockholmes - 29/01/2015
Şuan kodları inceliyorum chopper07 kardeşim anlatım çok güzel olmuş çok teşekkür ederim inceledikten sonra geri bildirim yapacağım teşekkürler.
Cvp: Stok takip programında barkod yazma bölümü - sherlockholmes - 29/01/2015
Cvp: Stok takip programında barkod yazma bölümü - sherlockholmes - 29/01/2015
form'a ait kaynak kodlar:
Private Sub Form_Load()
Dim a As New ADODB.Recordset
a.Open "select * from veri", "dsn=bkd", adOpenStatic, adLockOptimistic
With MSFlexGrid1
.Cols = 2
.ColWidth(0) = 2000
.ColWidth(1) = 2000
Width = 4000
.TextMatrix(0, 0) = "Malın Cinsi"
.TextMatrix(0, 1) = "Barkod"
.Rows = a.RecordCount + 1
For t = 1 To a.RecordCount
.TextMatrix(t, 0) = a("Malin_Cinsi")
.TextMatrix(t, 1) = a("Barkod_No")
a.MoveNext
Next
End With
End Sub
Private Sub MSFlexGrid1_Click()
StrokeScribe1.Alphabet = CODE128
StrokeScribe1.Text = MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 1)
End Sub
Cvp: Stok takip programında barkod yazma bölümü - sherlockholmes - 30/01/2015
Bilen üstatlara sesleniyorum bu konuya bi açıklık getirirsek çok sevinirim. sadece ben değil hem site sakinleri faydalanır hem de internet'te böyle bir konunun cevabı yok her şey parça parça bu örneği tam çalışır hale getirirsek çok yarayışlı olacağına inanıyorum.teşekkürler.