1. 1.
    0
    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
    ···
   tümünü göster