s.a basic de arkadaşlar yeniler için birtane ortalama programı yapalım

önce bir tane buton ve bir tanede text box ekleyelim

kodları butona yazalım

önce 3 tane degişken oluşturalım

sayı girecegimiz için veri türümüz integer olacak

dim a as  integer

dim b as integer

dim ort

şimdik birde arkadaşlar inputbox yapalım

a= inputbox("ilk sayıyı giriniz")

ikinci inputboxumuzu yapalım

b = inputbox("ikinci sayıyı giriniz")

şimdik gelelim işlem yapalım

ort = a/b

şimdik bu sonucumuzu textte gosterelim

bunun için

text1.text = ort

ve

 end sub

diyelim sonlandıralım

Private Sub Command1_Click()
Dim a As Integer
Dim b As Integer
Dim ort
a = InputBox("ilk sayıyı giriniz")
b = InputBox("ikinci sayıyı giriniz")
ort = a / b
Text1.Text = ort
End Sub

hadi kolay gelsin

sorunuz olursa yazın