vb.net küre alanı ve hacmi hesaplama

Merhaba Arkadaşlar,

Kürenin alanı ve hacmi hesaplama kaynak kodlarını paylaşıcam.Bu basit birşekilde formülü aşağıdaki gibi uyguluyoruz.Size yabancı gelebilir belki Math.PI   komutuyla pi sayisini aliyorum 22/7 olarak alıyor.Math.round(Yuvarlancak sayı,Virgülden sonra kaç basamak) bu işe yarıyor.

Eklememiz Gerekenler : 1 Textbox,1 button,sonuç aralığına ekliceklerinize göre label

Kodlar :

    Dim r, hacim, hacimpi, alan, alanpi As Double

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        r = Val(TextBox1.Text)
        hacim = 4 / 3 * Math.PI * r ^ 3
        Label2.Text = Math.Round(hacim, 1)
        hacimpi = 4 / 3 * r ^ 3
        Label5.Text = Math.Round(hacimpi, 1) & " Pi"
        alan = 4 * Math.PI * r ^ 2
        alanpi = 4 * r ^ 2
        Label7.Text = Math.Round(alan, 1)
        Label9.Text = Math.Round(alanpi, 1) & " Pi"
        'canmose.org
    End Sub

Program Resmi :

kürehacmi

 

Program (Bunda Kaynak Dosya Vermiyorum gerek duymadım ):

indirmebutonu

Facebook Yorumlar

Yorum

Leave a Comment

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir