VBA Dikdörtgenin Alanını Hesaplama Örneği
"VBA" Programlama dilinde "Dikdörtgenin Alanını Hesaplama Örneği" ile ilgili kod örneği aşağıdadır.
Sub RectangleArea()
Dim length As Double
Dim width As Double
Dim area As Double
length = InputBox("Dikdortgenin uzunlugunu girin: ")
width = InputBox("Dikdortgenin genisligini girin: ")
area = length * width
MsgBox "Dikdortgenin Alani: " & area
End Sub