Merhaba hocanın verdiği bir ödev bu fakat baya uğraşmamıza rağmen biraz sıkıntı çekiyorum ya kafam allak bullak oldu iyice bilen birisi bir yardım eli uzatsın aşağıda soruyu yazıyorum onun altına da kendi yaptığım kodları yazıcam fakat nerde hata var çözemedim hangi butonu seçersem seçeyim izmire atıyor ve izmir şehri seçilmiştir mesajını veriyor.
5 adet option box seçiniz. isimlerini 5 adet il ismi yapınız. Forma bir buton koyunuz. Butona basıldığı zaman msgbox ile hangi il seçildi ise onu gösteren programı "on n goto" döngüsü ile yapınız.
Yaptığım hata veren program bu
Düzgün anlaşılır olarak görmek isteyen olursa frmtr ye açtığım konunun linki:
http://www.frmtr.com/visu...e-kucuk-bir-uygulama.html
Dim sehir
Private Sub Command1_Click()
On sehir GoTo izmir, manisa, balıkesir, bursa, istanbul
izmir:
Option1.Value = False
MsgBox ("izmir şehri seçilmiştir."): End
manisa:
Option2.Value = False
sehir = MsgBox("Manisa şehri seçilmiştir."): End
balıkesir:
Option3.Value = False
MsgBox ("Balıkesir şehri seçilmiştir."): End
bursa:
Option4.Value = False
MsgBox ("Bursa şehri seçilmiştir."): End
istanbul:
Option5.Value = False
MsgBox ("istanbul şehri seçilmiştir"): End
End Sub