kod yazma ile alakalı

[acebeci]

çok özür dileyerek birşey öğrenebilirmiyim.Kod ları yazarken neye göre paragrafın içine dogru kayılıyor bunu neye göre yapıyoruz.Aşagıdaki tamamen bir örnek sadece ne anlatmak istediğimi anlatmak için formdan ekledim.

Private Sub CommandButton1_Click()
Set gr = Sheets("GIRIS")
If TextBox1.Value = Empty Then
    MsgBox "Ürün kodu boş olamaz..!!", vbCritical, Application.UserName
    TextBox1.SetFocus
    Set gr = Nothing
    Exit Sub
End If
sat = gr.Cells(65536, "A").End(xlUp).Row + 1
For i = 1 To 6
    If i < 5 Then
        gr.Cells(sat, i).Value = Controls("TextBox" & i).Value
        Controls("TextBox" & i).Value = Empty
    End If
    If i = 5 Then
        gr.Cells(sat, "E").Value = CDate(Format(TextBox5.Value, "dd.mm.yyyy"))
        TextBox5.Value = Empty
    End If
    If i = 6 Then
        gr.Cells(sat, "F").Value = TextBox6.Value * 1
        gr.Cells(sat, "F").NumberFormat = "#,##0.00"
        TextBox6.Value = Empty
    End If
Next
TextBox1.SetFocus
MsgBox "Kayıt yapıldı..!!", vbOKOnly + vbInformation, Application.UserName
Set gr = Nothing
End Sub

[/QUOTE]

 

[Ferhat Pazarçevirdi]

Paragraf kullanmak, kodun okunaklılığı ve anlaşılırlığı artırmak için kullanılan bir yöntemdir. Ama işleyişe bir alakası yoktur. Kodları, düz bir satıh halinde de yazsanız yine çalışır.

Paragraf, genel olarak Deyim bloklarında (For-Next, İf-Endif, Do-Loop, with-End With gibi..) göze çarpar.

Verdiğiniz örnekte de; dikkat ederseniz, if ile başlayan satırdan sonra, for ile başlayan satırdan sonra paragraf yapılmıştır. For 'un altında if olması halinde paragraf girintisinin daha bir arttığına dikkat edin. Çünkü burdai if için de bir paragraf oluşturlmuştur.

 

[acebeci]

çok teşekkür edirim sayın fpc yine çok yardımcı oldunuz.bizlerde sizin gibi hocalarımız sayesin de karınca kararınca birşeyler öğrenmeye çalışıyoruz.sizde diyeceksiniz daha çok yolunuz var daha yola yeni çıkmışsınız.olsun be hocam en azından bu yolu çok sevdik.Sayenizde