-
1.
0Merhaba 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
-
ccc rammstein ccc günaydın diler 17 06 2024
-
hep beraber 11 ve 12 nesiller için yakıyoruz
-
umarım sözlük tamamen biter
-
otobüsler ücretsiz diye bütün kokuşmuşlar
-
eger burada ki eski efsane basliklar silinirse
-
baycerrahın cefakar aneyi
-
anlamadım bu entryler nasil silindi
-
yılmaz erdoğan adamdır adam
-
iki kolunuz olmasa nasıl çekersiniz
-
iki ayak üzerinde durabilmeyi insanlık zannettiniz
-
kayra dan önce ölecegim bu gidişle
-
jsyra buraya gelmeden duramıyormusun
-
umut yok konuşturma beni birader
-
ela gözlü bir
-
düşünsene adın serhat 200 kg lik obezsin
-
kuşlar niye bk varmış gibi sürekli öter
-
umut yok biraderimin biratheri
-
mangal bayrdıbınız mübarek olsun
-
nick6ımdaki entriler silinmiş
-
otturmalı kaktırgaç
-
ilgisini alamayan ilgi kaşarının ziktirip gitmesi
-
kurban pazarında düşündüğüm
- / 1