arkadaşlar visual basici yeni yeni kullanmaya başladım ve bi hesap makinesi yaptım(çok hoç bir duyguydu :d) ve şimdi aritmetik ortalamayı hesaplayan bir program yapmayı düşünüyorum kodlar bu şekilde fakat çalışmadı ve 3 text 1 button 1 label açtım
Private Sub Hesapla_Click()
Dim yazili1, yazili2, yazili3, Ortalamaniz As Integer
yazili1 = Val(Text1.Text)
yazili2 = Val(Text2.Text)
yazili3 = Val(Text3.Text)
Ortalamaniz = (yazili1 + yazili2 + yazili3) / 3
Label1 = Ortalamaniz
End Sub
Private Sub Hesapla_Click()
Dim yazili1, yazili2, yazili3, Ortalamaniz As Integer
yazili1 = Val(Text1.Text)
yazili2 = Val(Text2.Text)
yazili3 = Val(Text3.Text)
Ortalamaniz = (yazili1 + yazili2 + yazili3) / 3
Label1 = Ortalamaniz
End Sub