Arama sonuçlarınız

  1. NBATMAN

    VBA_Excel Basic Programlama_Bir klasör içinden dosya isimlerini listeye almak

    Merhaba arkadaşlar; Seçilen klasörün içindeki dosyalar liste2 de listelenir. Listelenen dosyalar ilgili buton ile Sayfa1 A sütununa aktarılarak listelenir. İlgili buton ile A sütununda adı bulunan dosyalar için kendi adları ile birlikte yeni sayfalar çalışma kitabına eklenir. Geliştirmeye açık...
  2. NBATMAN

    VBA_Excel Basic Programlama Hücrede aranan karkterin toplam tekrar sayısı

    Merhaba arkadaşlar, aşağıda bulanan EXCEL VBA kodları ile; A sütununda hücrelerdeki veriler içinde, C2 hücresindeki karakterlerin aranarak tekrar sayısının, A sütunundaki içinde veri aranan hücrenin 1 sağındaki ( b sütunundaki ) hücreye yazılması işlemini yaptım... Buna göre; A sütununda...
  3. NBATMAN

    VB 2008_Textboxlara sayı dışında bir değer girmeyi ve boş geçmeyi engelleme

    Merhaba, Sayısal (matematiksel) işlemlerde Kodlar aşağıdaki gibi olmalı aksi takdirde sayı dışında herhangi bir şey ( harf v.s ) girildiğindede hata alınır. Bunun önüne geçmek için aşağıdaki kodlar işinizi tam görür düşüncesindeyim. Imports System.Text.RegularExpressions PublicClass Form1...
  4. NBATMAN

    VB 6.0_String İşlemleri_Metin parçalama

    Merhaba, Textboxa girilen ve karakter uzunluğu 3 olan kelimeleri, karakter karakter tek,tek ayırarak labellara yazdırma işlemi... Kodlar aşaşıdaki gibidir. Private Sub Form_Load() Label1.Caption = "" Label2.Caption = "" Label3.Caption = "" Text1.Text = "" Text1.MaxLength = 3 End Sub...
  5. NBATMAN

    VB 6.0_Comporta bağlı bir ledi istenilen süre kadar yakıp söndürmek

    Merhaba, aşağıdaki VB 6.0 da yazdığım kodlar ile Seriportun 5. Pine Ledin katod (-) ucu, 4. Pine Anod (+) ucu gelecek şekilde bağlayın. Girilen süreler nezdinde led yanıp sönecektir. Dim yakmaperiyodu As Integer Dim yanıkkalmasüresi As Integer Private Sub Combo1_Click() Command2.Enabled = True...
  6. NBATMAN

    VB 6.0_Ado kullanulan veritabanı konulu programda veri arama-süzme

    Merhaba ben aşağıdaki kodları kullanıyorum... Combobox ile arama; Aranılan isim ile tamam eşleşen kayıtlar listelenir. Private Sub Combo1_Change() On Error Resume Next If Combo1.Text = "" Then Adodc1.Recordset.Filter = "" Adodc1.Refresh Else Adodc1.Recordset.Filter = "Ad= '" & Combo1.Text...
  7. NBATMAN

    VB 6.0_Sleep benzeri Bekleme fonksiyonu

    Merhaba, aşağıdaki fonksiyon işinize yarar mı? Public Sub Pause(BeklemeZamani As Currency) Dim BASLA As Currency BASLA = Timer Do While Timer < (BASLA + BeklemeZamani) DoEvents Loop End Sub Kullanımı: Private Sub Text1_Change() Text3.Text = Replace(Text1.Text, Chr$(13), Chr$(32))...
  8. NBATMAN

    VB 6.0 Mail Gönderme

    Merhaba, Server-Client uygulamasında SERVER a ait Ip aderesinin değişme ihtimaline karşı IP adresini bir Gmail hesabı ile başka bir mail aderesine gönderen program kodlarını aşağıda bulabilirsiniz...Kodlar VB 6.0 içindir. Bu örnekteki kodlar bir buton ile mail gönderme işlemini içeriyor...
  9. NBATMAN

    VB 6.0_Klavye tuşları ile ilgili işlemler

    Merhaba Arkadaşlar bir kitapta bulduğum yararlı bilgiler.... KeyPress (Bir tuşa basma olayı) Çalışma anında klavyenin yön ve kontrol (Control Alt, Shift vs.) tuşları dışında herhangi bir tuşa basılması halinde KeyPress olayı meydana gelir. KeyPress olayı için Visual Basic tarafından hazırlanan...
  10. NBATMAN

    VB 6.0_Geri Sayıcı

    Merhaba, kodları aşağıdaki gibi kullanın... Private Sub Form_Load() Timer1.Enabled = False 'Burada Timer nesnesini durduruyoruz Timer1.Interval = 1000 ' bir saniyede bir Label1.Caption = "120" 'hangi dakikadan geriye saydıracaksanız onu yazınız End Sub Private Sub Timer1_Timer()...
  11. NBATMAN

    VB 6.0 ve VB 2008 için Comportu Açma ve Kapama işlemleri

    Benim kullandığım kodlar aşağıdaki gibi,umarım ihtiyacı olana faydalı olur. Vb 6.0 için Comport açma (çalıştırma) için; Private Sub Command1_Click() If MSComm1.PortOpen = False Then MSComm1.PortOpen = True Else MSComm1.PortOpen = False End If End sub Comport kapatma(durdurma) için...
  12. NBATMAN

    VB 6.0_İnternet üzerinden döviz kuru alma

    Merhaba, Ben aşağıdaki kodları 2010 yılında yazmıştım. Bu kodlar ile günlük (anlık ) olarak alış ve satış cinsinden USD,Euro ve Euro/USD paritesini çekiyorum. Ve bugün denedim hala çalışıyor.Umarım işe yarar... Private Sub Command1_Click() Dim strkur As String strkur =...
  13. NBATMAN

    VB 6.0_Paralel port IO işlemleri

    Merhaba, Paralel port konusu ile ilgili bilgiler webte oldukça fazla miktarda bulunmaktadır. Fakat bu iş PC (Vbasic) yazılımı ile birlikte mutlaka elektronik veya elektrik bilgisine de sahip olmak gerekir. Aksi takdirde bilgisayarın donanımına zarar verilmesi, hatta çöpe bile atılmasına neden...
  14. NBATMAN

    VB_2008_Küsürlü sayıları aşaşğı veya yukarı yuvarlamak

    Merhaba, Tekboxa girilen 11.55 veya 10.45 gibi sayıları 12 veya 10 'a yuvarlayan kodları aşağıdaki gibi kullanıyorum. Umarım szinde işinize yarar. Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged Dim sayi As Integer Dim...
  15. NBATMAN

    VB 2008 ile Excelden Forma Bilgi Çekme

    Ben konu ile ilgili aşağıdaki kodları kullanıyorum. Umarım ihtiyacı olanın işine yarar. Kodları denerken C:/Excel/excel1.xls yoluna sahip içinde SıraNo,Ad,Soyad başlıklarına sahip bir excel dosyası olıuşturmayı unutmayın.SıraNo başlıklı alan içindeki veriler mutlaka sayı olmalı...diğer...
  16. NBATMAN

    VB 2010_SerialPort kullanımı_Aynı Form üzerinde 2 comport kullanma

    Merhaba, aşağıdaki kodları ile aynı form üzerinde 2 ayrı comport kullanarak gönderme ve alma işlemleri yapılabilir. Imports System Imports System.Text Imports System.Drawing Imports System.IO.Ports Imports System.Threading Imports System.Windows.Forms Imports Microsoft.Win32 PublicClassForm1...
  17. NBATMAN

    VB 2010 Progress Bar çalıştırma örnekleri

    Merhaba, Örnek 1: forma bir progressbar,buton,timer ve 2 adet label ekleyip aşağıdaki kodları forma ekleyiniz. aşağıdaki kodları istediğin gibi düzenledim. Kolay gelsin... PublicClassForm1 PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles...
  18. NBATMAN

    VB 6.0 da Registry_Bilgi_Okuma ve Yazma

    Vb 6.0 için; Dim Okunacakbilgi Okunacakbilgi = GetSetting("Comport", "Test", "Port") SaveSetting "Comport", "Test", "Port", "Kayitedilecek Bilgi" Yukarıdaki kodların açıklamasına geçmeden önce kayıt düzenleyicisi hakkında bazı bilgilerin verilmesi gerekmektedir. Öncelikle “Başlat menüsü”...
Geri
Üst