Visual Basic 3 Adet Sayıdan En Büyüğünü Ve En Küçüğünü Bulma
Visual Basic programı gelişim aşamasında karşımıza visual basic girilen 3 adet sayıdan en büyüğünü ve en küçüğünü bulma nasıl yapılır sorusu çıkıyor.
Bu kodlar ile birlikte visual basic programında girilen 3 adet sayıdan en büyüğünü ve en küçüğünü bulma hesabını kolayca yapabileceksiniz.
İçindekiler
En küçüğü Ve En büyüğü Bulan Program
Öncelikle bilmemiz gereken aşağıda verilen kodlar ile sadece 3 sayıyı karşılaştırabileceğimiz. Daha fazla sayı veya veriyi karşılaştırmak için bizlere lazım olan sıralama algoritmalarıdır. Web sitemizin arama kısmına sıralama algoritması yazarak ulaşabilirsiniz.
Visual Basic 3 Adet Sayıdan En Büyüğünü Ve En Küçüğünü Bulma Programı
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click If Val(TextBox1.Text) > Val(TextBox2.Text) And Val(TextBox1.Text) > Val(TextBox3.Text) Then TextBox4.Text = TextBox1.Text End If If Val(TextBox2.Text) >Val(TextBox1.Text) And Val(TextBox2.Text)> Val(TextBox3.Text) Then TextBox4.Text = TextBox2.Text End If If Val(TextBox3.Text) > Val(TextBox1.Text) And Val(TextBox3.Text) > Val(TextBox2.Text) Then TextBox4.Text = TextBox3.Text End If If Val(TextBox1.Text) > Val(TextBox2.Text) And Val(TextBox1.Text)> Val(TextBox3.Text) Then TextBox5.Text = TextBox1.Text End If If Val(TextBox2.Text) > Val(TextBox1.Text) And Val(TextBox2.Text) > Val(TextBox3.Text) Then TextBox5.Text = TextBox2.Text End If If Val(TextBox3.Text) > Val(TextBox1.Text) And Val(TextBox3.Text) > Val(TextBox2.Text) Then TextBox5.Text = TextBox3.Text End If End Sub End Class
Sizlerde kendi yazdığınız programları, istek ve sorularınızı bizlere iletişim kısmından iletebilirsiniz.
Visual Basic ile ilgili kavramlara ek olarak, Visual Basic öğrenimini teşvik etmek için karar verme ve döngü kontrolleri dahil olmak üzere bazı örnekler ve örnek uygulamalar vardır.
Diğer örneklere de göz atabilirsiniz:
Visual Basic Basit Hesap Makinesi
Girilen Sayının Kuvvetini ve Faktöriyelini Hesaplama
Kodlarda herhangi bir problem olduğunda lütfen yorum kısmından iletişime geçiniz.