Liste kutusuna değer girmek.
Tarih
17/09/2013 15:41
Konu Sahibi
direnist
Yorumlar
5
Okunma
1389
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



direnist
Aktif Üye
Kullanici Avatari
Aktif Üye
D.... S....
328
05/11/2008
118
İstanbul
Ofis 2010 64 Bit
Dün,18:50
Çözüldü 
Merhaba arkadaşlar;
Ekli örnekte, form üzerindeki metinkutusuna yazılan değerleri buton ile liste kutusuna eklemek istiyorum.
Yani değer1 metinkutusu içindeki değer listekutusunun 1.satır 1.sutununa
değer2 metinkutusu içindeki değer listekutusunun 1.satır 2.sutununa
değer3 metinkutusu içindeki değer listekutusunun 1.satır 3.sutununa buton ile eklenmesini için uğraştım ama yapamadım. Yeni değerde sıra ile altına gelecek şekilde eklenecek.
Desteğiniz için şimdiden teşekkürler.
Saygılar.


Ek Dosyalar
.rar   Database1 - Copy.rar (Dosya Boyutu: 44,68 KB / İndirme Sayısı: 22)
Cevapla


direnist
Aktif Üye
Kullanici Avatari
Aktif Üye
D.... S....
328
05/11/2008
118
İstanbul
Ofis 2010 64 Bit
Dün,18:50
Çözüldü 
Merhaba;
Cevabı söyle imiş. Belki bir yerde işinize yarar.

Visual Basic Code
 Me.ListekutusuAdı.AddItem Me.Text1 & ";" & Me.Text2 & ";" & Me.Text3

Bilgilerinize.
İyi akşamlar.

Cevapla


mhmtogz
Aktif Üye
Kullanici Avatari
Aktif Üye
M....
163
10/01/2013
9
Çanakkale
Ofis 2003
03/03/2016,18:00
Çözüldü 
2003 olarak ekledim.


Ek Dosyalar
.rar   deneme.rar (Dosya Boyutu: 14,43 KB / İndirme Sayısı: 23)
Cevapla


akdemir1
Aktif Üye
Kullanici Avatari
Aktif Üye
T.... S....
189
05/06/2011
11
Erzurum
Ofis XP
13/10/2016,21:30
Çözüldü 
Merhaba,

Çok güzel bir örnek, bir çok yerde işe yarayacaktır eminim.
kendi projeme uyarlamak istedim fakat küçük bir sorun var.

metin kutularına hiç değer girmeden "ekle" butonuna tıklayınca tabloya boş kayıt atıyor.
5 kere tıklasan 5 boş kayıt atıyor yani.

bunu nasıl engelleriz acaba.

saygılarımla.
HAYAT BİR SINAVSA,,,
ADIMI YAZAR ÇIKARIM..
.
Cevapla


atoz112
Uzman
Kullanici Avatari
Uzman
4.388
04/08/2009
İstanbul
Ofis 2007
Bugün,14:32
Çözüldü 
merhaba,

ekle butonunun olay yordamında iken;
Isnull ile boş alan kontrolü yaptırarak boş geçilmemesini sağlayabilirsiniz,tüm metin kutuları için.

örnek:
if Isnull(me.metinkutusu1) then
Msgbox " Değer giriniz"
me.metin1.setfocus
end if

..............gibi.



iyi çalışmalar.
saygılar.
Herkes,kendisinin AR-GEcisidir...
Cevapla


akdemir1
Aktif Üye
Kullanici Avatari
Aktif Üye
T.... S....
189
05/06/2011
11
Erzurum
Ofis XP
13/10/2016,21:30
Çözüldü 
Dim rs As New ADODB.Recordset
Private Sub KMTEKLE_Click()



Dim v As Variant
rs.Open "TabloPersonel", CurrentProject.Connection, adOpenDynamic, adLockOptimistic

rs.AddNew
rs(1) = Me.MTNADSOYAD
rs(2) = Me.MTNUNVAN
rs(3) = Me.MTNADRES

rs.Update

rs.Close
Me.MTNADSOYAD = " "
Me.MTNUNVAN = " "
Me.MTNADRES = " "
Me.LSTPERSONEL.Requery
Me.LSTPERSONEL.SetFocus
End Sub





Verdiğiniz kodları nereye eklersem uygun olur acaba,
bir kaç yerine ekledim denedim malesef yine boş kayıt attı
HAYAT BİR SINAVSA,,,
ADIMI YAZAR ÇIKARIM..
.
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Liste kutusu sütün hizlama ve biçim değiştirme hakkında nightashes 13 123 Dün, 20:10 nightashes
  Metin Kutusuna Yazarken Satır Kontrolü musteri53 7 116 Dün, 16:40 musteri53
  Form Değer Getirme Hk. Serkan Çevik 9 78 Dün, 13:12 Serkan Çevik
  Liste kutusu çift tıklama ile yeni form açmak nightashes 18 247 02/12/2016, 20:04 nightashes
  Liste kutusu işlem yapma ekleme silme de sorun nightashes 7 108 29/11/2016, 20:24 nightashes


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya