Merhabalar

Yazdığım bir programda alanları birim katsayı ile carpmam gerek yaznlız bu birim katsayılar ile carptıktan sonra ortalama olarak%15 duşuk sonuclar almaktayım sizleri kod satırından bir bolum gondermekteyim.Yardımlarınızı bekliyorum.Bir turlu işin icinden cıkamadım.



If Combo1.Text = "25-x" And Combo2.Text = "Kare" And Combo3.Text = "V" Then Text11.Text = (((2 * (val(Text1.Text) + val(Text2.Text)) * (val(Text4.Text) + (2 * val(Text5))) / 1000000)))

If Combo1.Text = "25-x" And Combo2.Text = "Kare" And Combo3.Text = "V" Then Text15.Text = (((2 * (val(Text1.Text) + val(Text2.Text)) * (val(Text4.Text) + (2 * val(Text5))) / 1000000)))

If Combo1.Text = "25-x" And Combo2.Text = "Kare" And Combo3.Text = "V" Then Text16.Text = (((2 * (val(Text1.Text) + val(Text2.Text)) * (val(Text4.Text) + (2 * val(Text5))) / 1000000)))

If Combo1.Text = "25-x" And Combo2.Text = "Kare" And Combo3.Text = "V" Then Text17.Text = (((2 * (val(Text1.Text) + val(Text2.Text))) * (4 * val(Text5.Text))) / 1000000)

If Combo1.Text = "25-x" And Combo2.Text = "Kare" And Combo3.Text = "V" Then Text10.Text = (("2,78" * (val(Text11.Text)) + ("20,52" * (val(Text15.Text))) + ("13,03" * (val(Text16.Text))) + ("2,78" * val(Text17.Text))))
__________________