AccessTr.neT

Tam Versiyon: Hesaplanmış Bir değeri Tekrar Atamak
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Elimden geldiğince kısa anlatmaya çalışayım..

txtTop1=Hesaplanan
txtTop2=Hesaplanan
........
..........
Yukardaki gibi hesaplanan değerlerim var diyelim
Sormak istediğim şu. Oluşturduğum döngüdeki b değeri
"txtTop1"
"txtTop2" ..... şeklinde devam ediyor bu text değerlerinin
yukarda hesaplattığım değer olduğuna bilgisayarı nasıl inandırabilirm..

yani aşağıdaki hesapta

a=txtTop1 'yukardaki hesaplanan değerini bana verebilirmi
hangi çeviriciyi yada komutu kullanmalayım yada varmı böyle bir cevap çözemedim..


ReDim txtTop(1 To 500)
Dim a, b, i
For i = 1 To 153
b = "txtTop" & i
a = b
Next i


Varsa Bir Kural Uymak Lazım .. Örnek gönderiyorum
Sayın Akem;
Keşke site kuralları na göre örnek uygulama ekleseydiniz de bizde daha kolay yardımcı olabilseydik.
Sorunuzdan, ne yapmak istediğiniz tam olarak anlaşılmıyor.
Örnek eklerseniz daha kolay yardımcı olabiliriz.

Sayın akem;
Sadece bir tahmin olarak yazıyorum. Kur@l ve Seruz Hocalarımızın dediği gibi örnek eklerseniz daha doğru cevap alabilir, hatta bizlerin farketmediği olası hatalar da tesbit edilebilir.
Metin kutusundaki değeri işleme alma konusunda forumda gördüğüm çalışmalarda 3 farklı şekil ortaya çıkıyor.
1.si o metin kutusunu "Me." kalıbıyla Me.Metin0 şeklinde kullanmak
2.si o metin kutusundaki değeri "value" ile belirtmek Metin0.value
3.sü bulunduğu formu da tanımlayarak. Forms![Form1].Metin0 şeklinde.
Benim elimden bu geliyor. Saygılar, iyi çalışmalar.
Soruyu bende aşağı yukarı tahmin edebiliyorum ama emin değilim.

txtTop ifadelerinin textbox (metin kutusu) gibi kontroller mi yoksa bir dizi değişkeni mi olduğundan emin olamadım.
Ona göre çözüm değişir, bu nedenle örneği görmek gerekir.

Üstte "txtTop1=Hesaplanan" şeklinde ifade var,
altta "ReDim txtTop(1 To 500)" ifadesi var.

Gönderdiği bu ifade için;
b = "txtTop" & i 

Dizi ise;
b = txtTop(i)

TextBox ise;
b = Me("[txtTop" & i & "]").Value
ifadesi kullanılabilir.

Deneyemediğim için emin olamıyorum tabii.
Belki de farklı bir şey vardır gerçek dosyada.
(11/11/2010, 14:18)Seruz yazdı: [ -> ]Soruyu bende aşağı yukarı tahmin edebiliyorum ama emin değilim.

txtTop ifadelerinin textbox (metin kutusu) gibi kontroller mi yoksa bir dizi değişkeni mi olduğundan emin olamadım.
Ona göre çözüm değişir, bu nedenle örneği görmek gerekir.

Üstte "txtTop1=Hesaplanan" şeklinde ifade var,
altta "ReDim txtTop(1 To 500)" ifadesi var.

Gönderdiği bu ifade için;
b = "txtTop" & i 

Dizi ise;
b = txtTop(i)

TextBox ise;
b = Me("[txtTop" & i & "]").Value
ifadesi kullanılabilir.

Deneyemediğim için emin olamıyorum tabii.
Belki de farklı bir şey vardır gerçek dosyada.

Teşekkürler...

txtTop=Hesaplanan dediğim Form üzerinden ve tablodan aldığı değerlerle hesaplanan bir değeri ifade ediyor.

örnek txtTop1=15, txtTop2=106, .... şeklinde
yani kodda

txtTop1=15
txtTop2=106
txtTop3=101
....
....txtTop500=96
daha sonra bu değerlerden 100 den büyük ama 100'e en yakın değeri buluyorum
diyelim bu değer 101

işte sorun burda başlıyor
bu 101 değeri hangisine ait
bunu da for next döngüsüyle bulmaya çalışıyorum

bu değeri form üzerine göndermiyorum.. (ama olmasa bu şekilde çözmeye çalışacağım)
o yüzden b = Me("[txtTop" & i & "]").Value ifadesinde Me olduğunda bulunamadı diyor me ifadesini kaldırınca value değerini kabul etmiyor text olarak görüyor "[txtTop1]"











Arkadaşlar Kuralları biliyorum ama Kod o kadar uzunki bide bitmemiş halde yani tam olarak çalışmıyor.
En Kısa şekilde derdimi anlatmaya çalıştım.. Seruz hocam olayı yakalamış
Sayfalar: 1 2