|
|
| Kodlarınızı renklendirin |
Normal olarak kodlarınız aşağıdaki gibi görülürler.
Sub SeçiliSatirlar()
Dim Bas%, Bit%
With FrmKurYap.Tablo
If .Row > .RowSel Then
Bas = .RowSel
Bit = .Row
Else
Bas = .Row
Bit = .RowSel
End If
Do
TekSatirSil Bas
If Bas = Bit Then Exit Do
Bit = Bit - 1
Loop
End With
End Sub
Visual Basic'i çalıştırdıktan sonra; Toools/Options menüsünden Editor Format sekmesini tıklayın, burada bulunan Code Color penceresinden dileğiniz bölümü seçin (örneğin "Keyword Text" veya "Comment Text" veya "Normal Text"), sonra bu texte ait "Foreground" ve "Backgorund" renklerini seçin ve "Tamam" buttonuna tıklayın...
Şimdi seçtiğiniz renklere bağlı olarak kodlarınız şu şekilde görülecektir.
Sub SeçiliSatirlar()
Dim Bas%, Bit%
With FrmKurYap.Tablo
If .Row > .RowSel Then
Bas = .RowSel
Bit = .Row
Else
Bas = .Row
Bit = .RowSel
End If
Do
TekSatirSil Bas
If Bas = Bit Then Exit Do
Bit = Bit - 1
Loop
End With
End Sub
Böylece, daha anlaşılır değil mi?
|
| :: Bu sayfaya 1.865 kere bakıldı :: | |