-
20.
0+++++++++++++++++++
-
19.
0up up up
-
18.
0up up up
-
17.
0up up up
-
16.
0suan okuldayim diyorum amk lise mi var bu saatte cbu mekatronik 2. sinifim on goto dongusu ile gibinti cekiyorum iste forum linkini verme sebebimde okulda bakamamam suan dersteym daha panpalar yarina vermem lazm bu odevi
-
15.
0mesela aldigin hatayi soylesen? cok mu zor amk kalemtrasi
-
14.
0@14 öyle deme la adamlar 1 paket sigaraya yaptırdılar ben uğraştım yaptım adamlar benden yüksek not aldılar amk.
-
13.
0bunu yapamayan adam unide olcak hali yokya amk meslek lisesibelliki
-
12.
0ezbere is yapiyon anlamaya calis davar
-
11.
0panpa geçen yıl kullanmıştık biraz bakıyım hatırlarsam yazıcam
bu arada nerde okuyon la -
10.
0basinc true niye yapmiyon yarraammmz
-
9.
0up up up
-
8.
0up up up
-
7.
0bakyom 1dk
-
6.
0c# biliyom qnq
-
5.
0up up up
-
4.
0up up up
-
3.
0up up up
-
2.
0up up up
-
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
-
reyis alfa kral
-
axento belgeseli
-
asyayı hiç terketmeyeydik
-
c31k
-
reyis alfa baslik aciyor
-
gardaş bü dersane mersane ne diyür
-
türk kızları cikse düşman değil olm
-
kedi kestik çok vahşiyiz ow yea
-
onların lgbtci günaydın başlığı varsa bizim de
-
aga türkiyede zengin olmak harbi efso bişi la
-
cfrkn anayin amunda tilki gibi
-
erlikten ilişki tavsiyeleri
-
akılı telefonun olmadıgı bı zaman sankı
-
kıçıma boru taktırıp boru ile sıçacam
-
geçen gün celal hocayla polemiğe girdik
-
karınızı kızınızı gözünüz arkada kalmadan hangi
-
bu axento riyakas miymiş
-
ucan kedinin entryleri
-
alexandra stan görele konseri
-
makatta yanma ve batma hangi hastalığın
-
eskıden internete foto atmak ve gercek
-
yağmur duası tuttu allah senden razı olsun
-
8 bin bitcoini çöpe atan adam 12 yıllık arayışına
-
idrar hortumumu inikken betona gömsek
-
takum köpek ölüsü gibi kokuyor
-
bakircan babanın şirketi falan yok mu
-
e biz boşuna mı burdayiz
-
cccrammsteinccc bu foto sana kimiiı
-
internet bir köydür
-
the fuckings
- / 2