Konusu :iki tane button 1 tane de
listbox var 1.button sayi üret burada randomla sayı üretecez ürettigimiz sayiyi listboxla ekliceğiz. 2.button da tahmin buttonu ürettigimiz sayi için kullancağız .
Programın amacı: 1.buttondan girilen sayıyı listboxda ekledikden sonra 2. button da sayı giricez bu sayi inputboxdan olacak.Bizim rasgele ürettiğimiz sayi mesela 7 tahmin buttonunda girdigimiz sayı 5 msgboxla " Daha büyük bir sayi giriniz yazacak " 2. defa bir sayi giriyoruz bu defa 8 olsun msgbox " Daha küçük bir sayi giriniz yazacak " 3. defa giriliyor sayi 7 olsun msgbox " Girilen sayi dogru " böyle bir şey ben yaptım fakat bazı yerleri calışmıyor nerede yalnışlık yaptım bilmiyorum.
Benim yaptıgım
Dim sayi, tahmin As Integer
Button1_Click
ListBox1.Items.Add(Int(Rnd() * 10))
sayi = (Int(Rnd() * 10))
Button12_Click
tahmin = InputBox("Sayi Giriniz")
If sayi < tahmin Then
MsgBox("Daha büyük sayı giriniz")
ElseIf sayi > tahmin Then
MsgBox("Daha küçük sayi giriniz")
ElseIf sayi = tahmin Then
MsgBox("Dogru sayı girdiniz")
End If
