Arama butonu
Bu konudaki kullanıcılar: 1 misafir, 1 mobil kullanıcı
4
Cevap
462
Tıklama
0
Öne Çıkarma
Visual basic Şartlı işlem çözümü
F
14 yıl (29 mesaj)
Onbaşı
Konu Sahibi

merhaba.

Private Sub Command1_Click()
Dim a As Double, b As Double, c As Double, d As Double, e As Double, f As Double, m As Double
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
d = Val(Text4.Text)
e = Val(Text5.Text)
f = Val(Text6.Text)
m = Val(Text7.Text)
n = Val(Text8.Text)
Text9.Text = ((e * (a - c)) + ((m * f * (c - a)) / n) + ((m * a * (d - b)) / n) + ((m * b * (a - c)) / n)) / (((m * (d - b)) / n) - c + a)
Text10.Text = (((m * f * (b - d)) / n) + (e * (d - b)) + (b * (c - a)) + (a * (b - d))) / (c - a + ((m * (b - d)) / n))
End Sub

gibi bi kod dizimiyle tanımladıgım işlemi yaptırabiliyorum. fakat buna özel bi durum eklemek istersem nasıl yapacagımı bilmiyorum.
türkçesi şöyle ; c>a ve b<d iken m<0 olsun.

bilen var mı?



-
14 yıl (460 mesaj)
Onbaşı

P
14 yıl (4313 mesaj)
Yarbay

F
14 yıl (29 mesaj)
Onbaşı
Konu Sahibi

yani girilen değerlerden c>a ve b<d ise m değerinin başına (-) getirilerek işlem yapılsın istiyorum.
if kullancaksın derken? nasıl kullancam mesela


Bu mesaja 1 cevap geldi.
P
14 yıl (4313 mesaj)
Yarbay

if şart then
şart gerçek ise yapılacak işlem

else
şart gerçek değil ise yapılacak işlem.

end if

eger kosullar dogru ise m i -1 ile carparsın



DH Mobil uygulaması ile devam edin. Mobil tarayıcınız ile mümkün olanların yanı sıra, birçok yeni ve faydalı özelliğe erişin. Gizle ve güncelleme çıkana kadar tekrar gösterme.