Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
30/11/2008 03:07
Konu Sahibi
chopper07
Yorumlar
14
Okunma
4778
Konuyu Oyla:
  • Derecelendirme: 3/5 - 2 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 3/5 - 2 oy

chopper07

Uzman
Kullanici Avatari
Uzman
E....
1.800
29/01/2008
376
Aydın
Ofis 2003
22/09/2017,12:50
formumuza bir adet combobox ve altına yada yanına bir adet textbox koyalım ve kodları yapıştıralım.


Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
Option Explicit
Dim plaka As Byte
Private Sub Form_Load()



Combo1.AddItem "ADANA"
Combo1.AddItem "ADIYAMAN"
Combo1.AddItem "AFYON"
Combo1.AddItem "AĞRI"
Combo1.AddItem "AMASYA"
Combo1.AddItem "ANKARA"
Combo1.AddItem "ANTALYA"
Combo1.AddItem "ARTVİN"
Combo1.AddItem "AYDIN"
Combo1.AddItem "BALIKESİR"
Combo1.AddItem "BİLECİK"
Combo1.AddItem "BİNGÖL"
Combo1.AddItem "BİTLİS"
Combo1.AddItem "BOLU"
Combo1.AddItem "BURDUR"
Combo1.AddItem "BURSA"
Combo1.AddItem "ÇANAKKALE"
Combo1.AddItem "ÇANKIRI"
Combo1.AddItem "ÇORUM"
Combo1.AddItem "DENİZLİ"
Combo1.AddItem "DİYARBAKIR"
Combo1.AddItem "EDİRNE"
Combo1.AddItem "ELAZIĞ"
Combo1.AddItem "ERZİNCAN"
Combo1.AddItem "ERZURUM"
Combo1.AddItem "ESKİŞEHİR"
Combo1.AddItem "GAZİANTEP"
Combo1.AddItem "GİRESUN"
Combo1.AddItem "GÜMÜŞHANE"
Combo1.AddItem "HAKKARİ"
Combo1.AddItem "HATAY"
Combo1.AddItem "ISPARTA"
Combo1.AddItem "İÇEL"
Combo1.AddItem "İSTANBUL"
Combo1.AddItem "İZMİR"
Combo1.AddItem "KARS"
Combo1.AddItem "KASTAMONU"
Combo1.AddItem "KAYSERİ"
Combo1.AddItem "KIRKLARELİ"
Combo1.AddItem "KIRŞEHİR"
Combo1.AddItem "KOCAELİ"
Combo1.AddItem "KONYA"
Combo1.AddItem "KÜTAHYA"
Combo1.AddItem "MALATYA"
Combo1.AddItem "MANİSA"
Combo1.AddItem "KAHRAMAN MARAŞ"
Combo1.AddItem "MARDİN"
Combo1.AddItem "MUĞLA"
Combo1.AddItem "MUŞ"
Combo1.AddItem "NEVŞEHİR"
Combo1.AddItem "NİĞDE"
Combo1.AddItem "ORDU"
Combo1.AddItem "RİZE"
Combo1.AddItem "SAKARYA"
Combo1.AddItem "SAMSUN"
Combo1.AddItem "SİİRT"
Combo1.AddItem "SİNOP"
Combo1.AddItem "SİVAS"
Combo1.AddItem "TEKİRDAĞ"
Combo1.AddItem "TOKAT"
Combo1.AddItem "TRABZON"
Combo1.AddItem "TUNCELİ"
Combo1.AddItem "ŞANLIURFA"
Combo1.AddItem "UŞAK"
Combo1.AddItem "VAN"
Combo1.AddItem "YOZGAT"
Combo1.AddItem "ZONGULDAK"
Combo1.AddItem "AKSARAY"
Combo1.AddItem "BAYBURT"
Combo1.AddItem "KARAMAN"
Combo1.AddItem "KIRIKKALE"
Combo1.AddItem "BATMAN"
Combo1.AddItem "ŞIRNAK"
Combo1.AddItem "BARTIN"
Combo1.AddItem "ARDAHAN"
Combo1.AddItem "IĞDIR"
Combo1.AddItem "YALOVA"
Combo1.AddItem "KARABÜK"
Combo1.AddItem "KİLİS"
Combo1.AddItem "OSMANİYE"
Combo1.AddItem "DÜZCE"
Combo1.ListIndex = 29
End Sub

Private Sub Combo1_Click()
plaka = Combo1.ListIndex + 1
Text1 = plaka
End Sub


™Hiç Birimiz, Hepimiz Kadar Akıllı Olamayız...®

resim
resim
resim
Cevapla

melleq

Üye
Kullanici Avatari
Üye
36
4
24/12/2008
0
Ankara
Ofis 2003
28/03/2010,21:00
bu kodlarda bi hata var bn combobox1.text=("...") diye yaptm buralar oldu fakat
Combo1.ListIndex = 29 ve diğer kodları çalıştıramadm yardımcı olursanız sevinirim..bu kodları nasıl değiştircem


Cevapla

chopper07

Uzman
Kullanici Avatari
Uzman
E....
1.800
29/01/2008
376
Aydın
Ofis 2003
22/09/2017,12:50
melleq hanım şu anda tekrar denedim kodlarda herhangi bir sıkıtı yok.

örnek dosyayı da ekliyorum.


Ek Dosyalar
.zip   AccessTr.zip (Dosya Boyutu: 57,71 KB / İndirme Sayısı: 86)
™Hiç Birimiz, Hepimiz Kadar Akıllı Olamayız...®

resim
resim
resim
Cevapla

assenucler

Aktif Üye
Kullanici Avatari
Aktif Üye
A.... S.... Ş....
2.054
31/10/2008
63
İstanbul
-
01/09/2017,15:34
Teşekkürler...


Cevapla

melleq

Üye
Kullanici Avatari
Üye
36
4
24/12/2008
0
Ankara
Ofis 2003
28/03/2010,21:00
çok güzel emeğinize sağlık..
fakat bu kodlar bu şekilde bnde çalışmıyo combo1.addıtem olarak çıkmıyo ancak combobox1.text.. olarak yazınca oluyor.
bana şu kodu nasıl değiştireceğimi söylerseniz sevinirim Combo1.ListIndex = 29


Cevapla

chopper07

Uzman
Kullanici Avatari
Uzman
E....
1.800
29/01/2008
376
Aydın
Ofis 2003
22/09/2017,12:50
rica ederim.
sizde nasıl çalışmıyor anlamadım tam olarak. bir şeyi değiştirmenize gerek yok ki.
formunuza bir adet combobox ve altına bir adet textbox yerleştirecesiniz. Ardından formunuzda boş bir yere bilgisayarımızın faresi ile çift tıklayarak kod bölümüne geçip, yukarda verilen kodları yapıştıracaksınız.

ama başka bir kod yapmak için bu kodları kullanmaya çalışıyorsanız, örneğini ekleyin, hep birlikte bakalım.


™Hiç Birimiz, Hepimiz Kadar Akıllı Olamayız...®

resim
resim
resim
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

[-]
Etiketler
kodları plaka illerin


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Common dialog nesnesi ve Action Kodları Coskun0559 4 2.374 24/04/2011, 08:15 benremix

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
Forum use Krzysztof "Supryk" Supryczynski addons.