AccessTr.neT

Merhaba arkadaşlar;
Ekli örnekteki Form1 de bulunan ilişkisiz olan metin kutularınıa yazılacak sayısal değerleri Kaydet butonu ile kod tarafında INSERT INTO ile for döngüsü içinde kaydetmek istiyorum. 
Metin kutularının adı Max1, Min1, Sonuc1 şeklinde 5 e kadar gidiyor.
Kod tarafındaki INSERT INTO içindeki yerede Max & i şeklinde yazarak tek bir INSERT INTO Sql cümlesi ile bunu metin kutularında yazan değerleri alır ve ekler diye düşündüm. Fakat Max & i şeklinde yazınca sadece "i" değişkenindeki değeri tabloya kaydediyor. Ben eklenecek alan adını nasıl dinamik şekilde tek Sql cümlesi halinde yazabilirim.
Umarım derdimi anlatabilmişimdir.
Yardımlarınız için şimdiden teşekkür ederim.

kodu aşağıdaki ile değiştirerek deneyiniz.

Dim Sql As String



Dim i As Byte



For i = 1 To 5

sql = "Insert Into Table1 ([MAX], [MIN], [SONUC]) values ('" & Controls("Max" & i) & "', '" & Controls("Min" & i) & "','" & Controls("Sonuc" & i) & "')"

      Debug.Print sql

      CurrentDb.Execute sql

Next i

Ozan hocam, çok teşekkür ederim.
Verdiğiniz kod istediğim şekilde kayıt yapıyor.
Saygılar.