‘Asagidaki kodu cmdYeniEkle_Click() yordamina yaz List1.AddItem Text1.Text ‘ Yeni bir item ekle ‘Asagidaki kodu cmdTumunuSec_Click() yordamina yaz For x = 0 To List1.ListCount –...
Move methodunun, Left ve Top ayarlarından %45 daha hızlı çalıştığını biliyormuydunuz? Özellikle yavaş sistemlerde çok işe yarıyor. Move methodu için kullanacağınız kod aşağıda: Sub … Form.Move x...
On Error GoTo Hata_Kontrol Dim DB as Database Dim Kayitlar as Recordset Dim X as Long, record_count as Long ‘Veritabanini açalim Set DB = OpenDatabase(“Ogrenci.mdb”, dbOpenSnapshot) ...
Bazen bir form üzerindeki tüm textboxları temizlemek zorunda kalırsınız. İşte aşağıda bunu yapmak için kullanacağınız kod. Sub ClearAllTextBoxes(frmTarget As Form) For i = 0 To (frmTarget.Controls.Cou...
Yeni bir EXE projesi aç ve bir modul içine asagidaki WinApi’yi yaz: Public Declare Function FlashWindow Lib “user32″ (ByVal hwnd As Long, _ ByVal bInvert As Long) As Long Bir Form üz...
Bazen yazdığınız uygulamanın Readme dosyasını görüntülemek için Not defterini çalıştırmak kullanışlı olur. 1. Formun üzerine bir CommandButton yerleştirin. 2. Aşağıdaki kodu formun Declarations Sectio...
Dim s As String Dim cnt As Long Dim dl As Long Dim AktifKullanici as String cnt = 199 s = String$(200, 0) dl = GetUserName(s, cnt) If dl 0 Then AktifKullanici = Left$(s, cnt) Else AktifKullanici = ...
SELECT * FROM tablo ÖRNEK: Bütün bilgileri personel tablosundan koşulsuz olarak listele. SELECT * FROM personel ÖRNEK: Personel tablosundan SELECT komutuyla sadece istediğin sütun adlarını belirt. Böy...
TANIM: Bir tablo içinde ,birden fazla sütundan aynı anda sıralamak için kullanılır. ÖRNEK: Personel dosyasından seçilen sütunlarını aynı anda hem ad hem de otomatik olarak sıralar. SELECT sicil, ad, s...