VBA Yarıçap Girilen Bir Dairenin Çevre ve Alanını Bulma Örneği

7 Okunma VBA

"VBA" Programlama dilinde "Yarıçap Girilen Bir Dairenin Çevre ve Alanını Bulma Örneği" ile ilgili kod örneği aşağıda verilmiştir. 

Sub Main()
    Dim radius As Double
    radius = CDbl(InputBox("Yarıçap Girin:"))

    Dim c As Double
    c = 2 * Application.WorksheetFunction.Pi * radius

    Dim area As Double
    area = Application.WorksheetFunction.Pi * radius * radius

    MsgBox "Dairenin Çevresi: " & c & vbCrLf & "Dairenin Alanı: " & area
End Sub
Daire Yarıçap Çevre Alan Hesap VBA

İlginizi Çekebilir

VBA Dosyaları Uzantıya Göre Arama

VBA Bir Sayının Tek Mi Çift Mi Olduğunu Göstermek

VBA Tek Satırda If Else Yazmak

VBA Bir Stringdeki Noktalama İşaretlerini Kaldırma Örneği

VBA Bir Listede Birden Çok Olan Elemanları Göstermek