Bütün Özellikleri Bir Komutta Atamak
VB’nin her yeni sürümü ile programcıların işini daha da kolaylaştıracak komutlar ve özellikler geliyor. İşte With (Birlikte) komutu bunlara en güzel örnek. Şimdi aşağıdaki satırları inceleyin ve bazı komutların ne kadar gereksiz olarak kullanıldığını görün:
Private Sub Form_Load()
Form1.Height = 4000
Form1.Caption = "With Örneği"
Form1.BackColor = QBColor(6)
End Sub
Burada dikkat ettiğiniz gibi “Form1” nesnesi her satırda tekrarlanmış. VB 4.0 ile bu soruna bir çözüm getirilerek With komutu yaratılmıştır. Aşağıdaki örnek size bu komutun nasıl kullanıldığı hakkında fikir verecektir.
Private Sub Form_Load()
With Form1 'Form1'i kullanarak...
.Height = 4000 'Yüksekliği 4000,
.Caption = "With Örneği" 'Form başlığını "With Örneği",
.BackColor = QBColor(6) 'Arkaplan rengini yeşil yap.
End With ‘Komutu bitir
End Sub
Bu komutu kullanırken With ve End With satırları arasına yine With ve End With satırlarını girebilirsiniz fakat bu iki komut arasına komplike komutlar ve döngüler eklememelisiniz. Bu hem programınızı yavaşlatır hem de ciddi hatalara sebep olabilir.