Şöyle anlatayım. Modül içerisinde

Global GeciciId As String

Şeklinde kod mevcut.

Ara isimli formdaki liste kutusunun çift tıklandığında olayında

GeciciId = Me.Liste5.Column(0)

Kodu var. Liste kutusu çift tıklandığında, GeciciId'e liste kutusunun satır kaynağındaki sorgunun ilk sütununda bulunan "MachineName" değerini aktarıyor. Column(0), sorgudaki ilk sütun. Column(1) yazsaydım, sorgudaki 2. sütunu alacaktı.

FrmComputers isimli formun etkinleştiğinde olayında da;

Dim rs As Object



If Len(GeciciId & "") = 0 Then

GeciciId = Dlookup ("MachineName", "Computers")

End If



Set rs = Me.Recordset.Clone

rs.FindFirst "[MachineName] = '" & GeciciId & "'"

If Not rs.EOF Then Me.Bookmark = rs.Bookmark

kodu mevcut. Önceki formda bulunan Liste kutusu çift tıklandığında kaydedilen GeciciId değerini burada kullanıyor. frmComputers isimli formun kayıt kaynağında MachineName ile GeciciId değeri eşit olan ilk kaydı buluyor.