Nasıl Yapılır? Detaylı Anlatım
VB.NET kullanarak geometrik şekillerin alan ve çevrelerini hesaplayan bir program yapabilirsiniz. Örneğin, dikdörtgen, kare, daire, üçgen gibi çeşitli şekillerin alan ve çevrelerini hesaplayabilirsiniz. İşte adım adım bir program yapımı:
İlk olarak, bir Windows Form uygulaması oluşturun. Form üzerinde şekil seçimini yapacak bir ComboBox, şekil özelliklerini gireceğiniz TextBox’lar ve hesaplama sonuçlarını gösterecek bir Label ekleyin.
Şekil seçimi için ComboBox’a çeşitli şekilleri ekleyin. ComboBox’ın SelectedIndexChanged olayına aşağıdaki kodu ekleyin:
vb.net
Private Sub cboShapes_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cboShapes.SelectedIndexChanged‘Hangi şekil seçildiğini belirleyin ve ilgili özellikleri gösterin veya gizleyin
Select Case cboShapes.SelectedItem.ToString()
Case “Dikdörtgen”
lblDimension1.Visible = True
lblDimension2.Visible = True
lblDimension1.Text = “Uzunluk:”
lblDimension2.Text = “Genişlik:”
txtDimension1.Visible = True
txtDimension2.Visible = True
lblResult.Text = “”
Case “Kare”
lblDimension1.Visible = True
lblDimension2.Visible = False
lblDimension1.Text = “Kenar uzunluğu:”
txtDimension1.Visible = True
txtDimension2.Visible = False
lblResult.Text = “”
Case “Daire”
lblDimension1.Visible = True
lblDimension2.Visible = False
lblDimension1.Text = “Yarıçap:”
txtDimension1.Visible = True
txtDimension2.Visible = False
lblResult.Text = “”
Case “Üçgen”
lblDimension1.Visible = True
lblDimension2.Visible = True
lblDimension1.Text = “Taban uzunluğu:”
lblDimension2.Text = “Yükseklik:”
txtDimension1.Visible = True
txtDimension2.Visible = True
lblResult.Text = “”
Case Else
lblDimension1.Visible = False
lblDimension2.Visible = False
txtDimension1.Visible = False
txtDimension2.Visible = False
lblResult.Text = “”
End Select
End Sub
Bu kod, ComboBox’ta bir şekil seçildiğinde çalışacak ve ilgili özellikleri gösterecek veya gizleyecektir.
Hesaplama yapmak için bir hesaplama işlevi ekleyin. Bu işlev, seçilen şekle ve girilen özelliklere göre alanı ve çevreyi hesaplayacaktır.
Bu kod, kullanıcının klavyeden dikdörtgenin uzunluğunu ve genişliğini girmesini bekler. Daha sonra, alan ve çevre hesaplamalarını yapar ve sonuçları kullanıcıya mesaj kutusu ile gösterir.
İlk olarak, kullanıcıdan verileri almak için iki değişken tanımlanır: “width” (genişlik) ve “height” (uzunluk). “InputBox” fonksiyonu, kullanıcıya mesaj kutusu aracılığıyla bir mesaj gösterir ve onlardan girdi almamızı sağlar.
Daha sonra, alan ve çevre hesaplamaları yapılır. “area” (alan) değişkeni, dikdörtgenin uzunluğu ve genişliğinin çarpımıdır. “perimeter” (çevre) değişkeni ise, dikdörtgenin uzunluğu ve genişliğinin iki katının toplamıdır.
Son olarak, sonuçlar kullanıcıya mesaj kutusu ile gösterilir. “MessageBox.Show” fonksiyonu, bir mesaj kutusu aracılığıyla kullanıcıya bir mesaj gösterir.
Bu kod örneği, kullanıcının girdiği herhangi bir dikdörtgenin alanını ve çevresini hesaplamak için kullanılabilir.