Başlıktada belirttiğim gibi bir stok takip programı hazırlıyorum bir kaç önemli bölümü kaldı biriside barkod yazdırma bölümü vb 6.0 da bunu nasıl yaparım şunun gibi bir şey istiyorum tam ideal olan birşey.
http://www.gezginler.net/indir/sahra-sof...grami.html
yukarıdaki adreste program var aşağıdaki barkod yazdırma kısmı.
![[Resim: do.php?img=4802]](https://accesstr.net/resim/do.php?img=4802)
Yardımcı olabilecek yokmu?
Sayın sherlockholmes
ekli dosyanın içindeki resimle anlatmaya çalıştım inceleyiniz
ekli program size yardımcı olacaktır
sayın mehmet demial a teşekkürler onun programı
Sayın simendifer ilginiz için teşekkür ederim tabiki mehmet demiralada.
yalnız ben visual basic 6.0 programlama dilinin içinden bu işlemi yapmak istiyorum yani resimde de gösterdiğim gibi.tam kavrayamadım bu noktayı yani sizin verdiğiniz
Access dosyası ile nasıl yapacağım yapmak istediğimi. teşekkürler.
1. Menüden Project->Components girelim.
![[Resim: vb6-project-menu.png]](https://strokescribe.com/en/pic/visual-basic-6/vb6-project-menu.png)
2. Components penceresinde, Controls sekmesinde, StrokeScribe ActiveX control module .bulalım. Resimdeki gibi tikleyip OK diyelim.
![[Resim: vb6-activex-selection.png]](https://strokescribe.com/en/pic/visual-basic-6/vb6-activex-selection.png)
3. Daha sonra Toolbox panelimizde çıkacaktır. Eğer gizliyse, Menüden View->Toolbox açalım barkod ikonuna tıklayalım..
![[Resim: vb6-toolbox-with-barcode.png]](https://strokescribe.com/en/pic/visual-basic-6/vb6-toolbox-with-barcode.png)
4. Barkod objesini formumuza sürükle bırak yapalım. Doğru yaptıysak aşağıdaki gibi bir görüntü oluşması gerek.
![[Resim: click-and-drag-to-paste-barcode.png]](https://strokescribe.com/en/pic/visual-basic-6/click-and-drag-to-paste-barcode.png)
5. Barkod tipi değiştirelim eğer istersek, Properties penceresine gidelim. Görünmüyorsa F4 tuşuna basarak görebilirsin.
![[Resim: barcode-activex-properties.png]](https://strokescribe.com/en/pic/visual-basic-6/barcode-activex-properties.png)
Barkodu özelliklerini değiştirirken , object's name'i kesinlikle değiştirmeyelim.. StrokeScribe1 olarak kullanıcaz. Yada kodda da değişiklik yapalım.
Örnek kodu denemek için formumuza bir adet Command Button ekleyelim. Çift tıklayarak aşağıdaki kodumuzu yazıp denememizi yapalım.
Kod:
Private Sub Command1_Click()
StrokeScribe1.Alphabet = CODE128
StrokeScribe1.Text = "123"
End Sub
sevgili kardeşim bu kadar güzel anlatılır eline sağlık