02/02/2020, 17:47
bakın ifadenizde eğer toplam 15 ve 20 arasında ise çıkar demişsiniz ama döngüde toplamın kaç olduğuna bakmadan her defasında çıkarıyor.
02/02/2020, 17:47
02/02/2020, 17:49
evet onay kutusu işlemi toplamını aşağıdaki kodla halledediyorum. buraya kadar sıkıntı yok.
Ancak ancak onay kutusu işaretli iken 15 ile 20 arasındaki sayılarda kalanı yanlış hesaplıyor.
If Me.O.Value = -1 Then
p = Toplam - 1
Me.M.Value = p
End IfAncak ancak onay kutusu işaretli iken 15 ile 20 arasındaki sayılarda kalanı yanlış hesaplıyor.
02/02/2020, 17:53
Bu işlemi biraz daha adım adım anlatır mısınız? Ben anladığım yere kadar yazayım, sonrasında film koptu.
1- Formdaki P1...P5 alanları üzerindeki sayılar toplanacak.
2- Eğer bu sayı 14'ten büyükse ve onay işareti tiklenmişse P1...P5 sayılarının toplamından çıkan sayıdan 1 eksiltilecek. Yani toplam diyelim ki 18 ise 18-1=17 olacak.
3- Bu eksiltmeden sonra geriye kalan 17 sayısından-mesela- 15 daha çıkacak. Yani 17-15=2 olacak.
4- Son işlemde 2 sayısına ulaşmıştık. Buna da 3 ekleyeceğiz ve 2+3=5 çıkacak.
5- 5 sayısını 5'e böleceğiz. Çıkan tam sayı olmalı sanırım. Bunu da teker teker R1...R5 değerleri olarak forma yerleştireceğiz.
Benim sorum, eğer buraya kadar doğru anladıysam, sayı 15'ten küçük olunca ne olacak? Bir de bunları niye yapıyoruz? Neye yarayacak bu form?
1- Formdaki P1...P5 alanları üzerindeki sayılar toplanacak.
2- Eğer bu sayı 14'ten büyükse ve onay işareti tiklenmişse P1...P5 sayılarının toplamından çıkan sayıdan 1 eksiltilecek. Yani toplam diyelim ki 18 ise 18-1=17 olacak.
3- Bu eksiltmeden sonra geriye kalan 17 sayısından-mesela- 15 daha çıkacak. Yani 17-15=2 olacak.
4- Son işlemde 2 sayısına ulaşmıştık. Buna da 3 ekleyeceğiz ve 2+3=5 çıkacak.
5- 5 sayısını 5'e böleceğiz. Çıkan tam sayı olmalı sanırım. Bunu da teker teker R1...R5 değerleri olarak forma yerleştireceğiz.
Benim sorum, eğer buraya kadar doğru anladıysam, sayı 15'ten küçük olunca ne olacak? Bir de bunları niye yapıyoruz? Neye yarayacak bu form?
02/02/2020, 17:55
şöyle yapalım. p değerleri 25 olacak şekilde ayarlayın.
bu kodu , aşağıdaki kodun üstüne alınca o da yanlış hesaplama yapıyor. bu sefer aşağıdaki kod doğru hesaplama yapıyor.
If 20 <= p < 30 Then
Kalan = (p - 15) + 4
Me.S.Value = Kalan
End Ifbu kodu , aşağıdaki kodun üstüne alınca o da yanlış hesaplama yapıyor. bu sefer aşağıdaki kod doğru hesaplama yapıyor.
If 15 <= p < 20 Then
Kalan = (p - 15) + 3
Me.S.Value = Kalan
End If02/02/2020, 18:07
mehmet hocam son derece doğru anlamışsınız.
1-bu programın temelinde öğretmenlerin girdiği ders saatine göre ekdersini dağıtması amaçlanıyor.
2-onay tiki rehberlik dersi olan öğretmenler için kullanılacak.
3-10 saatten 20 saate kadar hazırlık planlama için 1 saat, sınıf rehberlik veya sosyal kulüpler için 2 saat olmak üzere 3 saat ödeme amaçlandı. gerisini zaten siz biliyorsunuz.
4- toplamın 15 ten çıkması maaş karşılığı gerisi, ekders olarak dağıtılacak.
1-bu programın temelinde öğretmenlerin girdiği ders saatine göre ekdersini dağıtması amaçlanıyor.
2-onay tiki rehberlik dersi olan öğretmenler için kullanılacak.
3-10 saatten 20 saate kadar hazırlık planlama için 1 saat, sınıf rehberlik veya sosyal kulüpler için 2 saat olmak üzere 3 saat ödeme amaçlandı. gerisini zaten siz biliyorsunuz.
4- toplamın 15 ten çıkması maaş karşılığı gerisi, ekders olarak dağıtılacak.
02/02/2020, 18:12
kısacası mehmet hocam. p değerlerine öğretmenin girdiği ders saatleri işlendikten sonra r değerleri haftalık alacağı ekders saatleri ile ilgili olacak.