AccessTr.neT

Tam Versiyon: Bir değişkeni 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
Kodu şu şekilde düzenleyince problemim çözüldü,yardımlarınız için çok teşekkür ederim.


Me.Controls("Line" & Forms!Form1!sayi.Value).Tag = "Line" & Forms!Form1!sayi.Value
Me.Controls("Metin" & Forms!Form1!sayi.Value).Tag = "Metin" & Forms!Form1!sayi.Value
For Each ctl1 In Me.Controls
For Each ctl2 In Me.Controls

If ctl1.Tag = "Line" & Forms!Form1!sayi.Value And ctl2.Tag = "Metin" & Forms!Form1!sayi.Value Then
ctl1.Left = 2500
ctl1.Top = 2500
ctl2.Left = 2500
ctl2.Top = 3700
End If
Next
Next
Sayfalar: 1 2