A.S.C Filtre, Grafik ve Raporlama Eklentisi

[TABLO] tablodaki bir kolondaki verileri diziye atma
#1
ben a tablosundaki b kolonunu bir dizi ye atmak istiyorum bunu nasıl sağlayabilirim?



  Alıntı
Bu mesajı beğenenler:
#2
dizi derken neyi kastediyorsun sıralı olarak yan yana mı yazılmasını istiyorsun?



  Alıntı
Bu mesajı beğenenler:
#3
yani vba daki dizilerden bahsediyorum örneğin dizi(i) gibi her veriyi ayrı bir dizi değişkenine atamak istiyorum



  Alıntı
Bu mesajı beğenenler:
#4
Sayin peace5219;

Asagidaki gibi yapilabilir
Visual Basic
  1. Private sub Boton_click()
  2. Dim Kayit As recordset,KayitSay As Long
  3. Dim Dizi(1 to 1000) as String 'veya Long ....vb.
  4. Dim Sayac as Long
  5. Set Kayit=Application.CurrentDb.Open("Select b From a")
  6. Kayit.Movefirst:KayitSay =Kayit.RecordCount
  7. do
  8. Sayac=Sayac + 1
  9. Dizi(Sayac)=Kayit.Fields(0)
  10. Kayit.movenext
  11. loop until Kayit.eof
  12. Kayit.close:set Kayit=nothing
  13. '********* Veriyi gosterme *********
  14. Sayac=0
  15. For Sayac=1 to KayitSay
  16. msgbox Dizi(Sayac)
  17. next Sayac
  18. EndSub





  Alıntı
Bu mesajı beğenenler:
#5
Dim kayit As Recordset, kayitsay As Long
Dim Dizi() As Variant
Dim sayac As Long
Dim tag1 As String
tag1 = Me.equipment_tag

Set kayit = Application.CurrentDb.OpenRecordset("Select arrival_actual_date_started from [sub list] where ((([sub list].master_equipment)='" & Me.equipment_tag & "')) ")
kayit.MoveFirst: kayitsay = kayit.RecordCount
Do
sayac = sayac + 1
Dizi(sayac) = kayit.Fields(0)
kayit.MoveNext
Loop Until kayit.EOF
kayit.Close: Set kayit = Nothing
'********* Veriyi gosterme *********
sayac = 0
For sayac = 1 To kayitsay
MsgBox Dizi(sayac)
Next sayac


kusura bakmayın işlerim dolayısıyla ancak ilgilenebildim fakat o dediğiniz yöntem hata veriyor ne yazıkki Dizi(sayac) = kayit.Fields(0) bu satırda subscript out of range hatası veriyor



  Alıntı
Bu mesajı beğenenler:
#6
Sayin peace5219;
Dim Dizi() As Variant yazmissiniz.

sub list tablosunda arrival_actual_date_started alan veri turu ne ise (Kalin olarak isaretlenen yerdeki tur de) olmalidir.
Dim Dizi(1 to 1000) As String, Long, Double .......
Dizi atanacak veri araligi kadar tanimli olmalidir.
[/quote]

bu islem dizi(1 to 1000) arasi sirasiyla tablo icinde ki veriyi gosterir. Sizin yapmak istediginiz onur_can'nin dedigi gibi alt alta yazilmis sutunda ki veriyi yan yana yazili sekilde mi gormek istiyorsunuz yoksa tag ozelligi ile gruplama ile ozellik mi atamak istiyorsunuz ?

Kolay gelsin.............



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [SORGU] Tablodaki Miktar Kadar Yeni Bir Tabloya Satır Ekleme hedefkaya 3 92 29-10-2020, 11:00
Son Mesaj: dsezgin
  [FORM] Alt Forum Da Bulunan Verileri Seçerek üstteki Metin Kutularında Düzenleme Yapmak footprinting 3 129 28-09-2020, 15:51
Son Mesaj: onur_can
access-sql-9 Access Olan Verileri Aylık Olarak Vba Gösterme merttr07 2 188 19-08-2020, 15:46
Son Mesaj: dsezgin
access-sql-4 [SORGU] Hücre Içinde Virgül Ile Ayrılan Verileri Alt Alta Sıralama alperalper 4 304 17-06-2020, 16:04
Son Mesaj: programmer67
  [SORGU] Verileri Istenilen Sırada Yazdımak footprinting 19 644 17-05-2020, 16:01
Son Mesaj: dsezgin
  [SORGU] Metin Kutusunda Ki Verileri Yan Yana Görüntüleme hedefkaya 2 226 05-05-2020, 13:16
Son Mesaj: hedefkaya
  [FORM] Alt Formda Seçtiğim Kişilerin Verileri omurozkan 2 217 25-03-2020, 13:08
Son Mesaj: omurozkan
  Formdaki Verileri Word'e Tekli Ve çoklu Yazdırma prestij06 3 357 17-02-2020, 22:52
Son Mesaj: dsezgin

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi