Etiket Çalışmasında Basit Bir Ayrıntıda Takıldım.

[yeniyetme]

yazdığım kodun takıldığım kısmını gönderiyorum sadece.

If abc = 17 Then """"abc değişkeni her iki döngüde bir 17 oluyor""
s123 = s123 + 22 """ abc değişkeni 17 olduğu zaman s123'ün değeri 22 artıyor
abc = 1 """işlem yapıldıktan sonra abc değişkeni tekrar 1 oluyor
End If
Next g
Next j

s123 = s123 + 22 'nin olduğu satır da
ilk koşulda 22 eklesin
ikinci koşulda 22 eklesin
üçüncü koşulda 22 eklesin """buraya kadar herşey normal
dördüncü koşulda ekleme yapmasın
beşinci koşulda 22 eklesin
altıncı koşulda 22 eklesin
yedinci koşulda 22 eklesin
sekizinci koşulda ekleme yapmasın

bir anlatım yöntemi bulamadığım için uzun yazdım kusura bakmayın..
yazdığım kodda nasıl bir değişiklik yapmalıyım.
yardımlarınızı bekliyorum...

yani her dört koşulda bir bu tekrarlansın

 

[Ferhat Pazarçevirdi]

"g" indexli döngü içerisinde bir sayaç daha tanımlayın (örn. "x" gibi)... Bu sayaç değerini g'nin her dönüşünde +1 artırın. Eğer x'in değeri 4 veya 8 olduğunda ekleme yapmaması koşulunu da ilave ettiniz mi tamamdır.

Örneğin şöyle olabilir. Siz x sayacının g veya j döngülerinden hangisinde olacağına karar verin.

[COLOR=green]'for j
[/COLOR][COLOR=green]    'for g
[/COLOR]        [COLOR=red][B]x = x + 1
[/B][/COLOR]        If abc = 17 Then [COLOR=green]'""""abc değişkeni her iki döngüde bir 17 oluyor""
[/COLOR]            [COLOR=red][B]If x <> 4 Or x <> 8 Then
[/B][/COLOR]                s123 = s123 + 22 [COLOR=green]'""" abc değişkeni 17 olduğu zaman s123'ün[/COLOR] [COLOR=green]değeri 22 artıyor[/COLOR]
            [COLOR=red][B]End If
[/B][/COLOR]            abc = 1 [COLOR=green]'"""işlem yapıldıktan sonra abc değişkeni tekrar 1 oluyor
[/COLOR]        End If
    Next g
[COLOR=red][B]    x=0[/B][/COLOR]
Next j

 

[yeniyetme]

çok teşekkür ederim çalışmalarında başarılar dilerim..