Skip to main content

AccessTr.neT


Listbox içindeki elemanları döngü ile diziye alma.

Listbox içindeki elemanları döngü ile diziye alma.

Çözüldü #1
Merhaba;
Ekteki örnekte metin kutusundan listbox içine atılan değerleri AKTAR butonu ile bir diziye aktarabilme konusunda bilgilerinizi rica ederim.
Örneğinn kod tarafında görüleceği üzere birşeyler yapmayı denedim ama başarısız oldum.
Teşekkürler.
İyi akşamlar.
.rar listboxtan diziye.rar (Dosya Boyutu: 33,1 KB | İndirme Sayısı: 35)
Cevapla
Çözüldü #2
Diziye eleman ekleme tamamdır. Ancak seçilmemişleri aktarmak olmuyor. Önce Seçmek gerekiyor aktarılcak elemanları...
Kolay Gelsin.
.zip diziye eleman ekler.zip (Dosya Boyutu: 23,49 KB | İndirme Sayısı: 43)
komşuda dülger mi var geliyor keser sesi,
ustalar konuşunca çıraklar keser sesi.
Cevapla
Çözüldü #3
Teşekkürler Kur@l Hocam;
Liste kutusu içinde shift tuşu ile baştaki ve sondakini seçince yada yine liste kutusu içinde iken CTR+A yapınca da hepsini seçemiyoruz.
Bu seçim işini otomatik yapma yolu var mıdır? Macro ile mesela.
Saygılarımla.
Cevapla
Çözüldü #4
komut 5 kodunu değiştirip inceleyiniz.

Private Sub Command5_Click()
'listbox tan diziye aktar

Dim atama, i
boyut = Me.List3.ListCount
ReDim deger(boyut)
For i = 0 To Me.List3.ListCount
Me.List3.Selected(i) = True
Next
i = 0

For Each atama In Me.List3.ItemsSelected

deger(i) = Me.List3.ItemData(atama)
MsgBox deger(i)
i = i + 1
Next
End Sub
komşuda dülger mi var geliyor keser sesi,
ustalar konuşunca çıraklar keser sesi.
Cevapla
Çözüldü #5
Kur@l Hocam, elinize sağlık, tamamdır.
Çok teşekkür ederim.
İyi akşamlar.
Cevapla
Çözüldü #6
Selamlar saygılar. Kandiliniz mübarek olsun.

Dosya örneğinizi inceleyemiyorum. Tanınmayan veri tabanı biçimi diyor. Ofisim Access Ofise 2007 olmasına rağmen açmıyor. Neden olabilir. Tekrar selam ve hürmetler..
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da